1、VB補充習題數組1. 隨機生成15個100以內的正整數并顯示在一個文本框中,再將所有對稱位置的兩個數據對調后顯示在另一個文本框中（第1個數與第15個數對調，第2個數與第14個數對調，第3個數與第13個數對調）。2. 隨機生成20個100以內的兩位正整數，統計其中有多少個不相同的數。3. 20個兩位隨機正整數圍成一圈，找出每四個相鄰數之和中的最大值，并指出是哪四個相鄰的數。4. 隨機生成一個5×5的整數矩陣，該矩陣的副對角線（矩陣左下角到矩陣的右上角連線）上方元素都是兩位偶數，副對角線和它的下方元素都為奇數。5. 設有一個二維數組A(5,5)，試編寫程序計算：a) 所有元素之和；b)

2、所有靠邊元素之和；c) 兩條對角線元素之和。6. 利用隨機函數生成一個由兩位正整數構成的4行5列的矩陣，求出矩陣行的和為最大和最小的行，并調換這兩行的位置。7. 隨機生成20個1050之間的互不相同的整數，并求出它們的平均值。8. 找出100以內的所有素數，存放在數組Prime中，并將所找到的素數按每行10個的形式顯示在窗體上。9. 求出裴波拉契數列的前20項，并按順序將它們顯示在一個文本框內。裴波拉契數列的遞推公式如下：10. 分別用選擇法、直接法和冒泡法對20個數進行排序。11. 在一個隨機數組中，按順序查找是否存在要查找的數。12. 利用二分查找法，在一個已經排好序的數組中，查找是否存在

3、需要找的數。13. 求一個n×n階的轉置矩陣。n從鍵盤輸入，A矩陣和它的轉置矩陣本別顯示在兩個文本框中。14. 設A是3×2的矩陣，B是2×3的矩陣，求A矩陣和B矩陣的乘積矩陣C=A·B。15. 有一個二維數組，找到不同行、不同列的三個數組元素的乘積最大的一組，并將這三個元素按下面的形式打印出來。A(1,x)=xx A(2,x)=xx A(3,x)=xx45678923549989592916. 編寫打印N階幻陣的程序。幻陣是由1N2個自然數組成的奇次方陣（N是一個奇數），方陣的每一行、每一列及兩條對角線上的元素和相等。幻陣的編排規律如下（假定幻陣名為A

4、）：（1）1放在最后一行的中間位置。即I=N，J=（N+1）/2，A（I，J）=1。（2）下一個數放在前一個的右下方，即A（I+1，J+1）。 （a）若I+1>N，且J+1N，則下一個數放在第一行的下一列位置。 （b）若I+1N，且J+1>N，則下一個數放在下一行的第一列位置。 （c）若I+1>N，且J+1>N，則下一個數放在前一行的上方位置。 （d）若I+1N，且J+1N，但右下方位置已存放數據，則下一個數放在前一個數 的上方。(3)重復第二步，直到N2個數都放入方陣中。下面是一個3階幻陣示例：49235781617. 對N階方陣A中的與副對角線平行的各條斜線（共有2N-1條，如下圖所示）上的元素進行累加求和并進行比較，求出累加和的最大值Max以及具有最大值的斜線上的最大元素。572241242696494918. 隨機生成10個兩兩互質的數，并按從大到小的順序存放在ListBox中。所謂“兩兩互質”，就是指任意兩個數除了1以外沒有其他的公約數。在使用列表框時可以把它的List屬性當作數組一樣看待。除第一個隨機數以外，每當生成一個4位的隨機整數，都要驗證這個數和列表框中每個列表項是否互質。若不互質，則丟棄它；若互質