Найти наибольшее из 10 чисел вводимых с клавиатуры. - вопрос №799567410 от Androchshuk15 18.10.2020 20:33

Question

Информатика: Найти наибольшее из 10 чисел вводимых с клавиатуры. программировать на языке pascal

Androchshuk15 · Answer

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