Pascal/Turbo Pascal - programa urgente en pascal

debo crear un program que permita:
ingresar 10 valores,enteros,mayores o iguales a 0.
determinar cuantos del total de valores son 0,pares e impares,imprimir los resultados obtenidos
obtener e imprimir el promedio de los valores ingresados
determinar el mayor y el menor valor e imprimirlos

cada resultado solicitado,inclusive el ingreso de valores al arreglo,debe ser efectuado a traves de un MENU,donde al seleccionar la opcion se despliegue ek resultado solicitado

ejemplo del menu
BEGIN
F:=0;
WHILE(F<>7)D0
BEGIN
CLRSCR;
GOTOXY(5,4);WRITE('INGRESE OPCION :');
GOTOXY(5,6);WRITE('1:INGRESO DE VALORES');
GOTOXY(5,8),WRITE('2:TOTAL DE VALORES PARES');
GOTOXY(5,10),WRITE('3:TOTAL DE VALORES IMPARES');

GOTOXY(5,12);WRITE('7:SALIR');
GOTOXY(22,4),READ(F);
CASE F OF
1:BEGIN DESARROLLO DEL PROGRAMA OPCION 1 ;END;
2:BEGIN DESARROLLO DEL PROGRAMA OPCION 2;END;
.
.
.6:BEGIN DESARROLLO DEL PROGRAMA OPCION 6;END;
END;
END;
END.

¿Y cuál es el problema?

el problema son las validaciones......
y el ingreso de los array...k no se emplearlo..se ke deben ir...
pero no se donde
tengo k ingresar 10 datos en el menu 1
luego en el
menu 2: encontrar los numero pares ingresado
menu 3 : impares..
menu 4: si se ubieran digitado ceros(ejemplo:ceros ingresados:2,n°pares ingresados:3,etc)
menu 5: salir del programa

¿Qué tienes hecho hasta ahora?