Viết chương trình thay đổi giá trị của x cho y và giá trị của y cho x. Ai giúp mik với ạ mai mik nộp bài r :(((

1 câu trả lời

program sksk;
uses crt;
var x, y : integer;
begin
clrscr;
write('nhap so nguyen x :');readln(x);
write('nhap so nguyen y :');readln(y);
x := x + ;
y := x - y;
x := x - y;
writeln('gia tri cua x sau hoan doi la :', x);
writeln('gia tri cua y sau hoan doi la :', y);
readln
end.