for.txt

来自「编译原理课程设计,清华大学版教材的pl0编译器的源码.」· 文本 代码 · 共 10 行

const a=10;
var b,c;
begin
  for(b:=6;b>0)
    begin
      c:=a;
      write(c);
      b:=b-7
    end
end.