DIM X[5],Y[5]でFOR文の前に1回でOK X[0]は作りたくないのかもしれないけどそれは無理です。