Viết chương trình nhập hai số, đổi giá trị hai số rồi in ra hai số

Câu 21: Viết chương trình nhập hai số, đổi giá trị hai số rồi in ra hai số.

Trả lời

Program Doi_Gia_Tri; 

uses crt; 

var a, b, tam:real;

Begin

clrscr;     

write('nhap a: '); readln(a);     

write('nhap b: '); readln(b);     

writeln('Truoc khi doi a =',a,' va b= ',b);

readln;     

tam:=a;     

a:=b;     

b:=tam;     

writeln('Sau khi doi a =',a,' va b= ',b);     

readln; 

end.