Составить программу, вычисляющую средную температуру воздуха за 10 дней (среднее арифметическое 10 чисел). температура воздуха каждого из дней вводится с клавиатуры.

105

431

Посмотреть ответы 2

Ответы на вопрос:

kkalipso

Информатика

4,5(52 оценок)

//pascal abc.net v3.1 сборка 1219 const n=10; var i,a: integer; sr: real; begin for i: =1 to n do begin readln(a); sr: =sr+a; end; writeln; sr: =sr/n; writeln('sr=',sr); end. пример ввода: 1 2 3 4 5 6 7 8 9 10 пример вывода: 5.5