Составить программу которая находит наибольшее - вопрос №7387358 от shuius 07.04.2022 20:04

Question

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

shuius · Answer

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