当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 以下程序的功能是从随机产生的20个20~200(含20和200)的整数中,找出能够同时被3和5整除的数的最大值,并显示出来。请填空。Option Base 1Private Sub Command1_Click( )Dim a(20) As Integerm =0For i=1 To 20a(i)=Int(Rnd * ())+20If a(i) Mod 3 = 0() a(i) Mod 5=0 ThenIf a(i) >m Then m=a(i)End IfNextIf ()ThenPr

  

参考答案:

And

  参考解析

微信端