test1.java

S语言编译器的完整实现

procedure test;
   var a,b,max:integer;
   begin
     a:=9; /*赋值语句*/
     b:=10;
    if a>b then max:=a else max:=b; /*if语句*/
   end.
 /*赋值语句与if语句*/