Напишите на ^ Паскале программу, которая запрашивает с клавиатуры массив из N чисел, а затем выводит среднее арифметическое всех элементов массива.
орфографию проверь
var N,i,z,l:integer;
a:array[1..100] of integer;
for i:=1 to N do
begin
readln(a[i]);
l:=l+a[i];
end;
z:=l/N;
writeln(z);
end.
Оцени ответ
