Решить в паскале.

max {x+y+z;     x*y+z;   x^2+y^2-z} 
min {x+y+(2/2);     x*y*z}  +1

program maxmin;var x, y, z: integer;max, min: integer;beginreadln(x, y, z);max:=x+y+z;if x*y+z>max then max:=x*y+z;if sqr(x)+sqr(y)-z > max then max:=sqr(x)+sqr(y)-z;writeln(max);min:=x+y+1;if x*y*z<min then min:=x+y+1;write(min+1);end.