Var x,y,z:array [1..10] of integer; i,n:integer; begin writeln('введите n'); readln(n); writeln('введите массив x'); for i:=1 to n do readln(x[i]); writeln('введите массив y'); for i:=1 to n do readln(y[i]); for i:=1 to n do z[i]:=x[i]*y[i]; writeln('Массив x: '); for i:=1 to n do write(x[i],' '); writeln; writeln('Массив y: '); for i:=1 to n do write(y[i],' '); writeln; writeln('Массив z: '); for i:=1 to n do write(z[i],' '); writeln; end.
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.