Написать программу нахождения среднего арифметического элементов в массиве [5 х5]

Question

Информатика

Козьмич

24 февраля, 01:43

Написать программу нахождения среднего арифметического элементов в массиве [5 х5]

+3

Ответы (1)

Знаете ответ?

Эммануилка · Answer 1

Var a: array[1 ... 5,1 ... 5] of integer;

s, i, j:integer;

begin

s:=0;

for i:=1 to 5 do begin

for j:=1 to 5 do begin

a[i][j]:=random (-10,10) ;

s+=a[i][j];

write (a[i][j]:3) ;

end;

writeln () ;

end;

writeln (s/25) ;

end.