Ввод массива

Ввод массива

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

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

Var

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

i : byte; {переменная i как индекс массива} Begin

For i:=1 to 10 do

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

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

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

Var

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

Begin

For i :=1 to 10 do

A [   i   ]:=   random   (50)-25;   {i-му   элементу   массива

присваивается «случайное» целое число в диапазоне от 0 до 49 с вычетом 25, т.е. окончательный диапазон от -25 до 24} .