Question

используя функцию в программе для вычисления наибольшего из чисел a , b и c​

Answer 1

===== PascalABC.NET =====

function Min3(a, b, c: real) := Min(Min(a, b), c);

begin

 var (a, b, c) := ReadReal3;

 Min3(a, b, c).Println

end.