Тема вопроса: нет. Что выполняет данная про

Сложность вопроса: 1 (из 10)

<question>252

Что выполняет данная программа:

program jk;

сonst n=10; m=150;

var a:array [1..n] of integer;

i,s: integer;

s1:real;

begin

for i:=1 to n do

a[i]:=random (m);

s:=0;

for i:=1 to n do

s:=s+a[i];

s1:=s/n;

writeln(s1)

end.

нахождение среднее арифметического элементов массива

нахождение суммы элементов массива

программа написана неверно, т.к. не введены элементы масcива

находится частное от деления элементов массива на n