Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
dashasviridenko
07.10.2021 16:38 •
Информатика
Склавиатуры вводится строка. подсчитать сколько раз в нее входит подстрока abc.
Показать ответ
Ответ:
Ozerck2002
06.10.2020 00:51
Var s: string;
n,k: integer;
begin
write('строка: '); readln(s);
k:=0;
n:=pos('abc',s);
if n>0 then
repeat
k:=k+1;
delete(s,1,n+2);
n:=pos('abc',s);
until n=0;
writeln(k);
end.
строка: fdrsabcde dsabcjhy abckjuy
3
строка: dscabgfre fhygdte
0
0,0
(0 оценок)
Популярные вопросы: Информатика
apolinarii2006
27.08.2021 04:17
Напишите решение! ! 1) объём сообщения - 7,5 кбайт. известно, что сообщение содержит 7680 символов. какова мощность алфавита? 2) дан текст из 600 символов. известно, что...
00Рахат00
19.06.2021 13:22
Что лишнее принтер, сканер, плоттер, графический дисплей...
beliy112329
19.06.2021 13:22
Определить,делителем каких чисел а,в,с является число к. (в паскале)...
Sandrohka
08.08.2020 17:29
Какие выполняются в процессе создания инфраструктуры?...
Trdfgg
09.04.2021 20:29
1. то , что костя будет стартовать четвертым , передало ему 9 бит информации сколько участников примут участие в соревновании ? 2. на остановке останавливаются троллейбусы...
novkov641800
30.10.2022 00:01
Подсчитать в байтах количество информации в тексте, если текст состоит из 600 символов, а мощность используемого алфавита – 128 символов....
Makc457214
30.10.2022 00:01
Какое количество информации несёт двоичный код 10100101 из непрозрачного мешочка вынимают шарики с номерами. известно, что сообщение о номере шарика несёт 4 бита информации....
Kiss456
21.04.2021 21:03
А&¬В мне только ответ...
Nastyha1741
14.09.2020 17:10
Уменя вопросы по рассказу детство (максим горький) 7 класс, нужно к завтрашнему дню, ответьте хоть на несколько вопросов: 1. цыганка по плану: а)как цыганок появился в...
FoxFantasy
24.12.2021 14:17
Найдите х, если а||b, 1=2х+21°, 2=х+23 и 3=3х-14°...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n,k: integer;
begin
write('строка: '); readln(s);
k:=0;
n:=pos('abc',s);
if n>0 then
repeat
k:=k+1;
delete(s,1,n+2);
n:=pos('abc',s);
until n=0;
writeln(k);
end.
строка: fdrsabcde dsabcjhy abckjuy
3
строка: dscabgfre fhygdte
0