input2.txt

来自「小型对delphi编译器包括语法语义及词法」· 文本 代码 · 共 16 行

program ac;
var
a,b:integer;
//var
c,d:real;
begin
if(a>b|a<3&d<4|a<b)
then
a:=3+a
else
a:=3+(b+7);
c:=1+2+3+4+5+6;

end.