画出求满1的平方+2的平方+3的平方+n的平方>10的平方的最小正整数n的程序框图
来源:学生作业帮助网 编辑:作业帮 时间:2024/05/13 00:54:40
画出求满1的平方+2的平方+3的平方+n的平方>10的平方的最小正整数n的程序框图
Rem 语言:Visual Basic 6.0
Sub Main() '开始
S = 0 : n = 1
Do
S = S + n ^ 2
If S > 10 ^ 2 Then Exit Do
n = n + 1
Loop
MsgBox n, vbInformation, "输出"
End Sub '结束