Структуровані типи даних. Операції над двомірними масивами
B:ar2;
C:ar3;
Begin
write('Введіть розмірність матриці М');
readln(n,m); {Ввід розмірності матриць }
write('Введіть матрицю М');
For i:=1 to n do
For j:=1 to m do
read(A[i,j]); {Ввід першої матриці}
write('Введіть матрицю М');
For i:=1 to n do
For j:=1 to m do
read(B[i,j]); {Ввід другої матриці}
For i:=1 to n do
For j:=1 to m do
C[i,j]:=A[i,j]+B[i,j]; {Обчислення суми матриць}
For i:=1 to n do
For j:=1 to m do
writeln(C[i,j]); {Вивід резуультату}
End.
Результати:
n=2,m=3
1 -4 5 6 -1 0 7 -5 5
0 3 8 6 0 -9 6 3 -1
Program Rizn; {Знаходження різниці двох матриць}