填空题
下列程序用来计算1+2+…+n,当和大于100时停止计算,请填空。 Private Sub Form_Click() Dim n as integer,s as integer,I as integer,k as integer s=0 k=0 n=inputbox(“请输入n的值“) For i=1 to 100 k=k+1 s=s+1 (13) Next i Print s End Sub
1、
【正确答案】
1、if s>100 then exit for
【答案解析】[解析] 依题意,用变量s来记录1到n的累加和,当累加和s大于100时停止计算,故加入退出循环条件“if s>100 then exit for”。