06.txt

来自「C++扩展pl0编译」· 文本 代码 · 共 10 行

const d=3;
var a[10],b,c;
begin
  a[0]:=5;
  a[1+0]:=6;
  a[3]:=10;
  b:=a[3+0];
  c:=3;
  write(a[0],a[1],b,a[c],a[d]);
end.