Pascal/Turbo Pascal - FREE PASCAL. EJERCICIO

Diseñar un programa que realice las siguientes funciones de calculadora: suma, resta, multiplicacion, division real, raiz cuadrada, elevar al cuadrado, logaritmo neperiano y exponencial ( e elevado a x).
El pograma debe de ser claro y presentar un menu con la posibilidades: sumar dos nº, restar 2 nº, y los de antes(multiplicacion ...)
Cada apartado deberá leer los datos necesarios, asi como mantener un control de errores(comun).
Los resultados se presentaran:

La raiz cuadrada de 7000 es 2646

o

La suma de 2000 y 2000 es 4000

Hago la suma por ejemplo pero nose encajarlo con el resto o realizar el menu.
Como utilizo el Case!?

Supongamos que usas un Char para saber qué opción elijió el usuario, entonces:

case opcion of
'a':begin
{ código de esta opción }
end;
'b':begin
{ código de esta opción }
end;
'c':begin
{ código de esta opción }
end;
else WriteLn('Opcion no válida.')
end; { case }