Membuat Program Biodata Sederhana dengan Turbo Pascal

Membuat Program Biodata Sederhana dengan Turbo Pascal

program biodata;
uses crt;
var
nama, alamat : string;
umur : integer;
begin
clrscr;
writeln(‘===========================================’);
writeln(‘ Biodata’);
writeln(‘===========================================’);
write(‘Nama : ‘); readln(nama);
write(‘Umur : ‘); readln(umur);
write(‘Alamat : ‘); readln(alamat);
writeln(‘——————————————-’);
writeln(‘Jadi data Anda : ‘);
writeln(‘Anda bernama ‘,nama,’. Umur Anda ‘,umur,’ tahun. Anda tinggal di ‘,alamat,’.');
writeln;
readkey;
end.