请问在一个函数中可以再定义一个函数吗？

Question

function a:boolean;
  function b: integer;
  begin  end;
begin
 // 在这里调用function B
end;

Answer 1

function a:boolean;
  function b: integer;
  begin
    function c: integer;
    begin
      function d: integer;
      begin
      end;
    end;
  end;
beginend; 
//为什么不

Answer 2

function a:boolean;
  function b: integer;
  begin
    function c: integer;
      function d: integer;
      begin
      end;
    begin
    end;
  begin
  end;
beginend;