const n=31; var a:array [1..n] of integer; i,s:integer; begin write('Осадки в январе: '); for i:= 1 to n do begin a[i]:= Random(11); write(a[i],' '); s:=s a[i] end; writeln; writeln('Общее количество осадков за январь: ',s); writeln('Среднее количество осадков за январь: ',s/n:0:3) end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.