DATA命令で用意した数値はINPUT命令で日にちを入力する前に 配列変数に読み込んでおくべきですね。 入力した日にちがプログラムで扱える範囲外だったら再入力させる 処理も欲しいですね。 でないと、Subscript out of rangeが発生します。