Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
andrey2085
14.05.2022 14:07 •
Информатика
Даны натуральное число n, символы s1, …,sn. определить число вхождений в последовательностьs1, …,sn группы букв: а) abc. (только в )
Ответ:
Stellamaric
03.08.2020 15:02
CLS
a$ = "abc"
INPUT "n = ", n
INPUT S$
IF LEN(S$) < n THEN
n = LEN(S$)
END IF
k = 0
FOR i = 1 TO n - 2
IF MID$(S$, i, 3) = a$ THEN
k = k + 1
END IF
NEXT i
PRINT "k = "; k
END
0,0
(0 оценок)
Популярные вопросы: Информатика
умница601
07.06.2020 11:57
♥дана непустая последовательность целых чисел, оканчивающаяся нулём. найти сумму всех чисел последовательности, больших числа x. для с++...
aleksandrzhark
07.06.2020 11:57
Придумайте несколько вариантов описания одного и того же объекта для разных целей. подготовьте сообщение....
izabella131313
27.05.2020 15:19
Важно! ) как можно быстрее, 1) число байт, необходимых для записи числа 8¹⁴ = = 6; 10; 42; 112; 192 2) какой тип программного обеспечения предназначен для профессиональных...
marychevakristi
31.01.2021 10:25
Как записывается и передаётся информация в компьютере?...
Yliana239990
08.06.2023 16:03
Написать решение на программе dev c++...
AdamM2
16.09.2020 23:13
НА С++ На завод! У Пети есть X граммов краски, а у Васи — Y граммов краски. Одного грамма краски хватает, чтобы покрасить плитку 1×1. На заводе есть неограниченное...
пухля13
22.05.2021 14:49
с информатикой. сделаю ответ лучшим! ...
TheMrВлад0сЇк
19.10.2022 16:57
- Спишите, вставляя пропущенные окончания множе- енного числа. У л гi: Мектепке балалар келді. 1. Мектепке бала... келді. 2. Оқушы... сыныпта ыр. 3. Сыныпта парта...,...
jimitapark
12.11.2020 00:19
Знайдіть сторону квадрата, якщо його периметр дорівнює 37 м....
vasnecovadaha
23.05.2021 11:28
Зробити синтаксичний розбір речення кожна родина живе своїм неповторним життям,зміст якого виникло мірою визначає дружина...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
a$ = "abc"
INPUT "n = ", n
INPUT S$
IF LEN(S$) < n THEN
n = LEN(S$)
END IF
k = 0
FOR i = 1 TO n - 2
IF MID$(S$, i, 3) = a$ THEN
k = k + 1
END IF
NEXT i
PRINT "k = "; k
END