PRINT A がループに入ってない。 GOTO命令で何処に飛んでいるのか考えて！