My site

Uses WinCrt;

Var

   Nama: String [20];

   Umur: Byte;

Begin 

      Write(' Ketik Nama: ' ); Read (Nama);

      Write(' Ketik Umur: '); Read (Umur);

      Writeln;

      Writeln('Nama : ',Nama);

      Writeln('Umur : ',Umur);

End.