Viết chương trình hoán đổi 2 giá trị x và y theo thứ tự k tăng (bằng 2 cách có biến trung gian và k có biến trung gian)

1. Cách có sử dụng biến trung gian:

var x,y,k:integer;

begin

write(‘nhap gia tri x:’); readln(x);

write(‘nhap gia tri y:’); readln(y);

k:=x;

x:=y;

y:=k;

writeln(‘x=’,x);

writeln(‘y=’,y);

readln;

end.

2.Cách không sử dụng biến trung gian

var x,y,k:integer;

begin

write(‘nhap gia tri x:’); readln(x);

write(‘nhap gia tri y:’); readln(y);

k:=x+y;

x:=k-y;

y:=k-x;

writeln(‘x=’,x);

writeln(‘y=’,y);

readln;

end.