Membuat Program Biodata dengan Pascal

Contoh Program sederhana Turbo Pascal, Membuat Biodata
Silahkan Copas:

uses wincrt;
var studikasus,nama,NIM,alamat,umur,pekerjaan,hoby,selesai,kelas:string;
Begin
Clrscr;
write('Program studikasus1 : ');readln(studikasus);
write('masukan nama anda : ');readln(nama);
write('masukan NIM anda : ');readln(NIM);
write('masukan alamat anda : ');readln(alamat);
write('masukan umur anda : ');readln(umur);
write('masukan pekerjaan anda : ');readln(pekerjaan);
write('masukan hoby anda : ');readln(hoby);
write('masukan kelas anda : ');readln(kelas);
writeln('==================================================');
writeln('studikasus : ',studikasus);
writeln('nama : ',nama);
writeln('NIM : ',NIM);
writeln('alamat : ',alamat);
writeln('umur : ',umur);
writeln('pekerjaan : ',pekerjaan);
writeln('hoby : ',hoby);
writeln('kelas : ',kelas);
writeln('==================================================');
End.