close

如果你想要小額 借貸

不管是更快速的小額 借貸

還是利息更低的小額 借貸

 

歡迎來我推薦的銀行貸款免費諮詢管道洽詢:

https://goo.gl/2hr9j4

  

標題:小額信貸比較

小額貸款公司請問二維陣列的方陣?

發問:

利用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
arrow
arrow

    l33vn35l 發表在 痞客邦 留言(0) 人氣()