Program Biodata pada Pascal

program satu;
uses crt;
var
nm : string;
kls : string;
npm : string;
begin
clrscr;
write <'nama saya:'>; readln ;
write <'kelas saya:'>; readln ;
write <'npm saya:'>; readln ;
write <'nama saya ',nm,' kelas saya ',kls,' npm saya ',npm>;
readln;
end.