Program Input Biodata

{ input biodata }

uses crt;

var

   nama   : String[20];

   npm    : String [9];

   ALAMAT : String;

   jenis_kelamin : string;

begin

clrscr;

       writeln ('       BIODATA SAYA');

       writeln ('       ____________');

       writeln;

       write   ('   NAMA           =' ) ;readln(NAMA);

       write   ('   NPM            =' ) ;readln(NPM);

       write   ('   ALAMAT         =' ) ;readln(ALAMAT);

       write   ('   JENIS KELAMIN  =' ) ;readln(JENIS_KELAMIN);

       readln;

end.