declare a: integer
begin
   declare b: integer
   begin
      declare c: integer
      begin d end;
   c end;
b end
