Даны три числа. Найти наибольшее из них, с учетом того, что некоторые из них могут быть...

Question

Даны три числа. Найти наибольшее из них, с учетом того, что некоторые из них могут быть равны. Pascal

Answer 1

// PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018

// Внимание! Если программа не работает, обновите версию!

begin

 ReadSeqReal(3).Max.Println

end.

Пример

7.23 4.1 7.23

7.23