[PASCAL] Richiesta inserimento password

[123delphi321]

forse...

if parola='prova' then writeln('Password corretta');

non conosco bene il pascal ma non e' che la readln deve essere fatta prima?

program password;
uses crt;
var parola:string[10];
begin
writeln('Inserisci la password');
readln;

if parola='prova' then 
  writeln('Password corretta')
else
   writeln('Sbagliato');

end.