有下面程序代码： Private Sub Commandl_Click() a=3：s=0 For k=1 To 5 s=s+a Mod k：a=a+k Next k Print S End S

admin2020-04-18 33

问题有下面程序代码：
Private Sub Commandl_Click()
a=3：s=0
For k=1 To 5
s=s+a Mod k：a=a+k
Next k
Print S
End Sub
程序运行后，单击命令按钮Command1，输出结果是

选项 A、15
B、13
C、4
D、1

答案C

解析在For循环中k的值从1变化到5，在每次循环中为累加和变量s累加上a Mod k的值然后令a自加k，故此整个循环过程中s=0+0+0+1+3=4。

转载请注明原文地址:https://kaotiyun.com/show/VgTp777K

二级VB

相关试题推荐

随机试题

最新回复(0)