Составить программу, вычисляющую среднее арифметическое n чисел, вводимых с клавиатуры. Паскаль.

Question

Михаил Быков

Информатика

5 марта, 16:19

Составить программу, вычисляющую среднее арифметическое n чисел, вводимых с клавиатуры. Паскаль.

+3

Ответы (1)

Знаешь ответ на этот вопрос?

Джеона · Answer 1

Программа на языке Паскаль:

Program qq;

Var a, i, n, s:integer; p:real;

Begin

s:=0;

p:=0;

readln (n);

for i:=1 to n do begin

readln (a);

s:=s+a;

end;

p: = s/n;

writeln (p:6:4);

End.