Ввод массива

Для того чтобы ввести значения элементов массива, необходимо последовательно изменять значение индекса, начиная с первого до последнего, и вводить соответствующий элемент. Для реализации этих действий удобно использовать цикл с заданным числом повторений, т.е. простой арифметический цикл, где параметром цикла будет выступать переменная – индекс массива. Значения элементов могут быть введены с клавиатуры или определены с помощью оператора присваивания.

Например (рассмотрим фрагмент программы),

Var

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

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

Begin

For i:=1 to 10 do

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

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

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

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

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

Например,

Var

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

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

Begin

...................

For i:=1 to 10 do

Writeln (‘a[‘, i,’]=’, a[i]); {вывод элементов массива в столбик}

На экране мы увидим, к примеру, следующие значения:

a[1]=2

a[2]=4

a[3]=1 и т.д.