rfile.pas

来自「一个实现词法分析的程序 VC++环境 所需的efile.pas rfile.pa」· PAS 代码 · 共 7 行

program excal;
  var a,b,c:real;
  /* main */
  a:=5+6.9*a/8.8;
  if a<=78 then b:=a*c;
  write('a=',a;'b=',b);
end