このプログラムを実行するとエラーが出たと思います。 プチコン3号では配列変数と同じ名前の変数は使えない仕様になっていて 配列文字列変数I$[n]を使った場合に文字列変数I$を使おうとすると Type mismatchになります。