Вычисление среднего арифметического чисел натурального ряда, начиная с 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.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д