帕斯卡尔 - 硬编码在阵列中的数据 - 快捷

Question

这是我想做什么：

T[1]:=5; 
T[2]:=3; 
. 
. 
. 
T[9]:=20; 

是否有一个快捷方式实现这一目标，我可以在单行分配值？

Answer 1

我无法在任何文档中找到这个，但我试过这个，它的工作原理！

这里有一个完整的示例中使用的方法：

Program StrangeArray; 

Var T: Array[1..5] of Integer = (554,434,144,343,525); 
    x:integer; 

Begin 
For x:=1 to 5 Do 
    Begin 
    Writeln(T[x]); 

    End; 

End. 

希望这是对别人有用。