Найдите и выведите на экран те слова, которые оканчиваются на букву «Я»- Basic(Бейсик)

INPUT "vvedite kol-vo slov ",n
DIM a$(n)
FOR i=1 TO n
INPUT "vvedite slovo ",a$(i)
NEXT
 
FOR i=1 TO n
IF RIGHT$(a$(i),1)="я" THEN PRINT a$(i)
NEXT