Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
андріанагалег
12.08.2021 14:46 •
Информатика
Дана строка символов. Группы символов, разделенные пробелами (одним или несколькими) и не содержащие пробелов внутри себя, будем называть словами.
Найти количество слов, начинающихся с буквы б
Желательно на паскале
Ответ:
Alisascol
10.06.2020 15:03
===== PascalABC.NET =====
begin
ReadString.ToWords.Count(c -> c[1].ToLower = 'б').Print
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
аааааа102
29.08.2021 23:12
Как окно программы word к стандартному виду...
Нуртилек2664467
29.08.2021 23:12
Каждая книга набранная с компьютера, содержит 120 страниц, на каждой-40 строк, в каждой строке-60 символов. каков объём информации в книге...
yotuber
31.12.2020 08:44
Выезжает рейсовый автобус со скоростью 60 км/ч одновременно отправляется маршрутное такси скорость которого 80 км/ч. через сколько часов онт встретятся если расстояние...
DIMITMARASIT
06.06.2023 14:36
Написать программу в turbo pascal. напишите программу генератором случайных чисел генерируется последовательность 50-ти случайных чисел из диапазона [-10; 20]. вычислить...
AnastasiaNastia55555
31.10.2021 11:32
20 ваши.даны два числа x,y.cоставить алгоритм вычисления среднего арифметического s этих чисел,если x меньше y,или их разность r,если y меньше x....
yexevosux
18.08.2020 20:27
Напишите сколько сможете программ для решения вот таких : if1. дано целое число. если оно является положительным, то прибавить к нему 1; в противном случае не изменять...
katka55555
19.08.2021 04:25
Даны две фамилии. определить, сколько раз во втором слове встречается первая буква первой фамилии. please, нужно написать программу на pascal abc.net, используя служебное...
AnselmaRain
29.05.2021 17:59
Лена скачивает дистрибутив ос linux с зарубежного сайта-репозитория, пользуясь односторонним каналом цифровой передачи данных через телевизионное эфирное вещание, обеспечивающим...
KseniaSamarskaia15
29.05.2021 17:59
12 апреля 1961 года юрий гагарин осуществил первый космический полёт. доступность да своевременность,точность,устойчивость ответь на вопросы является ли эта информация...
Рафаэлла2004
29.05.2021 17:59
Вбольшой бидон налито 12 литров молока. требуется получить 6 литров, используя для переливания два других бидона по 5 и 7 литров....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
===== PascalABC.NET =====
begin
ReadString.ToWords.Count(c -> c[1].ToLower = 'б').Print
end.