Скачать: CL | DM;

Умножение матрицы на вектор с небольшой загвоздкой   Найти похожие ветки 

← →
jagr ©   (2005-07-01 18:00) [0]

Мне нужно умножить матрицу 3х3 на вектор. Например
1 2 3   3
4 5 6 * 1
7 8 9   15
       8
       9
       10

Как записать такой зикл, который будет умножать мне по 3 элемента,
тоесть: |A|ij *  bj = cj = Sum(aij*bj)
Чтобы после того, как третий элент столбца bj, все начиналось заного, но с 4-го элемента. Не могу понять, что нужно сделать с переменной L, чтобы цикл работал правильно

L:=1;
Sum2:=0;
For i:=1 to 3 do
 For j:=1 to 3 do begin
Sum1:=S5[i,j]*S4[L];
Sum2:=Sum2+Sum1;
L:=L+1;
If j=3 Then begin
p:=p+1;
S6[p]:=Sum2;
Sum2:=0;
end;
end;

---

← →
MacroDenS ©   (2005-07-01 18:14) [1]

Перечитай свой вопрос еще раз, одгатка в нем же!

---

← →
jagr ©   (2005-07-01 18:49) [2]

Спасибо, что помог :) Я уже сделал.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c