Question

Паскаль найти минимальное из трех вещественных чисел

Answer 1

Var a,b,c:integer;
begin
Readln(a,b,c);
Writeln(min(min(a,b),c));
end.