Массивы в Паскаль

Массивы в  Паскаль.

Когда нужно использовать однотипные объекты в программах Паскаль используются массивы. У каждого массива есть уникальное имя. Массив состоит из элементов, обращение к каждому элементу  массива в паскале осуществляется с помощью номера элемента его индекса.

Объявление массива в Паскаль

var НазваниеМассива: array[начальныйИндекс..конечныйИндекс] of типДанных;

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

Для задания значений элементов массива можно использовать цикл For и запрашивать значение каждого элемента с клавиатуры.
Пример задания массива с клавиатуры в Паскаль
var a : array[1..3] of integer;
var i: integer;
begin
For i := 1 to 3 do
begin
readln(a[i])
end
end.

Алгоритм поиска минимального значения массива в Паскаль.
Нужно с помощью цикла For перебрать все элементы массива и каждый элемент сравнить с текущим минимумом. Если текущий элемент меньше текущего минимума, то этот элемент становится текущим минимумом.
Алгоритм поиска максимального значения массива в Паскаль
Аналогично, для поиска максимального значения нужно перебрать и сравнить каждый элемент с текущим максимумом. Если текущий элемент больше текущего максимума, то текущий максимуму  присваивается значение  этого элемента массива
Пример программы на Паскаль поиск минимального и максимального элемента массива
// объявляем массив и переменные
// массив с целыми числами
var a : array[0..8] of integer;
// переменная для цикла
var i: integer;
// минимальное и максимальное значение
var min, max: integer;
// начало программы
begin
// задаём все элементы массива с клавиатуры
For i := 0 to 8 do
begin
writeln('Введите элемент массива под номером ', i);
readln(a[i]);
end;
// присваиваем мин и макс значение первому элементу
min := a[0];
max := a[0];
// перебираем все элементы массива
For i := 0 to 8 do
begin
// поиск минимального элемента
If a[i] < min then
begin
min := a[i]
end;
// поиск максимального элемента
If a[i] > max then
begin
max := a[i]
end;
end;
// выводим мин и макс элементы на экран
writeln('Минимальный элемент массива - ', min);
writeln('Максимальный элемент массива - ', max);
end.

Вернуться к содержанию курса Паскаль 

Полезно почитать по теме массивы в паскале

Игра камень ножницы бумага на паскале с выигрышной стратегией

Поделиться: