以下能够正确计算1+2+3+…+10的程序是

admin2013-04-11  36

问题 以下能够正确计算1+2+3+…+10的程序是

选项 A、Private sub Command1_Click( )             sum=0                                            For 1=1 To 10 Sum=sum+1, Next I Print Sum End Sub
B、Private sub Command1_Click(  )     Sum=0,I=1     Do While l<=10     Sum=Sum+1     I=I+1     Print Sum   End Sub
C、Private Sub command1_click(  )             Sum=0:I=1     Do     Sum=Sum+1     I=I+1     Loop While I<10     Print Sum   End Sub
D、Private Sub command1_Click(    )     Sum=0:I=1     Do       Sum=Sum+1     l=I+1     Loop Until I<10     Print Sum   End Sub                  

答案1

解析 A选项进行10次循环,分别将1至10累加给Sum,故正确。选项B缺少Loop关键词,否则也是正确的。选项C与D由于受条件“Iclo’’限制,Do循环只能进行一次。
转载请注明原文地址:https://kaotiyun.com/show/Zvhp777K
0

最新回复(0)