Pascal：通過編號讀取輸入號碼

Question

簡單的問題，但奇怪的是，我還沒有找到任何簡單的解決方案呢： 我想存儲輸入「1234」（不帶引號）到一個數組，這樣每個數字作爲一個整數存儲到一個單獨的位置（即數組[1]將等於1等）。

順便說一句（它可能有一些幫助，或可能建議採用不同的解決方案），我正在做一些簡單的排列操作（詞典排序等），所以我想單獨使用這些數字來操作。

謝謝！

Answer 1

Var 
s   :String; 
myArray : Array[1..20] of Boolean; 
code :integer 
Begin 
s := "1234"; 
For i := 1 to length(s) do 
Begin 
    Val(s[i], myArray[i], code); 
End; 
End.