画出求满1的平方＋2的平方＋3的平方＋n的平方＞10的平方的最小正整数n的程序框图

来源：学生作业帮助网编辑：六六作业网时间：2024/12/24 00:20:55

画出求满1的平方＋2的平方＋3的平方＋n的平方＞10的平方的最小正整数n的程序框图画出求满1的平方＋2的平方＋3的平方＋n的平方＞10的平方的最小正整数n的程序框图画出求满1的平方＋2的平方＋3的平方

画出求满1的平方＋2的平方＋3的平方＋n的平方＞10的平方的最小正整数n的程序框图
画出求满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 '结束