高斯赛德尔迭代法(VB代码)

发布网友发布时间：2022-05-11 21:25

我来回答

共1个回答

热心网友时间：2023-10-21 03:21

真的很想看看别人的答案
，我写了一个如有不对望大家指正：
在此先谢谢大家：
Private
Sub
Command1_Click()
Dim
x,
y,
z
As
Integer
For
x
=
1
To
20
For
y
=
1
To
33
z
=
4
*
x
+
11
*
y
-
33
If
8
*
x
-
3
*
y
+
2
*
z
=
20
Then
Print
"x="
&
x,
"y="
&
y,
"z="
&
z
End
If
Next
y
Next
x
End
Sub
答案是
x=3
y=2
z=1

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com

焦点

猜你喜欢

热门推荐

产品服务发展历程企业资讯企业文化关于我们加入我们联系我们网站导航网站律师

中国扫黄打非网

赣ICP备2023002352号-2

违法及侵权请联系：TEL:177 7030 7066 E-MAIL:11247931@qq.com 本站由北京市万商天勤律师事务所王兴未律师提供法律服务

高斯赛德尔迭代法(VB代码)

最新推荐

猜你喜欢

热门推荐