作者: silent1017 (......) 看板: Visual_Basic
標題: [VB6 ] 矩陣問題
時間: Sat Sep 15 23:02:12 2007
如題
大大們:
我有一個 b=3*3和e=3*6 矩陣
要做相乘,結果不能顯示出來
f=b*e
y=6*1
之後還要用一個f*y
a=f*y
之前有弄3*6和6*3的矩陣顯示出,結果可以
程式如下
e=3*6 c=6*3
a =3*3
For q = 1 To 3
For u = 1 To 3
For w = 1 To 6
a(q, u) = a(q, u) + e(q, w) * c(w, u)
Next
Next
Next
For q = 1 To 3
For u = 1 To 3
Print " a("; q; ", "; u; ") = "; a(q, u)
Next
Print "---------------------------------------"
Next
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.113.132.124
※ 編輯: silent1017 來自: 59.113.132.124 (09/15 23:48)