Вычисление среднего арифметического чисел натурального ряда, начиная с 10 до 50 - Turbo Pascal

Узнай цену своей работы

Формулировка задачи:

Составьте программу вычисления среднего арифметического чисел натурального ряда, начиная с 10 до 50.

Решение задачи: «Вычисление среднего арифметического чисел натурального ряда, начиная с 10 до 50»

textual
Листинг программы
program pr;
var
i,sum:integer;
avg:real;
begin
sum:=0;
for i:=10 to 50 do sum:=sum+i;
avg:=sum/41;
{или avg:=(10+50)*20.5/41}
writeln('Среднее арифметическое чисел натурального ряда от 10 до 50: ',avg);
end.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 3.867 из 5
Похожие ответы