Составить программу которая находит наибольшее и наименьшее число из четырех...

Question

Составить программу которая находит наибольшее и наименьшее число из четырех введенных:)))) ребят прошу очень надо хоть на паскале хоть на бейсике

Answer 1

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

begin
  var a:=ReadArrReal(4);
  Writeln('Max=',a.Max,', min',a.Min)
end.

Пример:
-45.4 18 0 4.17
Max=18, min-45.4