pascal - 定义未知数量的变量

Question

很久以前遇到一个问题:如果我需要制作一个使用变量的小程序，你如何定义和未知变量的数量？。

即，如果您有一个要求用户输入数字的程序，那么用户输入的数字就是程序中所需的变量数量。在 Java 或 VB 中很容易解决这个问题，因为您可以根据需要定义变量(在旅途中)，但是 pascal 使您在主程序代码启动之前声明它们，因此您不能使用此技巧。

我在考虑一个多维数组，但我认为这是解决这个问题的一种糟糕方法，因为如果你定义的“正方形”比你需要的少，你就会变得很短，如果你定义的比实际要使用的多，那么你就会浪费内存...

那么，如何定义未知数量的变量？

Answer 1

您可以使用 SetLength 动态调整数组大小

Type 
  TByteArray = Array of Byte;

Var
  Data : TByteArray
  NewSize : Integer;
Begin
  Write('Enter the number of bytes you require: ');
  ReadLn(NewSize)
  SetLength(Data, NewSize);
  ...
End;

请原谅任何语法错误，我已经 20 多年没有使用 Pascal 了。多么棒的语言!