在窗口中显示:
A11 A12 A13 B11 B12
A21 A22 A23 × B21 B22 A31 A32 A33 B31 B32
=A11*B11+A12*B21+A13*B31+
A21*B11+A22*B21+A23*B31+
A31*B11+A32*B21+A33*B31+
A11*B12+A12*B22+A13*B32+
A21*B12+A22*B22+A23*B32+
A31*B12+A32*B22+A33*B32
其中字母代表编辑框
A11 A12 A13 B11 B12
A21 A22 A23 × B21 B22 A31 A32 A33 B31 B32
=A11*B11+A12*B21+A13*B31+
A21*B11+A22*B21+A23*B31+
A31*B11+A32*B21+A33*B31+
A11*B12+A12*B22+A13*B32+
A21*B12+A22*B22+A23*B32+
A31*B12+A32*B22+A33*B32
其中字母代表编辑框
解决方案 »
- float值相减的绝对值精度问题
- method '' not supported by automation object
- 谁能给我一个,输入数组的方法~
- 高分求助 ADOConnection 问题
- Delphi如何实现动修编辑网页呢?
- 帮小弟做个DELPHI MEMO 主要这个太难了,两天没搞下来
- 我的D,E盘莫名其妙的不见了,只看到C盘,重装98,还是找不到?
- 走投无路了。救命啊。打印的问题。目前只能给29分。不过可以给多次
- 如何加入mts data module远程数据模块?
- 我的win98中没有找到scktsrvr.exe,是不是不能用tsocketconnection连接数据库?
- 退出登陆窗口的问题!
- 真的是令人發指啊................................................
给个3*3事例吧
for i:=1 to 3 do
begin
for j:=1 to 3 do
begin
for n:=1 to 3 do
C[i,j]:=C[i,j]+A[i,n]*B[n,j];
end;
end;