Составить программу, вычисляющую среднее

арифметическое n

чисел, вводимых с клавиатуры.

Паскаль.

Question

Алексаня

8 мая, 12:34

+1

Ответы (1)

Знаешь ответ?

Агриппич · Answer 1

Var i, n:integer; x, s:real;

begin

read (n);

s:=0;

for i:=1 to n do

begin

read (x);

s:=s+x;

end;

writeln (s/n);

end.

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