PROGRAM BIODATA

Program Biodata; {BAGAS DAN BAGUS F}
Uses crt;
Var nama,alamat: String[30];
        umur:integer;
Begin
        clrscr;
        Write('Masukkan Nama anda: ');
        readln(nama);
        Write('Masukkan Alamat anda: ');
        readln(alamat);
        Write('Masukkan Umur anda: ');
        readln(umur);
        Writeln('Nama anda adalah :',nama);
        Writeln('Alamat anda adalah :',alamat);
        Writeln('Umur anda adalah :',umur);
        readln;
end.