Pascal. Задание: вывести на экран меньшее из 5 чисел

// PascalABC.NET 3.2, сборка 1485 от 15.06.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln('min=',ReadSeqReal('Введите 5 чисел:',5).Min)
end.

Пример
Введите 5 чисел: 3.18 0 -1.15 -2.6 1.15
min=-2.6

Ну а если у тебя не PascalABC.NET, а Free Pascal  либо Turbo Pascal  то на скринах есть несколько вариантов реализации это программки, на первой через массив, на 2-ой через цикл For и на третьей просто перебором критерий. Так что избирай кокой тебе больше подходит