READ A$ DATA "" DATA "(文字列)" DATA "(文字列)" DATA "" FOR A=0 TO 2 READ A$ PRINT A$ NEXT 「DATA "(文字列)"」をふやすなら「TO 2」の2も同じ数だけ増やしてください。