e02.pl0

来自「PL/0语言是Pascal语言的一个子集」· PL0 代码 · 共 10 行

program EX011;
var a,b,c;
begin
  a:=88;
  read(b);
  c:=a+b*(3+b);
  if b=0
  then
  write(c)
end.