viết CT hoán đổi giá trị của 2 biến: a=3;b=5 sau khi hoán đổi thì a=5;b=3.
2 câu trả lời
program bai_giai;
uses crt;
var a,b,tg:longint;
begin
clrscr;
a:=3;
b:=5;
writeln('chua hoan doi: a=',a,' ; b=',b);
tg:=a;
a:=b;
b:=tg;
write('sau khi hoan doi la: a=',a,' ; b=',b);
readln
end
PASCAL
proram hoan_doi;
uses crt;
var a, b, c: integer;
begin
clrscr;
writeln('Nhap a: ');
readln(a);
writeln('Nhap b: ');
readln(b);
c:=a;
a:=b;
b:=c;
writeln('a= ',a,'. b= ',b);
readln;
end.