下列程序的运行结果为______。Private Sub Command1_ Click() Dim s As Long Dim x As Integer s = 0 for x = 99 To 1 step - 2

admin2013-04-11  19

问题 下列程序的运行结果为______。Private Sub Command1_ Click()    Dim s  As Long    Dim x As Integer    s = 0    for x = 99 To 1 step - 2        s=s+ x    Next x    Print sEnd Sub

选项 A、100
B、500
C、2500
D、5000

答案C

解析 单循环次数“r=int((终值-初值+步长)/步长)”。计算结果是将1~100内的奇数相加。
转载请注明原文地址:https://jikaoti.com/ti/XuO0FFFM
0

最新回复(0)