Дана строка, содержащая текст, заканчивающийся точкой. Вывести на экран слова, содержащие три буквы в basikе- QBasic(Бейсик)

INPUT "vvedite text"; a$
FOR i = 1 TO LEN(a$)
    IF MID$(a$, i, 1) = " " OR MID$(a$, i, 1) = "." THEN d = i - k - 1: k = i
    IF d = 3 AND k = i THEN PRINT MID$(a$, i - d, d)
NEXT