составить программу которая запрашивает n целых чисел и вычисляет их среднее арифметическое - №1605597

составить программу которая запрашивает n целых чисел и вычисляет их среднее арифметическое
- Предмет:
  Информатика
- Автор:
  cándidalbiz
- 5 лет назад

Ответы 1

var n, sum, i, j:integer;

begin

sum:=0;

write('Enter N: ');

readln(n);

writeln('Enter N numbers:');

for i:=1 to n do

begin

read(j);

sum:=sum+j;

end;

writeln('Average is ', sum/n)

end.
- Автор:
  zechariahhobbs
- 5 лет назад
- 0
Добавить свой ответ

Еще вопросы

How much to ban the user?

1 hour 1 day 100 years