1樓:匿名使用者
private sub ***mand1_click()randomize
dim a(9) as integer
dim min as integer, mini as integer
for i = 0 to 9
a(i) = int(rnd() * (100 - 60 + 1)) + 60
if min < a(i) then
min = a(i)
mini = i
end if
next
print "陣列下標為" & mini; "的數字最專小,屬為:" & min
end sub
vb程式設計題,定義一下有20個元素的一維陣列,使用inputbox函式為陣列中的所有元素賦值,並顯示
2樓:匿名使用者
dim a(1 to 20) as integerprivate sub form_click()mx = a(1)
mn = a(1)
for i = 1 to 20
a(i) = inputbox("輸入一來個數自值", "輸入")if a(i) > mx then mx = a(i)if a(i) < mn then mn = a(i)next
print "最大值是
" & mx & ",最小值是" & mnend sub
3樓:匿名使用者
dim a(20)
dim i,j,k
for i=0 to 19
a(i) = inputbox("輸入第
baidu"& i + 1 &"個資料
:zhi")
if i=0 or j>a(i) thenj = a(i)
end if
if i=0 or k小
dao="& j &",最回
大答="& k )
初一解方程去分母的計算題
舉例說明吧 例1 2x 1 3 3x 5 4 這樣的方程是一個比例式的形式,所以有交叉相乘積相等的結論,則上式可變為 4 2x 1 3 3x 5 例2 2x 1 3 x 2 5 3x 5 4這樣的有分母的方程,去分母就需要在等號兩邊同乘以3 4 5的最小公倍數60,結果原方程變為 20 2x 1 1...
一道物理電功率的計算題
先算電阻,r u 2 p r1 12 r2 18 兩燈串聯,電壓與電阻成正比。u1 u2 r1 r2 2 3故,取u1 6v,u2 3 2 u1 9v 甲正常發光 電源電壓為,u u1 u2 15v 若取u2 18v,u1 9v,甲燈就會燒壞 功率也與電阻成正比,p1 p2 2 3 並聯時,電壓仍取...
經濟學的計算題,關於供求的,一個經濟學的計算題,關於供求的
假使 不變的情況下,100個酗酒者每月消費3000瓶酒,500個偶爾飲酒者消費3000瓶酒。所以當情況1發生時,會發生供不應求。2發生時,需求 彈性 需求變動率 漲價 原 酗酒者需求變動率 0.5 4 10 20 偶爾飲酒者需求變動率 1.5 4 10 60 所以每月這個城市的銷量變為2400瓶 1...