Pascal/Turbo Pascal - Hola, tengo un problema

Hola tengo un problema con un programa que estoy haciendo, resulta que me lo ha compilado correctamente pero al ejecutar el programa no funciona como deveria, resulta que es un programa en que introduces tus datos, nombre, dni, si estas soltero o casado y el numero de vehiculos que tienes. pues bien al ejecutarlo cuando introduces los datos no salen tus datos, no se por que. aqui dejo el programa espero que alguien me lo resuelva. gracias de antemano.

program DGT;

const
Variable1='Su nombre es: ';
Variable2='Su DNI es: ';
Variable3='Su estado es: ';
Variable4='Su numero de cohes es: ';

Var
nombre: string [40];
begin

write('Introduzca su nombre: ');
readln(nombre);
write(Variable1, ' ');
readln;
writeln('Introduzca su DNI: ');
readln;
writeln(Variable2, ' ');
write('Introduzca su estado: ');
readln;
writeln(Variable3, ' ');
write('Introduzca su numero de coches: ');
readln;
writeln(Variable4, ' ');
readln;
end.

• actividad_2_tema_4.zip(478,0 B)

revisa bien ese codigo porque andas algo perdido te dejo mi version haber si te sirve