pascalabcnet/_ParsePABC1/f.pas

var i: integer;
const ccc = 2+3+4;

procedure p(jjj: integer; var kkk: integer);
var i: integer;
const ccc: integer = 2;
type bcd = integer;
begin
  var k: integer;
//  yield x111.x222+fff;
//  yield aaa[i]^.d+(bbb.c*nnn^)*fff(4);
end;

function f(var i,j,k: integer): integer;
var i: integer;
begin
  var k: integer;
  k^[2].t[3]^ := a + 1 * 2*(3+k^[2].t[3]^);
end;

type C = class
  ck: integer;
  procedure x1;
  var cxk: integer;
  begin
    var cik: integer;
    
  end;
  function f1(): integer;
  var cfk: integer;
  begin
    var cfik: integer;
    write(1+2+3+4,5*6);
  end;
end;

begin
  var ii: integer;
  
end.