помогите с массивом Опции

[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

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

Чтобы это сделать нужно подсчитать сумму элементтов в каждой строке и разделить на их количество, вот именно это у меня и не получается.

Сообщение отредактировано: wary - 18.12.2006 22:52

[Malice]

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

[wary]

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

Указанная выше таблица 8*10 отображет лишь визуальный вариант, а так на каждой позиции может быть любое число. Таблица заполняется РАНДОМОМ

[мисс_граффити]

правила п.3

[wary]

правила п.3

смотрел я п3. Согласен там много всего, но я чтото никак не найду именно то что мне нужно, если нетрудно тыкнете носом где есть примерно мой вопрос.
Заранее все спасибо

[Гость]

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

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]

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

спасибо большое , задачка удачно решена

[Lapp]

задачка удачно решена

Для тебя, может, и удачно.. Но вообще-то тут решают успешно