arrays - 如何根据索引简洁地分配数组值？

Question

Xaxis:array[1..10] of integer;
begin 
Xaxis[1] :=10;
Xaxis[2] :=20;
Xaxis[3] :=30;
Xaxis[4] :=40;
Xaxis[5] :=50;
Xaxis[6] :=60;
Xaxis[7] :=70;
Xaxis[8] :=80;
Xaxis[9] :=90;
Xaxis[10] :=100;

有没有一种更简单、更快捷的方法来为这个在 pascal 中的数组声明值？

Answer 1

使用 for 循环：

for num := 1 to High(Xaxis) do 
begin
  Xaxis[num] := num * 10
end;

但首先请务必将“num”声明为整数。

Answer 2

您还可以通过编写预初始化数组

const
 Xaxis: array[1..10] of integer = (10, 20, 30, 40, 50, 60, 70, 80, 90, 100);

当没有简单的算术函数来初始化数组时，这种方法会更好。如果您编写了 xaxis[1]:= 5、xaxis[2]:= 14、xaxis[3]:= 29 等，那么循环将不适合。

Answer 3

使用循环。我忘记了帕斯卡的语法，但类似Xaxis[index] := index * 10;循环内部的东西会起作用。