阅读程序: Option Base 1 Private Sub Form_Click( ) Dim arr Sum Sum=0 arr=Array(1,3,5,7,9,11,13,15,17,19) For i=1 TO 10 If arr(i)/3=arr(i)/3 Then Sum=Sum+art(i) End If Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为
题库:计算机等级考试
类型:最佳选择题
时间:2017-07-03 16:31:06
免费下载:《单选题》Word试卷
阅读程序: Option Base 1 Private Sub Form_Click( ) Dim arr Sum Sum=0 arr=Array(1,3,5,7,9,11,13,15,17,19) For i=1 TO 10 If arr(i)/3=arr(i)/3 Then Sum=Sum+art(i) End If Next i Print Sum End Sub 程序运行后,单击窗体,输出结果为
A.13
B.14
C.27
D.15
本题关键词:阅读训练,阅读中枢,程序,阅读新知法,小儿阅读障碍,阅读理解策略,工程施工程序,复苏程序,工作程序,建设程序;