Умножение матрицы на число есть поэлементное умножение её элементов.
Формальная запись.
1)
Матрица не обязана быть квадратной.
procedure Mul(var R:TMatrixMN; A:TMatrixMN; B:Real); var i,j:Integer; begin for i:=0 to RowsCount(A)-1 do for j:=0 to ColumnsCount(A)-1 do R[i,j]:=A[i,j]*B; end;
Входные параметры:
Выходные параметры:
Примечание: