1樓：匿名使用者
什麼時候要，我可以寫
如何用vb設計乙個程式，隨機產生二十個三位整數
2樓：慶年工坊
sub s()
randomize'初始化隨機變數
for i = 1 to 20'做20次迴圈debug.print int(100 + rnd * 900);'輸出隨機數到立即視窗
next
end sub
3樓：醬爆小鯉魚
樓上連陣列都沒有定義，也沒有把產生的數列印出來……private sub command1_click()dim a%(1 to 20)
randomize
for i = 1 to 20
a(i) = int(rnd * 900 + 100)print a(i);
if i mod 10 = 0 then printnext i
end sub
4樓：若綺彤
for i=1 to 20
randomize
m=int(rnd()*900+100)
next
vb中能不能隨機生成乙個運算符號
5樓：匿名使用者
可以的。只不過路程要曲折一點。
首先使用int(rnd*4)
取得的值是0 1 2 3四個數字可以分別代表+-×÷四個符合
vb題隨機生成100個兩位數整數,並統計出小於等於40,大於等於70 及大於70的資料個數
6樓：叫我阿智
private sub command1_click()dim s(100) as long
for i = 1 to 100
randomize
s(i) = int(rnd() * 90) + 10(因為隨機函式是0.9999..乘方的，所以取整不會出現90+10)
next i
for j = 1 to 100
select case s(j)
case is < 40
xy40 = xy40 + 1
case is >= 70
dydy = dydy + 1
end select
next j
print "隨機產生數中小於40的有： " & xy40print "隨機產生數中等於及大於70的有： " & dydyend sub
7樓：匿名使用者
private sub command1_click()dim suzu(100) as integerrandomize
for i = 1 to 100
suzu(i) = rnd * 89 + 10next
for i = 1 to 100
select case suzu(i)
case 0 to 40
n40 = n40 + 1
case 70
n70 = n70 + 1
case 71 to 100
n71 = n71 + 1
end select
next
print "小於40的個數："; n40print "大於等於70 的個數："; n70 + n71print "大於70的個數："; n71end sub
j**a隨機得到2位整數，用random
8樓：東方憐人
(int)(math.random()*90+10)說明：math.random()這方法會返回乙個(0,1)的double值 ，是隨機的
如果是double a=math.random();
那麼就a<1 && a>0 ，
之後乘以90，返回的是0到90的數，加上10再轉int就會返回10到99的數，也就是得到2位整數。是隨機的
9樓：匿名使用者
int randomint = random.nextint(90) + 10;
幫我解一下這道VB程式設計題 「隨機產生兩位整數，找出其中的最大值 最小值和平均值」幫幫忙啦
望採納private sub command1 click randomize max 0 min 100 print 10個隨機整數為 for i 1 to 10 x int rnd 90 10print x if x max then max xif x min then min xnext i...
vb題隨機生成兩位整數，求出他們的總和及平均數
private sub command1 click dim tt 100 s 10 temp1,temp2,te i randomize 隨機,不使用時,rnd 函式是有規律的 for i 1 to 100 tt i i 用tt陣列存放100個數,不直接用s陣列是為了避免出現重複的數字 next ...
怎麼編寫程式MATLAB,產生兩位隨機整數,輸出其中小
如三秋 根據目的判斷，需要調取到的函式有randi mod mean find，分別用於產生隨機整數 判斷是否為偶數 計算平均數 尋找滿足條件元素的下標。如下 clc clear n randi 10,99 1,20 產生隨機數，在10到99之間的均勻隨機數 a mean n 計算平均數 n fin...