VB程序设计题——随机产生20个大于0小于100的整数,并分别计算出所有奇数和所有偶数的和.

发布时间：2021-03-12 13:27:25

VB程序设计题——随机产生20个大于0小于100的整数,并分别计算出所有奇数和所有偶数的和.

网友回答

private sub mand1_click()
dim js,os,i,a
for i=1 to 20
a=int(Rnd*99)+1
if a mod 2=0 then js=js+i else os=os+i
nextprint 奇数之和= & js
print 偶数之和= & os
end sub
以上问题属网友观点，不代表本站立场，仅供参考！