Program enot; Var a:array[1..5,1..5] of integer; i,j,s: integer; c:real; begin for i:= 1 to 5 do for j:= 1 to 5 do begin a[i,j]:= random (20); s:=s a[i,j]; c:=s/25; end; write(c); end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
