Программирование алгоритмов обработки одномерных массивов

Цель работы: научиться разрабатывать и отлаживать программы с использованием регулярных типов (векторов).

Массив - упорядоченная структура однотипных данных, хранящихся последовательно.

Массив обязательно имеет размеры, определяющие, сколько в нем хранится элементов. Описывается в разделе TYPE (или VAR). Структура описания одномерного массива:

<имя>=ARRAY[диапазон_индексов] OF <базовый_тип>;

Диапазон указывает значения индексов первого и последнего элементов в массиве.

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

Program lr6_1;

const a: array[1..10] of integer=(5,2,7,1,8,3,4,5,6,6);

var i, min, n: integer;

begin

min:=a[1];

n:=1;

for i:=2 to 10 do

if a[i]<min then

begin

min:=a[i];

n:=i;

end;

writeln('минимальный элемент равен ',min, ' n=',n);

end.

Если элементы массива вводятся с клавиатуры, то текст программы изменится:

program lr6_2;

var a: array[1..10] of integer;

i, min, n: integer;

begin

read(a[1]);

min:=a[1];

n:=1;

for i:=2 to 10 do

begin

read(a[i]);

if a[i]<min then

begin

min:=a[i];

n:=i;

end;

end;

writeln('минимальный элемент равен ', min, ' n=',n);

end.