test2.java

S语言编译器的完整实现

procedure test;
     var a,b,i:integer;
   begin
      a:=10;       /*赋值语句*/
      b:=100;
      for i:=0 to 10 do 
          a:=a+b;    /*for循环语句*/
   end.
/*赋值语句和for循环语句*/