Задание массива с переменным количеством элементов - PascalABC.NET

Формулировка задачи:

тут такое дело - в программе предполагается использовать массив, но количество его членов заранее неизвестно. известно, что их где-то 1000 +/- 50. но точно сказать невозможно. есть ли бесчисленные массивы, которые не требуют указания точного количества членов массива? или можно объявить больше членов и некоторые не использовать?

Решение задачи: «Задание массива с переменным количеством элементов»

Листинг программы

var
  A: array of integer; 
  
begin
  var L := random(50); //Длина массива
  SetLength(A, L); //Длину массива устанавливаем равной L 
  writeln;
  for var i := 0 to L - 1 do begin
    a[i] := random(-10, 10);
    write(' ', a[i])
  end;
  readln
end.

Объяснение кода листинга программы

Объявляется массив A типа array of integer (массив целых чисел)
Объявляется переменная L типа integer и инициализируется значением random(50) (случайное число от 0 до 49)
Вызывается функция SetLength(A, L), которая устанавливает длину массива A равной L (переменная L используется как аргумент функции SetLength)
Выводится длина массива A с помощью функции writeln
В цикле for от 0 до L-1 заполняются элементы массива A случайными числами от -10 до 10 с помощью функции random и присваиваются элементам массива a[i]
В каждой итерации цикла выводится текущий элемент массива с помощью функции write
После заполнения массива запрашивается ввод с помощью функции readln