それは1~3行目の順番を入れ換えて VAR B PRINT "Bを押せ" @A にすると治ります。 あとそのプログラムだとWHILEが意味ないです。 GOTOかWHILEどちらか1つでOKです。 個人的にWHILEの方をおすすめします。 GOTO嫌い。