再帰呼び出しを使えば、簡潔に書くことができます。 元のプログラムを見ると、FOR文があってA$とB$を更新するという処理が入れ子になっているのが分かります。 だったらそれを1つの命令にしてしまって、入れ子のところはその命令を再利用すれば良いのです。 ただ、何らかの条件で止まるようにしておかないと、エラーになるのでご注意下さい。