Как мне вызвать процедуру внутри другой процедуры в Pascal

procedure questiontype;  
 begin  
  writeln ('Enter the type of question you would like...');  
  writeln ('1. Add');  
  writeln ('2. Multiply');  
  writeln ('3. Subtraction');  
  writeln ('4. Division');  
  readln (typeofquestion);  
   case typeofquestion of
    1: add;
    2: multiply;
    3: subraction;
    4: division   
else writeln ('Choose again'); 
end;
end;          

Сложение, умножение, вычитание и деление - это все процедуры. Если я помещу это в основную программу, она будет работать нормально, но когда я сделаю это как процедуру, я получу ошибка необъявленный идентификатор . Я искал на многих веб-сайтах такой пример, но не нашел ни одного.

Как сделать сложение, умножение, вычитание, деление перейти к их процедурам из внутри этого?