Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- var
- x1,x2,x3,y1,y2,y3,maxx,maxy : longint;
- begin
- readln(x1, y1);
- readln(x2, y2);
- readln(x3, y3);
- maxx:=x1; maxy:=y1;
- if x2<minx then begin maxx:=x2; maxy:=y2; end;
- if x3<minx then begin maxx:=x3; maxy:=y3; end;
- if y2<miny then begin maxx:=x2; maxy:=y2; end;
- if y3<miny then begin maxx:=x3; maxy:=y3; end;
- writeln(maxx,' ',maxy);
- end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement