Сформировать и вывести на экран массив элементов которого заданы датчиком случайных чисел на интервале [-56;26] (размер произвольный) Паскаль

Предыдущий
вопрос Следующий
вопрос

program RandomArray;

var
arr: array of Integer;
i: Integer;

begin
Randomize;

SetLength(arr, 10); // Указываем размер массива

// Заполняем массив случайными числами в диапазоне [-56; 26]
for i := 0 to Length(arr) - 1 do
begin
arr[i] := Random(83) - 56; // 83 - (26 - (-56) + 1)
end;

// Выводим массив на экран
writeln('Random Array:');
for i := 0 to Length(arr) - 1 do
begin
writeln(arr[i]);
end;

end.