Rabu, 27 Juli 2011

Pascal : Contoh program biodata

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.


Tags: Pascal, program biodata

Tidak ada komentar:

Poskan Komentar