Задайте символьный массив из 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