input2.txt

小型对delphi编译器包括语法语义及词法

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.