Program Pr1;
uses crt;
var x,y,t:integer;
Begin
clrscr;
readln(x,y);
t:=x;
x:=y;
y:=t;
writeln(x,y);
end.
varx,y,t:integer;beginwrite('x=');readln(x);write('y=');readln(y);t:=x;x:=y;y:=t;writeln('x=',x,' y=',y);readln;end.
Program Pr1;
uses crt;
var x,y,t:integer;
Begin
clrscr;
readln(x,y);
t:=x;
x:=y;
y:=t;
writeln(x,y);
end.
var
x,y,t:integer;
begin
write('x=');
readln(x);
write('y=');
readln(y);
t:=x;
x:=y;
y:=t;
writeln('x=',x,' y=',y);
readln;
end.