用vb編寫*利用隨機(jī)函數(shù)產(chǎn)生20個(gè)10~99之間（包括10和99）的隨機(jī)整數(shù)存入一維數(shù)組A？“只需在窗體中添加一個(gè)獲取私有子命令的命令1Click（）CLS Dima（1to20），B（1to19）r

用vb編寫*利用隨機(jī)函數(shù)產(chǎn)生20個(gè)10~99之間（包括10和99）的隨機(jī)整數(shù)存入一維數(shù)組A？

“只需在窗體中添加一個(gè)獲取私有子命令的命令1Click（）CLS Dima（1to20），B（1to19）randomize print ”隨機(jī)生成的組的數(shù)目是：“forI=1to20 a（I）=int（RND*90）10 printa（I）IFI=10 thenprint next print ”這個(gè)組的數(shù)目按從大到小的順序排列，每10個(gè)人一條線，輸出如下：“forI=1到20 forj=I 1到20 IFA（I）<A（J）然后t=a（I）：a（I）=a（J）：a（J）=t ENDIF next print a（I）ifimod10=0然后print next forI=1到19 B（I）=a（I）-a（I 1）next X=B（1）forI=1到19 IFX<B（I）然后X=B（I）next print（數(shù)學(xué)。地板（（100-11）*RND（））1

J=1

對于I，整數(shù)=60到10步-10

隨機(jī)加數(shù)=cint（數(shù)學(xué)。地板（（（I-1）-（I-10）1）*Rnd（））（I-10）

隨機(jī)數(shù)（J）=隨機(jī)數(shù)（J-1）隨機(jī)加數(shù)

J=J 1

下一個(gè)

但是只有五個(gè)循環(huán)才能形成六個(gè)隨機(jī)數(shù)。其余的隨機(jī)數(shù)你有什么要求嗎？它們真的是隨機(jī)的嗎？