Даны 3 числа a,b,c.Найти наибольшее из a и b.Затем вычислить наименьшее из С и полученного наибольшего из а и b А=8,2 б= -0,1 с=1,2.Очень очень надо!!!!
Даны 3 числа a,b,c.Найти наибольшее из a и b.Затем вычислить наименьшее из С и полученного наибольшего из а и b
А=8,2 б= -0,1 с=1,2.Очень очень надо!!!!
Гость
Ответ(ы) на вопрос:
Гость// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
begin
var a,b,c:real;
Write('Введите a,b,c: '); Read(a,b,c);
Writeln(min(c,max(a,b)))
end.
Пример
Введите a,b,c: 8.2 -0.1 1.2
1.2
Не нашли ответ?
Похожие вопросы