1樓：和倫門綢
rnd()
'隨機數函式
生成某個範圍內的隨機整數，可使用以下公式：
int((upperbound
-lowerbound+1)
*rnd
+lowerbound)
這裡，upperbound
是隨機數範圍的上限，而
lowerbound
則是隨機數範圍的下限。
"由小到大的順序排列,由大到小的順序排列"
要用到陣列氣泡排序了
生成隨機數的多少,判斷是否"偶數","奇數","素數"及存入相應陣列這個寫段判斷程式吧
2樓：冠玉花佴壬
dima(80),
b,c,
d,f,
hpublic
function
ss()
printc=
0print
"素數是:"
forb=1
to80
ifa(b)
mod2
<>0and
a(b)
mod3
<>0and
a(b)
mod5
<>0and
a(b)
mod7
<>0then
a(b);d=
d+a(b)c=
c+1if
cmod10=
0then
endif
endif
next
"素數個數是:"&c
"素數的和是:"&d
endfunction
private
subcommand1_click()
clsprint
"產生80個10～99之間的隨機整數是:"
randomize
forb=1
to80
'隨機函式產生80個10～99之間的隨機整數a(b)
=int((rnd
*90)
+10)
a(b);ifb
mod10=0
then
endif
next
'偶數由小到大
forb=1
to80
forc=b
to80
ifa(c)
>a(b-
1)thend=
a(b-
1)a(b-1)
=a(c)
a(c)=d
endif
next
next
"偶數由小到大"
forb=1
to80
ifa(b)
mod2=0
then
a(b);f=
f+1if
fmod10=
0then
endif
endif
next
'奇數大到小
forb=1
to80
forc=b
to80
ifa(c)
1)thend= a(b- 1)a(b-1) =a(c) a(c)=d endif next next print print "奇數大到小" forb=1 to80 ifa(b) mod2 <>0then print a(b);h= h+1if hmod10= 0then print endif endif next ss '呼叫function函式過程 endsub 加個來判斷 自就可以了 srand int time null int t 0 while 1 t就是要用的值了。範圍可以自抄己輸入，可以bai 產生乙個隨機數。先輸入du大的，再輸入小的。zhi include include include using namespace std int mai... 通常隨機數使用都是帶兩個引數的 例 ro.next 1,5 1為下限 包括 5為上限 不包括 結果為產生1 4的隨機數 所以你那個只會是0 public virtual int next int maxvalue 引數maxvalue 要生成的隨機數的上界 隨機數不能取該上界值 maxvalue 必... dim str as string temp as integer 0,sum as integer 0 dim a 10 as integer for i 1 to 10 a i int rnd 99 1 sum sum a i next textbox6.text 這 bai10個數 du的zh...c 生成隨機數，c 生成隨機數
c產生隨機數的問題
vb求取1 100之間的隨機數,並求平均值