Program Pascal Menukarkan dua angka dgn variabel bantuan

program Menukarkan_dua_angka_dgn_variabel_bantuan;

var

   a, b, temp : integer;  {a:penampung angka pertama, b:penampung angka kedua}

                          {temp:variabel bantuan}

begin

   writeln('INPUT');

   writeln('-----');

   write('Angka 1 = ');readln(a);

   write('Angka 1 = ');readln(b);

   temp := a;

   a := b;

   b := temp;

   writeln; writeln;

   writeln('OUTPUT');

   writeln('------');

   writeln('Angka 1 = ',a);

   writeln('Angka 2 = ',b);

   readln;

end.