Двумерный массив,Pascal - Помощь студентам

Svetlana999 · 11.12.2012, 06:42

В двумерном массиве найти сумму элементов каждой строки и среднее арифмитическое этой строки.ПОМОИТЕ РЕШИТЬ ПОЖАЛУЙСТА!

Mad_Cat · 11.12.2012, 07:00

Код:

for i:=1 to n do
begin
s:=0;
for j:=1 to m do
s:=s+a[i,j];
writeln('sum[',i,']=',s);
writeln('avg[',i,']=',s/m);
end;

11.12.2012, 06:42	#1
Svetlana999 Регистрация: 11.12.2012 Сообщений: 6	Двумерный массив,Pascal В двумерном массиве найти сумму элементов каждой строки и среднее арифмитическое этой строки.ПОМОИТЕ РЕШИТЬ ПОЖАЛУЙСТА!

11.12.2012, 07:00	#2
Mad_Cat Made In USSR! Старожил Регистрация: 01.09.2010 Сообщений: 3,657	Код: `for i:=1 to n do begin s:=0; for j:=1 to m do s:=s+a[i,j]; writeln('sum[',i,']=',s); writeln('avg[',i,']=',s/m); end;` "...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..." (c) Юрий Клинских aka "Хой"