Задание 5 Параграф 8 ГДЗ Босова 11 класс (Информатика)

Ниже вариант решения задания из учебника Босова, Босова 11 класс, Бином:

5. На блок-схеме представлен алгоритм одновременного поиска максимального и минимального значений элементов массива.

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

program Z_8_5;

var

a: array [1..7] of integer;

max, min, i: integer;

begin

for i := 1 to 7 do

read(a[i]);

max := a[1]; min := a[1];

for i := 2 to 7 do

if a[i]

else if a[i] > max then max := a[i];

Writeln(taskmin=task, min, task max=task, max)

end.

Программа: Z_8_5.pas (ссылка ниже)