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

时间:2012-02-19 03:44:17

标签: arrays pascal freepascal static-initialization

这是我正在尝试做的事情:

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

是否有实现此目标的快捷方式,我可以在一行中分配值?

1 个答案:

答案 0 :(得分: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.

希望这对其他人也有用。