由n行數字組成的數字三角形如圖所示。設計一個算法,對于由n行數字組成的數字三角形(數字范圍[1,50],計算從三角形的頂至底的路徑經過的數字和的最大值,每一步可以從當前點走到左下方的點也可以走到右下方的點。

尋求路徑最大值的算法設計如下:
按三角形的行劃分,若有n行,則有n-1個步驟
①從底層開始,本身數即為最大值
②倒數第二層的計算取決于底層的數據:
12+6=18,13+14=27,24+15=39,24+8=32;
③倒數第三層的計算取決于底二層的數據:
27+12=39,39+7=46,39+26=65;
④倒數第四層的計算取決于底三層的數據:
46+11=57,65+8=73;
⑤最后的路徑:13-8-26-15-24其和為86。
根據上述算法描述,設計程序界面如圖所示,點擊“生成金字塔”按鈕,在列表框中生成數字金字塔,點擊“尋求路徑最大值”按鈕,在文本框text1中輸出最大值。

依據上述描述設計如下VB程序:
Constn=5
DimsxAsString
Dimi,j,k,a(1To100)AsInteger
PrivateSubCommand1_Click ( )
List1.Clear
Fori=1Ton
Forj=1Toi
a((i-1)*n+j)=Int(Rnd*50)+1a((i-1)*n+j)=Int(Rnd*50)+1
sx=sx+Str(a((i-1)*n+j))
Nextj
Fork=nToiStep-1
sx=″″+sx
Nextk
List1.AddItemsx
sx=″″
Nexti
EndSub
PrivateSubCommand2_Click ( )
Fori=nTo1Step-1
Forj=2Toi
Ifa((i-1)*n+j-1)>a((i-1)*n+j)a((i-1)*n+j-1)>a((i-1)*n+j)Then
a((i-2)*n+j-1)=a((i-1)*n+j-1)+a((i-2)*n+j-1)
Else
a((i-2)*n+j-1)=a((i-1)*n+j)+a((i-2)*n+j-1)
EndIf
Nextj
Nexti
Text1.Text=a(1)Text1.Text=a(1)
EndSub
請回答下列問題:
(1)若數字金字塔如圖
,輸出路徑最大值是3030。
(2)請在①②③橫線處填入合適的代碼。
【考點】應用程序的試運行和保存.
【答案】a((i-1)*n+j)=Int(Rnd*50)+1;a((i-1)*n+j-1)>a((i-1)*n+j);Text1.Text=a(1);30
【解答】
【點評】
聲明:本試題解析著作權屬菁優網所有,未經書面同意,不得復制發布。
發布:2024/6/27 10:35:59組卷:0引用:1難度:0.3
相似題
-
1.大部分社交軟件都有好友推薦的功能,當用戶 A 和用戶 B 的共同好友數量超過閾值 p 時,由系統向用戶 A 推薦用戶 B。
編寫 VB 程序,實現好友推薦功能。運行程序,列表框 Listl 中顯示用戶 id 及好友列表,在文本框 Textl 中 輸入推薦目標用戶 id,在文本框 Text2 中輸入閾值 p,點擊“推薦”按鈕,在列表框List2 中顯示用戶之間的關系,在標簽 Label5 中顯示向目標用戶推薦的好友列表。程序運行界面如圖:
(1)根據如圖所示數據,若輸入用戶 id 為“3”,輸入閾值為“3”,則推薦好友為:
(2)實現上述功能的 VB 程序如下,請在橫線處填入合適的代碼。發布:2025/1/2 10:30:2組卷:0引用:1難度:0.3 -
2.某學校開展了藝術節活動,數組a中存儲了n個節目的編號和得分數據,數組存儲結構如圖所示:
小明使用選擇排序思想對上述n個節目按得分進行降序排序(得分相同的按編號升序排列),并依據得分插入各個節目的排名信息,處理后數組a的存儲結構如圖所示:
程序運行時,單擊命令按鈕Command1后讀取數據到數組a中并顯示在列表框List1中,單擊命令按鈕Command2后將節目按照上述規則進行排序,并將排名結果顯示在列表框List2中。
實現上述功能的VB程序如下,請回答下列問題:
(1)已知窗體名稱為Forml,要使程序加載時,窗體標題自動顯示為“第15題程序”,則可在
(2)請在橫線處填入合適的代碼。
(3)加框處代碼有誤,請改正。發布:2025/1/2 10:30:2組卷:0引用:1難度:0.3 -
3.小明用python語言中對大小為100*100像素的圖像“上.jpg”(如圖所示)進行簡單處理,部分代碼如圖:
程序執行后的圖像效果是( )A. B. C. D. 發布:2024/12/20 9:30:2組卷:3引用:5難度:0.4