SQUARE の U を入れたのはいいんですが、今度は A が抜けてますよ? さて、この場合は、Dを配列変数にする必要がありますが、そうなってないですね。 2行目と3行目の間に DIM D[0] と書いて、D を配列変数にすることを、声高らかに宣言しましょう。