array.pl0

PL/0语言是Pascal语言的一个子集

PROGRAM ARR;
VAR A,B,C;
ARRAY D[1:10];
BEGIN
  A:=88;  
  C:=33;
  D[9]:=C;
  C:=D[9];
WRITE(C);
WRITE(D[9]);
END.