Ввод одномерного массива в память компьютера

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

В языке Паскаль нет средств ввода-вывода всего массива целиком, поэтому ввод и вывод массивов выполняется поэлементно. Словесно можно описать шаг ввода одномерного массива следующим образом:

ввести элемент А[1];

ввести элемент А[2];

….

ввести элемент А[N].

Таким образом, индекс вводимого элемента изменяется от 1 до N с шагом 1. Очевидно, что для реализации ввода массива необходимо выбрать структуру цикла. Блок-схема ввода массива представлена на рисунке 3.

Рис.3

На языке ТурбоПаскаль ввод одномерного массива реализуется следующим фрагментом программы:

Program ABC;

const

LEN = 100; {максимальная длина массива}

var

А : array [1. .LEN] of real; {объявление массива, состоящего из 100 вещественных чисел}

i,N : integer; {i — индекс, N — требуемая длина массива}

BEGIN

write (‘Введите длину массива N =');

read(N);

for i:=1 to N do

begin

write(‘A[‘ , i , ‘]=' );

read (A [i])

end;

…

END.

В дальнейшем заголовок и раздел описания программы приводить не станем. Фрагменты программ, описанные в примерах, следует располагать в требуемом месте раздела исполняемых операторов приведённой здесь программы.