for.pl0

来自「1）增加单词：保留字 ELSE」· PL0 代码 · 共 12 行

PROGRAM EX01;
VAR A,B;
BEGIN
  FOR   A:=1
  TO  10
DO B:=B+1;
  WRITE(B);
  FOR  A:=10
  DOWNTO   1
  DO B:=B-1;
  WRITE(B)
END.