Program Penukaran

Program Tukar;
uses wincrt;
var
a,b:Integer;
Begin
write('a:');
readln(a);
write('b:');
readln(b);
writeln('a:',b);
writeln('b:',a);
end.