помогите. пожалуйста Составить программу, вычисляющую средную температуру воздуха за 10 дней (среднее арифметическое 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
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
