Verificaçao de senha em pascal

Estou construindo um programa em pascal ele tem que verificar a senha salvar a senha no hd e da os privilegios adequados ao usuario correspondente.

Estou usando o seguinte codigo por favor me ajudem urgente.

var
a:string;
b:string;
Begin
write (´Entre com sua senha de administrador M0001´) ;
readln (a);
write (´Entre com o sua senha de usuario´);
readln (b);