Ответы и объяснения

Лучший Ответ!
2013-12-12T17:30:28+04:00
А в чем проблема?
uses crt;
var a,b,c,d:integer;
begin
read(a,b,c,d);
writeln(max(min(a,b),min(c,d)));
end.