Ввод

Значения элементов массива можно ввести следующими способами: 

- Ввод значений элементов с клавиатуры.
- Присваивание значений элементам массива в разделе констант.
- Считывание значений элементов из файла.

Ввод значений элементов с клавиатуры

С использованием цикла с параметром:

for i:=1 to n do read (a[i]);

Если заранее неизвестно количество элементов массива, то ввод элементов массива можно организовать с помощью циклов с предусловием или постусловием. Например, необходимо вводить элементы массива, до тех пор пока их сумма не превысит 100: (.pas) - с предусловием , (.pas) - с постусловием.

С использованием цикла с предусловием:

while (условие) do
begin
i:=i+1;
readln(a[i]);
/ изменение параметра, входящего в условие/
end;

С использованием цикла с постусловием:

repeat
i := i + 1;
readln(a[i]);
/ изменение параметра, входящего в условие/
until (условие);

Присваивание значений элементам массива в разделе констант

сonst имя массива: array [тип индекса] of тип элементов = (список элементов);

Например:

const a: array[1..5] of integer=(15,5,7,2,1);

Считывание значений элементов из файла

for i:=1 to n do read (f,a[i]);