BASICで動作確認済み。GOTOとGOSUBのジャンプはほとんどラベル化したので、行番号はなくても論理構造は理解可能なはず。konnoさんのお持ちのTurboBasicなら、例えばcols.defのようなものを使って全ての行番号を削除しても、もしかしたらコンパイル可能かも。ラベルの文法が違うからダメ、かな。あと、もしかしたらほんのちょっとだけ高速化するかもしれない技術を一つ、導入してみました。割り算を2回するのではなく掛け算と割り算の組み合わせに変更してみました。これでどのくらい早くなるかは測定していないからわからない。処理系によっては、むしろ遅くなったりして。konnoさんオリジナルのロジックよりは、使う変数も少なくなっている分だけ速くなってるかもしれないけど、こんなもん、最近のコンパイラなら最適化してくれるでしょ、という範囲かもしれない。他にもいろいろと思いつく技はいくつかありますけどね。そこまではしていません。アップロードしました。コンパイラなんですね。