[Torres]

Помогите, пожалуйста, даны квадратные матрицы A и B порядка n. Нужно получить произведение B*AT, где T-транспонированная матрице A.

[Kapitoshka438]

Результатом будет матрица порядка nxn, в которой элемент i-й строки j-го столбца будет равен скалярному произведению i-й строки матрицы B и j-й строки матрицы A.

Код:

var
  A, B, C: array [1..N, 1..N] of Double;
  I, J, K: Integer;

begin
  ...
  for I := 1 to N do
    for J := 1 to N do
    begin
      C[I, J] := 0;
      for K := 1 to N do
        C[I, J] := C[I, J] + B[I, K] * A[J, K];
    end;
  ...
end.

Что-то типа этого.

[Torres]

а чем здесь является матрица C?

[SerginhoLD]

Сообщение от Torres

а чем здесь является матрица C?

ну логично что произведение B*AT

[Torres]

а как транспонированную получить

[SerginhoLD]

http://ru.wikipedia.org/wiki/Транспонированная_матрица

ща скоро таблицу умножения спрашивать будут