Подсчитать количество букв K и D в слове - QBasic
Формулировка задачи:
Помогите решить задачи:
а) Дан массив В (N). Если пятый элемент таблицы меньше десятого элемента, то присвоить этим элементам удвоенное собственное значение, иначе обнулить эти элементы массива. Вывести на экран монитора первоначальный и преобразованный массивы.
б) Дан массив В (N,N). Найти минимальный элемент в массиве и его местоположение.
в) Подсчитать количество букв K и D в слове.
Решение задачи: «Подсчитать количество букв K и D в слове»
textual
Листинг программы
INPUT "enter text: ", a$ FOR i = 1 TO LEN(a$) q$ = MID$(a$, i, 1) IF q$ = "K" OR q$ = "D" THEN k = k + 1 NEXT PRINT k
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д