Даны 3 числа a,b,c.найти наибольшее из a и b.затем - вопрос №64999083 от mashoshinaliza1 04.01.2020 02:43

Question

Информатика: Даны 3 числа a,b,c.найти наибольшее из a и b.затем вычислить наименьшее из с и полученного наибольшего из а и b а=8,2 б= -0,1 с=1,2.

mashoshinaliza1 · Answer

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