В исходной строке b$ определить количество слов, начинающихся заданным символом x$ - QBasic (27623)
Формулировка задачи:
В исходной строке b$ определить количество слов, начинающихся заданным символом x$.
Решение задачи: «В исходной строке b$ определить количество слов, начинающихся заданным символом x$»
textual
Листинг программы
- INPUT st$
- st$=st$+" "
- INPUT x$
- k=1
- WHILE k<LEN(st$)
- IF MID$(st$, k, 1)=x$ THEN r=r+1
- k=INSTR(k, st$, " ")+1
- WEND
- PRINT r
Объяснение кода листинга программы
- Вводим строку в переменную st$
- Добавляем пробел в конец строки
- Вводим символ, за которым нужно найти слова
- Инициализируем переменную k единицей
- Пока k меньше длины строки st$
- Если k-й символ строки равен заданному символу
- Увеличиваем значение переменной r на единицу
- Увеличиваем значение переменной k на единицу, пропуская пробелы
- Выводим значение переменной r
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
