close
如果你想要小額 借貸
不管是更快速的小額 借貸
還是利息更低的小額 借貸
歡迎來我推薦的銀行貸款免費諮詢管道洽詢:
標題:小額信貸比較
小額貸款公司請問二維陣列的方陣?
發問:
利用3*3的方陣輸入9個數,再將元素x(i,j)與x(j,i)互換.並輸出結果!! 147 258 369 變成 123 456 789
最佳解週轉小額信貸試算答:
喔...有邏輯陷阱...換過去還會換回來...嗯...解決方法 雙陣列 Dim a(2, 2) As Integer Dim b(2, 2) As Integer Dim v As Integer '原本形狀 v = 0 For i = 0 To 2 For j = 0 To 2 v = v + 1 a(j, i) = v Next j Next i '觀看 j = 0 For i = 0 To 2 Print a(i, j) & a(i, j + 1)小額借款高雄 & a(i, j + 2) Next i Print '更改 For i = 0 To 2 For j = 0 To 2 b(i, j) = a(j, i) Next j Next i '觀看 j = 0 For i = 0 To 2 Print b(i, j) & b(i, j + 1) & b(i, j + 2) Next i 單陣列 會有換回的問題 要留意阿@@
其他解答五萬小額借款:
For i = 1 To 3 For j = 1 To 3 If j > i Then swap a(i, j), a(j, i) Next Next Swap程式碼 Private Sub swap(ByRef a As Integer, ByRef b As Integer) Dim t As Integer t = a a = b b = t End Sub 另外輸出的程式碼 For i = 1 To 3 For j = 1 To 3 Debug.Print a(i,代書貸款利息 j), Next Debug.Print Next 2008-11-29 08:55:05 補充: 補充說明,有關輸入部份 For i = 1 To 3 For j = 1 To 3 msg = "輸入陣列第 " & CStr(i) & " 列, 第 " & CStr(j) & " 行的元素" a(i, j) = InputBox(msg, "輸入", 0) Next Next 要記得宣告二維陣列 dim a(1 to 3,1 to 3) as integer
公教信用貸款201736FCEAEDDDC30B34
文章標籤
全站熱搜
留言列表