Составьте алгоритм согласно которому будет запрошено несколько натуральных чисел и...

Question

Составьте алгоритм согласно которому будет запрошено несколько натуральных чисел и сообщено их среднее арифметическое(количество запрашиваемых чисел тоже запрашивается) информатика паскаль

Comments

срочно(

Answer 1

Var
i,a:integer;
b,c:real;
Begin
read(a);
for i:=1 to a do begin
read(c);
b:=b+c;
end;
writeln(c/a);
end.