for.pls

这是我们的一个上机题,做词法分析和语法的,希望对大家的学习有所帮助

program pp;
 var i,j,k:integer;
 begin
     call read(i);
     call read(j);
     for k:=i to j do
     begin
     call write(k)
     end;
     call read(i)
 end.