設(shè)有一個(gè)6×6的方陣,VB求方陣中最小的元素的位置和值
設(shè)有一個(gè)6×6的方陣,VB求方陣中最小的元素的位置和值
1.設(shè)有一個(gè)6×6的方陣,其中的元素是隨機(jī)產(chǎn)生的10 - 99 之間的兩位數(shù).分別求出主對角線和次對角線上元素之和,以及方陣中最小的元素的位置和值.(參考課本 p112,例7.6)
要求:
程序運(yùn)行后,單擊“產(chǎn)生”按鈕時(shí),輸出方陣.單擊“計(jì)算”按鈕時(shí),輸出對角線元素之和,以及最小元素的值與位置.
以下是產(chǎn)生6X6二維數(shù)組、輸出方陣、計(jì)算對角線元素之和的部分
Private Sub Command1_Click()
Dim a(5,5) As Integer
For i = 0 To 5
For j = 0 To 5
a(i,j) = Int(90 * Rnd + 10)
Next j
Next i
For i = 0 To 5
For j = 0 To 5
Print a(i,j);
Next j
Print
Next i
For i = 0 To 5
s1 = s1 + a(i,i)
Next i
For i = 0 To 5
s2 = s2 + a(i,5 - i)
Next i
End Sub
怎么把那個(gè)對角線和輸出?怎么確定最小元素的值與位置?
1.設(shè)有一個(gè)6×6的方陣,其中的元素是隨機(jī)產(chǎn)生的10 - 99 之間的兩位數(shù).分別求出主對角線和次對角線上元素之和,以及方陣中最小的元素的位置和值.(參考課本 p112,例7.6)
要求:
程序運(yùn)行后,單擊“產(chǎn)生”按鈕時(shí),輸出方陣.單擊“計(jì)算”按鈕時(shí),輸出對角線元素之和,以及最小元素的值與位置.
以下是產(chǎn)生6X6二維數(shù)組、輸出方陣、計(jì)算對角線元素之和的部分
Private Sub Command1_Click()
Dim a(5,5) As Integer
For i = 0 To 5
For j = 0 To 5
a(i,j) = Int(90 * Rnd + 10)
Next j
Next i
For i = 0 To 5
For j = 0 To 5
Print a(i,j);
Next j
Next i
For i = 0 To 5
s1 = s1 + a(i,i)
Next i
For i = 0 To 5
s2 = s2 + a(i,5 - i)
Next i
End Sub
怎么把那個(gè)對角線和輸出?怎么確定最小元素的值與位置?
數(shù)學(xué)人氣:457 ℃時(shí)間:2020-07-04 16:38:54
優(yōu)質(zhì)解答
Dim a(5,5) As IntegerPrivate Sub Command1_Click()For i = 0 To 5For j = 0 To 5a(i,j) = Int(90 * Rnd + 10)Print a(i,j);Next jPrintNext iEnd SubPrivate Sub Command2_Click()Dim min,x,y,i,jFor i = 0 To 5s ...
我來回答
類似推薦
- VB設(shè)有一個(gè)5*5的方陣,其元素是隨機(jī)生成的小于100的正整數(shù),求方陣中的最大者
- 求VB編程.設(shè)計(jì)一個(gè)5*5的方陣,其中的元素由計(jì)算機(jī)隨機(jī)產(chǎn)生小于100的整數(shù),請求出:1,對角線上元
- 仿照 I imagine (that) a lot of people will come to the food festival.寫四個(gè)句子.
- 現(xiàn)在在高一.初中英語和基本沒學(xué).現(xiàn)在補(bǔ)英語的話能補(bǔ)上么.還有就是我現(xiàn)在有一套新概念.我是以新概念為主還是課本呢.現(xiàn)在學(xué)校發(fā)的題90%看不明白.要是補(bǔ)的話能不能有希望啊.
- 17.Because air pollution has been greatly reduced,this city is still _______.
- 一棵樹在離地面9米處斷裂,樹的頂部落在離底部12米處,這棵樹折斷之前是多少米.
- 一道除法算式中,被除數(shù)加上除數(shù),與商的積是80,被除數(shù)是
- 物體做初速度為零的勻加速直線運(yùn)動(dòng),在第3S、第4S內(nèi)的總位移是1.2M,則第5S內(nèi)的位移是多少?
- 魯迅《雪》閱讀答案,
- 試比較雙子葉植物莖和單子葉植物莖初生結(jié)構(gòu)的不同
- 下列物質(zhì)放置在空氣中,變質(zhì)原因與其他有本質(zhì)區(qū)別的是 Na NaOH Na2SO3 Na2O2
- 下周他將要給朋友寫信 英文
猜你喜歡
- 18(x一6.2)=41.6這方程咋解
- 2請問情態(tài)動(dòng)詞和助動(dòng)詞有哪些 他們有什么區(qū)別?是不是情態(tài)動(dòng)詞和助動(dòng)詞后面都要跟動(dòng)詞原形?
- 3硝酸鉀屬于復(fù)合肥嗎
- 4I'm sure you are b_____ .you can stay at home by yourself.
- 5"瘠"怎么讀
- 6送別同學(xué)的詩歌
- 7________ _________ does it take to go from my home to the school by car?Twenty minutes.
- 8寫一篇英語短文,10句,描述一只動(dòng)物
- 9they的賓格形式
- 10競選班長發(fā)言稿400字左右
- 11有小學(xué)生、中學(xué)生和大學(xué)生共405人參加節(jié)目聯(lián)歡會(huì),他們?nèi)藬?shù)的比是2:三分之一:1.要算式,
- 12英語翻譯