Найти наибольшее из 10 чисел вводимых с клавиатуры. Программировать ** языке Pascal

Question

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

Answer 1

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

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

Пример
Введите 10 чисел: 45 23.4 -24 0 163 -32 12 45 -12 100
Max=163