Даны 2 слова. Вывести слово, содержащее большее количество букв «А»- QBasic(Бейсик)

CLS
INPUT "vvedite text"; a$
FOR i = 1 TO LEN(a$)
    IF MID$(a$, i, 1) = " " THEN b1$ = MID$(a$, 1, i): b2$ = MID$(a$, i + 1, LEN(a$) - i)
NEXT
FOR i = 1 TO LEN(b1$)
    IF MID$(b1$, i, 1) = "a" THEN k1 = k1 + 1
NEXT
FOR i = 1 TO LEN(b2$)
    IF MID$(b2$, i, 1) = "a" THEN k2 = k2 + 1
NEXT
IF k1 > k2 THEN PRINT b1$ ELSE PRINT b2$