составьте для вычислителя алгоритм, пользуясь которым он запросит последовательность N чисел и сообщит среднее арифметическое.

проверь орфографию и если не будет потом работать измени i:=1 на i:=0

pascal 

var 

    n,z,l:integer;

    a:array[1..30] of integer;

begin

readln(kol-vo chisel-,n);

for i:=1 to n do

begin

readln(a[i]);

l=l+a[i];

end;

z=l/n;

writeln(srednee arifm-,z);

end.

 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку