隨機(jī)函數(shù)生成器 用vb編寫*利用隨機(jī)函數(shù)產(chǎn)生20個(gè)10~99之間(包括10和99)的隨機(jī)整數(shù)存入一維數(shù)組A?
用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人一行,輸出如下:“forI=1to20 forj=i1to20 IFA(I)<A(J)then t=a(I):a(I)=a(J):a(J)=t ENDIF next print a(I)ifimod10=0 then print next forI=1to19 B(I)=a(I)-a(i1)next X=B(1)forI=1to19 IFX<B(I)thenx=B(I)next print