table.txt

编译原理课程实验要求做的语法分析

PROGRAM rr;
VAR
  WEIGHT :REAL;
  PAY :INTEGER;
BEGIN 
WEIGHT:=50 ;
IF WEIGHT<=50 THEN
PAY:=WEIGHT* 13;
END.
$