Program z; var s,i,j,n,m:integer; a:array [1..100,1..100] of integer; b:array [1..100] of real; begin n:=5; m:=6; for i:=1 to n do for j:=1 to m do begin writeln ('vvedi elementy'); readln (a[i,j]); end; for i:=1 to n do begin for j:=1 to m do begin write (a[i,j]:5); end; writeln; end; for i:=1 to n do begin s:=0; for j:=1 to m do begin s:=s a[i,j]; end; b[i]:=s/m; end; for i:=1 to n do writeln (b[i]:5:1); readln; end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
