for.txt

来自「用VC写的扩充的pl0文法编译器」· 文本 代码 · 共 11 行

const a=6,b=2,c=7.5;
var x,y,m :integer;

begin
z:=a;
for y:=9 to 5
do
  x:=x+1;
write("x=",x);
end
.