Pascal/Turbo Pascal - Ayuda Illegal Expression

Hola espero que me podais ayudar. El caso es que al compilar mi código, en Pascal, me dice que PROCEDURE es una expresion ilegal y no se por que... gracias de antemano

PROGRAM practica8;
VAR
opcion: char;
BEGIN
PROCEDURE Menu;
BEGIN
writeln('Elige una opcion: ');
writeln('1 - Mostrar Nombre');
writeln('2 - Operaciones con enteros');
writeln('3 - Operaciones con reales');
writeln('4 - Operaciones con caracteres');
writeln('5 - Calcular dia de pascua');
writeln('6 - Calcular orden');
writeln('7 - Saber el cuatrimestre');
writeln('8 - Cara opuesta del dado');
writeln('9 - Saber el numero de primos en un intervalo');
writeln('10- Suma de intervalo de primos');
writeln('0 - Salir');
writeln;
END;