dim a(49) as boolean
dim b(9) as integer
dim i as integerrandomize
for i=0 to 9
do
b(i)=int(rnd*50)
loop until not a(b(i))
a(b(i)) = true
next i
dim b(9) as integer
dim i as integerrandomize
for i=0 to 9
do
b(i)=int(rnd*50)
loop until not a(b(i))
a(b(i)) = true
next i
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货