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

Question

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

Answer 1

// 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

Answer 2

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

---

---

---