Как создать динамический массив? - PascalABC.NET

Узнай цену своей работы

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

Ребят, как создать примерно такой динамический массив
при компиляции программа выдает ошибку, то, что N должен быть константой. Как сделать массив динамическим?

Решение задачи: «Как создать динамический массив?»

textual
Листинг программы
program pr;
 
var
  i, n: integer;
  mas: array of integer;     // объявляем динамический массив
 
begin
  writeln('Введите размер динамического массива');
  readln(n);
  setlength(mas, n);        // устанавливаем размер массива,равный введённому n
  for i := 0 to n - 1 do      // цикл заполнения с 0 до n-1 (потому что в динамическом массиве нумерация идёт с 0)
  begin
    mas[i] := random(10);      // заполняем случайными числами( в данном случае от 0 до 9)
    write(mas[i]:3);           // выводим
  end;
end.

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

  1. Объявляем переменные i, n типа integer.
  2. Объявляем динамический массив mas типа array of integer.
  3. Запрашиваем у пользователя размер массива и сохраняем его в переменной n.
  4. Устанавливаем размер массива с помощью функции setlength(mas, n).
  5. Заполняем массив случайными числами от 0 до 9 с помощью цикла for и присваивания mas[i] := random(10).
  6. Выводим значения массива с помощью функции write(mas[i]:3).
  7. Завершаем программу.

Оцени полезность:

5   голосов , оценка 4.6 из 5
Похожие ответы