こんなふうに配列A,B,Cの記憶域が共有されてしまう。C語ならともかく、BASICではエラーにしないとまずいっしょ。配列変数はローカル宣言ができないらしいことも今回気がついたこと。B=P(A)をCOPY B,P(A)と書けば回避されるのではありますが。