Пример фрагмента программы ввода массива Паскаля

Var

  A: array [1..10] of integer;

  I: byte; {переменная I вводится как индекс массива}

Begin

  For i:=1 to 10 do

Readln (a[i]); { ввод i- го элемента производится с клавиатуры }

Теперь рассмотрим случай, когда массив Паскаля автоматически заполняется случайными числами, для этого мы будем использовать функцию random (N)^[3].

Пример фрагмента программы заполнения массива Паскаля случайными числами

Var

  A: array [1..10] of integer;

  I: byte; {переменная I вводится как индекс массива}

Begin

  For i:=1 to 10 do

A [ i ]:= random (10); { i -му элементу массива присваивается «случайное» целое число в диапазоне от 0 до 10}

Вывод массива Паскаля

Вывод массива в Паскалетакже осуществляется поэлементно, в цикле, где индекс является параметром массива, принимая все значения от первого до последнего подряд.

Пример фрагмента программы вывода массива Паскаля

Var

  A: array [1..10] of integer;

  I: byte; {переменная I вводится как индекс массива}

Begin

  For i:=1 to 10 do

Write (a [ i ],' '); {вывод массива осуществляется в строку, после каждого элемента печатается пробел}

Вывод можно сделать в столбце с соответствующим индексом. Но в этом случае вам необходимо учитывать, что при большом размере массива все элементы могутне уместиться на экране, и произойдет прокрутка, т. e. При заполнении всех строк экрана будет напечатан следующийэлемент и верхний будет смещен с экрана.