作业帮 > 综合 > 作业

用VB编程验证“角谷猜想”.“角谷猜想”指出,对于一个自然数,若该数字为偶数,则除以2;若该数为奇数,则乘以3并加1;将

来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/09/23 06:39:43
用VB编程验证“角谷猜想”.“角谷猜想”指出,对于一个自然数,若该数字为偶数,则除以2;若该数为奇数,则乘以3并加1;将得到的数再重复按该规则运算,最终可得到1.编写程序,对给定的一个数n,验证这一过程.
用VB编程验证“角谷猜想”.“角谷猜想”指出,对于一个自然数,若该数字为偶数,则除以2;若该数为奇数,则乘以3并加1;将
Private Sub Command1_Click()
Dim n As Integer
n = InputBox("请输入n:")
Do
If n Mod 2 = 0 Then
Call ous(n)
Else
Call jis(n)
End If
Loop Until n
再问: 能不能显示过程,比如输入10就显示: 10 5 16 8 4 2 1
再答: Private Sub Command1_Click() Dim n As Integer n = InputBox("请输入n:") Do Print n; If n Mod 2 = 0 Then Call ous(n) Else Call jis(n) End If Loop Until n