Pascal/Turbo Pascal - AÑOS BICIESTO EN PASCAL

hola queridos compañeros.. necesitos ayuda con un problema de pascal..
resulta que me dieron esto:

realizar un programa que lea en la forma de mes,año e imprima, para ese años cuantos dias tiene ese mes..

el problema es que no se como estructuralo de forma que me de bien en calculo por el tema del año biciesto.. les agradeceria que me contestaran lo antes posible :)

Para calcular si un año es biciesto o no, vaya esta fórmula:

biciesto:=(ano mod 400 = 0) or ((ano mod 4 = 0) and (ano mod 100 <> 0));

"biciesto" es una variable booleana que valdrá true si ano es biciesto, false en caso contrario.

(Gracias Carlos Guimaraenz por la fórmula)