contoh program pascal membuat biodata

program biodata;
uses crt;
begin
clrscr;
writeln('===============');
writeln('PROGRAM BIODATA');
writeln('===============');
writeln('nama=siti hariyanti');
writeln('tempat/tgl lahir=singaraja/17 mei 1991');
writeln('jenis kelamin= peremopuan');
writeln('alamat=jl, M,panjaitan 4/6 malang');
writeln('agama= islam');
writeln('status= mahasiswa');
writeln;
readln;
end.