Question

Решить задачу в pascalABC : Даны пять чисел. Определить наименьшее из этих чисел. Для проверки: Вход  1)1,   2,   3,   4,   5;   2) 2,   -3,   3,   4,   5 3)    -1,   -2,   -5,  0,  1 4) 0,  5,   -3,   -7,  7 5)-3,  -4,  -5,  9,  -10
Выход   1)1 2)-3 3)  -5  4) -7 5) -10

Answer 1

//PascalABC.Net 3.1 сборка 1200
begin
  var a:=ReadArrInteger(5);
  writeln(a.Min);
end.