Задайте символьный массив из 6 элементов. Подсчитайте количество букв К содержашихся во всех элементах массива. Выведите на экран массив и найденое количество.- Basic(Бейсик)

DIM a$(6)
FOR i=1 TO 6
INPUT a$(i)
NEXT
  
FOR i=1 TO n
IF MID$(a$(i),i,1)="k" THEN m=m+1
NEXT
FOR i=1 TO n
PRINT a$(i)
NEXT
PRINT"kol=";m