Помощь - Поиск - Пользователи - Календарь
Полная версия: помогите с массивом
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
wary
Дана следующая таблица 8x10:

1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1
1 1 1 1 1 1 1 1 1 1


Необходимо найти среднеарифметическое каждой строчки?

Чтобы это сделать нужно подсчитать сумму элементтов в каждой строке и разделить на их количество, вот именно это у меня и не получается.
Malice
for i:=1 to 8 do write (1,' ');
yes2.gif
wary
Цитата(Malice @ 18.12.2006 23:10) *

for i:=1 to 8 do write (1,' ');
yes2.gif

Указанная выше таблица 8*10 отображет лишь визуальный вариант, а так на каждой позиции может быть любое число. Таблица заполняется РАНДОМОМ
мисс_граффити
правила п.3
wary
Цитата(мисс_граффити @ 18.12.2006 23:48) *

правила п.3

смотрел я п3. Согласен там много всего, но я чтото никак не найду именно то что мне нужно, если нетрудно тыкнете носом где есть примерно мой вопрос.
Заранее все спасибо unsure.gif
Гость
Цитата(wary @ 18.12.2006 22:51) *

вот именно это у меня и не получается.


for i:=1 to 8 do begin
s:=0;
for j:=1 to 10 do s:=s+a[i,j];
s:=s/10;
writeln (s);
end;

Вот примерно так должна выглядеть эта часть программы..
wary
Цитата
Вот примерно так должна выглядеть эта часть программы..


спасибо большое good.gif , задачка удачно решена cool.gif
Lapp
Цитата(wary @ 20.12.2006 9:52) *

задачка удачно решена cool.gif

Для тебя, может, и удачно.. Но вообще-то тут решают успешно smile.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.