Помогите, тону! Кинте в меня решением!
Помогите составить программу с процедурой перемножения двух матриц размерностью n на n соответственно X[i,j] и Y[i,j].
где элемент искомой матрицы равен
Z[i,j]=сумме(от k=1 до k=n)X[i,k]*Y[k,j]
Зарание спасибо!!!
где элемент искомой матрицы равен
Z[i,j]=сумме(от k=1 до k=n)X[i,k]*Y[k,j]
Зарание спасибо!!!
Цитата:
Originally posted by Tetris
Помогите составить программу с процедурой перемножения двух матриц размерностью n на n соответственно X[i,j] и Y[i,j].
где элемент искомой матрицы равен
Z[i,j]=сумме(от k=1 до k=n)X[i,k]*Y[k,j]
Зарание спасибо!!!
Помогите составить программу с процедурой перемножения двух матриц размерностью n на n соответственно X[i,j] и Y[i,j].
где элемент искомой матрицы равен
Z[i,j]=сумме(от k=1 до k=n)X[i,k]*Y[k,j]
Зарание спасибо!!!
ok! poprobuju, no ne uveren!
var i,j,k,n:longint;
...
n:=...;
for i:=1 to n do
for j:=1 to n do
for k:=1 to n do
Z[i,j]:=Z[i,j]+X[i,k]*Y[k,j];
...
Poprobuj! Mozhet i budet rabotat'! Ili ja ne pravil'no ponjal! ;)
Цитата:
Originally posted by Tetris
Помогите составить программу с процедурой перемножения двух матриц размерностью n на n соответственно X[i,j] и Y[i,j].
где элемент искомой матрицы равен
Z[i,j]=сумме(от k=1 до k=n)X[i,k]*Y[k,j]
Зарание спасибо!!!
Помогите составить программу с процедурой перемножения двух матриц размерностью n на n соответственно X[i,j] и Y[i,j].
где элемент искомой матрицы равен
Z[i,j]=сумме(от k=1 до k=n)X[i,k]*Y[k,j]
Зарание спасибо!!!
я как-то писал модуль для работы с матрицами. есть там и перемножение. если надо, то пиши в мыло.