Паскаль.Двумерные массивы.Не смогли бы исправить ошибку, там при умножении квадратной матрицы на матрицу у меня формула неверная чуть-чуть)
Приложения:
Ответы
Ответ дал:
0
Умножение квадратных матриц делается так:
const n=5;
type ar=array[1..n,1..n] of integer;
procedure p3(var m1,m2,m3:ar);
var i,j,k,s:integer;
begin
for i:=1 to n do
for j:=1 to n do
begin
s:=0;
For k := 1 to n do s:=s+m1[i,k]*m2[k,j];
m3[i,j]:=s;
end;
end;
const n=5;
type ar=array[1..n,1..n] of integer;
procedure p3(var m1,m2,m3:ar);
var i,j,k,s:integer;
begin
for i:=1 to n do
for j:=1 to n do
begin
s:=0;
For k := 1 to n do s:=s+m1[i,k]*m2[k,j];
m3[i,j]:=s;
end;
end;
Ответ дал:
0
не смогли бы вы мне там отредактировать?
Вас заинтересует
2 года назад
7 лет назад
9 лет назад
10 лет назад