arrays - Pascal - 在数组中硬编码数据 - 快捷方式

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.

希望这对其他人也有用。