Pascal/Turbo Pascal - ayuda para un programa de opciones

bueno ya tengo la estructura principal, tengo k hacer un ejemplo..el k sea d opciones...
estaba pensando en komo hacerlo..y decidi x ejemplo probar con una receta de cocina
pero no c como estructurarlo..

ayudenmeee.. soy muy muy principiante en este modo de programacion

program menu;
uses crt;
var
opcion:integer;
begin
repeat
clrscr;
writeln (' MENU PRINCIPAL');
writeln;
writeln ('1. opcion1');
writeln;
writeln ('2. opcion2');
writeln;
writeln ('3. opcion3');
writeln;
writeln ('4. opcion4');
writeln;
writeln ('5. opcion5');
writeln;
writeln ('6. SALIR');
readln (opcion);
case opcion of
1:
begin
writeln ('en progreso opcion1');
readln;
end;
2:
begin
writeln ('en progreso opcion2');
readln;
end;
3:
begin
writeln ('en progreso opcion3');
readln;
end;
....
..
6: exit;
end;
until (opcion=4);
readln;
end.