Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
LINALINA123456
14.02.2022 03:05 •
Информатика
Дана строка.определить сколько раз входит в нее группа букв a b c. ,не надо писать решай сама!
Показать ответ
Ответ:
Ангелинка2007
05.07.2020 08:48
Var a,b,c, s:string; i,c:integer;
begin
readln(s);
readln(a,b,c);
for i:=1 to length(s) do begin
if (s[i]=a) or (s[i]=b) or (s[i]=c) then
c:=c+1;
end;
writeln('Группа букв a b c встречается ', c, ' раз');
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
logean
14.04.2022 00:09
Хелп плз с ифнорматикой Очень много...
feliz3600
19.04.2020 07:09
1. Из перечисленных моделей укажите математическую: 1. Формула нахождения площади круга; 2. Акт о приемке работы; 3. Рецепт торта; 4. Программа передач; 5. Отчет о деятельности...
ksuvladyckina16
13.08.2020 04:08
1 Что из ниже перечисленного не относится к информационным процессам? а) сбор данных б) обработка данных в) изучение данных 2 Кто был автором первой вычислительной машины...
mytaevafati
07.03.2021 11:01
C++Входные данныеВ первой строке задается одно натуральное число N, не превосходящее 1000 – размермассива.Во второй строке вводится N чисел – элементы массива (целые числа,...
etre
29.05.2022 19:56
Вычисли значение математического выражения в MS Excel: (96+173)−2(73:(5+16)). (ответ округли до сотых)...
KittiKitimi
02.05.2021 05:37
Дано число 1,5626E−3. Нормализованная запись данного числа...
snaiperkiling
16.08.2020 10:23
Дано шестизначное число. Вывести сначала сумму цифр, стоящих на четных позициях, а на строке ниже вывести сумму цифр, стоящих на нечетных позициях...
DeFauLD
30.01.2021 14:47
Игральный кубик бросается три раза (выпадает три случайных значения). Из этих чисел составляется целое число, программа должна найти его квадрат. Пример: Выпало очков:...
КсюшаАнтропова
08.03.2021 18:00
Довжина стрічки транспортера, який Рухається рівномірно, становить 5,4м. Скільки часу буде рухатись деталь від одного кінця до другого, якщо швидкість стрічки 18 см/с?...
tkalenko03
08.03.2021 18:00
Точки A и C расположены по одну сторону от прямой, к которой от обеих точек проведены перпендикуляры AB и CD равной длины. Определи величину угла∡ABC, если ∡ADB = 60*...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(s);
readln(a,b,c);
for i:=1 to length(s) do begin
if (s[i]=a) or (s[i]=b) or (s[i]=c) then
c:=c+1;
end;
writeln('Группа букв a b c встречается ', c, ' раз');
readln;
end.