Pascal/Turbo Pascal - Consulta (dias de trabajo de un trabajador)

Hola
Necesito hacer un programa que calcule el tiempo que trabajo un trabajador en nuna empresa...
Una vez ingresadas las fechas de entrada y salida del trabajador
¿como puedo calcular los dias que trabajo este buen hombre si entró por ejemplo un 15 de marzo y egresa un 2 de abril?
La cuenta seria 2-15+31=18 dias de trabajo pero como traduzco esto en pascal para cualquier fecha que me ingrese el usuario
Muchas Graciasssss!!!!

Pana la manera en como yo lo haria es la siguiente:
* Un año tiene 365 dias
* Un mes 30 o 31 dias (Menos febrero claro)
* Una semana 7 dias

Siguiendo esta idea puedes pedirle al usuario que ingrese la fecha en la q empezo a trabajar el hombre (O mujer) pidiendole dia mes y año. Para cada uno de estos declaras una variable...
Y desde ahi empiezas a calcular mediante condiciones (If) los dias....sino te quedo muy claro escribe a mi correo [email protected] espero q no sea tarde....Exito

jkljklj