Contoh Program Pascal | Dasar

Program Kasus1;
Uses wincrt;
Var Nama,Alamat,Pekerjaan:string;
    Umur:integer;
Begin
 Clrscr;
 write('Masukan Nama Anda : ');readln(Nama);
 write('Masukan Alamat Anda : ');readln(Alamat);
 write('Masukan Umur Anda : ');readln(Umur);
 write('Masukan Pekerjaan Anda : ');readln(Pekerjaan);
 writeln('============iiiiiiiiii================');
 writeln('Nama    : ',Nama);
 writeln('Alamat  : ',Alamat);
 writeln('Umur    : ',Umur);
 writeln('Pekerjaan :',Pekerjaan);                            
 readln;                            
End.