标题:[求助]矩阵的行列式计算如何实现?
只看楼主
四环素牙
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-11-19
 问题点数:0 回复次数:7 
[求助]矩阵的行列式计算如何实现?

谁能帮我写一个求N阶方阵行列式的代码!!
不是我懒,是实在没办法!
求高手帮忙解决一下!

搜索更多相关主题的帖子: 行列式 矩阵 方阵 
2006-11-19 19:54
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
N阶方阵行列式?..是什么东东?..

我的msn: myfend@
2006-11-19 19:59
四环素牙
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-11-19
得分:0 

大家帮帮忙,我急的不行不行的,谁能解决我跪拜相谢!

2006-11-19 20:09
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
N阶方阵行列式?..是什么东东?..

我的msn: myfend@
2006-11-19 20:11
四环素牙
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-11-19
得分:0 

比较复杂,一句两句说不明白

我给你找找啊!

2006-11-19 20:15
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 

刚到百度看了一下..什么叫行列式转阵....果然相当复杂.....

这些..我觉得..到matlab版下去问..会有收获..

我的msn: myfend@
2006-11-19 21:04
四环素牙
Rank: 1
等 级:新手上路
帖 子:8
专家分:0
注 册:2006-11-19
得分:0 
......
2006-11-19 21:09
purana
Rank: 16Rank: 16Rank: 16Rank: 16
来 自:广东-广州
等 级:版主
威 望:66
帖 子:6039
专家分:0
注 册:2005-6-17
得分:0 
Private Sub Command1_Click()
Dim mat(3, 3) As Integer '定义3行3列的数组
Dim i As Integer, j As Integer
'对数组赋值
'由于我没有学过行列式转阵,所以,我不知道这些数组值有什么规则可言
'又或者,没有规则,我不清楚,所以只好用你给我的数去求.
mat(0, 0) = 1: mat(0, 1) = 2: mat(0, 2) = 3
mat(1, 0) = 1: mat(1, 1) = 1: mat(1, 2) = 1
mat(2, 0) = 1: mat(2, 1) = 3: mat(2, 2) = 4

For i = 0 To 2
mat(1, i) = mat(1, i) - mat(0, i) '第二行减第一行
Next

For i = 0 To 2
mat(2, i) = mat(2, i) - mat(0, i) '第三行减第一行
Next

For i = 0 To 2
mat(2, i) = mat(2, i) - mat(1, i) * -1 '第三行减第二行的-1倍
Next

For i = 0 To 2 '输出
For j = 0 To 2
Print mat(i, j);
Next
Print
Next
End Sub


我的msn: myfend@
2006-11-19 21:36



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-104060-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.381484 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved