1++.txt

来自「pl0 扩展功能 包括++ -- 注释 for语句 repeat until语句」· 文本 代码 · 共 11 行

var a,b;
begin
  read(a);
  a++; 
  a*=3;
  write(a);
  read(b);
  b--;
  b/=2;
  write(b)
end.