z max

Ответ от Imobilazer[гуру]
function min(a,b,c: integer): integer;
var t: integer;
begin
if a < b then t:=a else t:=b;
if c < t then t:=c;
min:=t;
end;
function max(a,b: integer): integer;
begin
if a > b then max:=a else max:=b;
end;
begin
readln(x,y,z,d);
writeln(min(max(x, y), max(x, z), max(z, d))
end.

Ответ от Ivan Salauyou[гуру]
float max(float a, float b) { return a>b? a : b;}
float min(float a, float b) { return a<b? a: b; }
....
z=min(min(max(x,y),max(x,z)),max(z,d));

Ответ от 3 ответа[гуру]