const n=30; var a : array[1..n] of integer; sum,i : integer; begin Randomize; for i:=1 to n do begin a[i]:=random(20) 10; write(a[i],' '); end; writeln; sum:=0; for i:=1 to n do sum:=sum a[i]; writeln('Среднемесячная температура = ',sum/n); end.
Пример (для n=10): 15 22 27 20 23 13 23 25 29 26 Среднемесячная температура = 22.3
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
