Даны 2 массива чисел Х =(х1,х2,...,хn) и Y=(y1,y2,...yn). Найти массив Z, у которого каждый элемент zi равен xi*yi.
на Паскале
Program Prim_43;
Const M = 100;
Var I,N: Integer
X,Y,Z: Array [1.. M] of Integer;
Begin
Read (N);
For I:=1 To N Do
Read (X[I],Y[I]);
Writeln (X[I],Y[I]);
For I:=1 To N Do
Z[i]:= X[i]*Y[i];
Writeln ('Z = ', Z[i]);
End.
Скажите правильно ли я решила? Проверить негде (