Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
ketrinmaknamar
18.09.2022 12:03 •
Информатика
Напишите программу, которая считает количество предложений во введенной строке и выводит его. предложение может заканчиваться на: . (точка) ; (точка с запятой) ? (вопросительный знак)
Ответ:
9854123g
08.10.2020 12:09
PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var (s,k):=(ReadlnString,0);
for var i:=1 to s.Length do
if s[i] in ['.',';','?'] then k+=1;
Writeln('Количество предложений равно ',k)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
lenadanilova77
25.11.2022 01:27
Саян потянулся 15 раз мирас -4 меньше сколько подтягиваний они сделали вместе ...
PeaceMaker1337
04.04.2021 01:37
Дано выражение x/2+x/4+x/8+⋯+x/2n, где n является натуральным числом. Запишите программу его вычисления с использованием циклов while, repeat, for....
tarnopolska99
21.09.2022 20:47
пусть граф отражает отношения между людьми в группе выберите пример неориентированного графа. 1) отражает отношение «передал книгу« 2) отражает отношения «говорил...
azizovabina
30.09.2021 09:37
А 1 Й 11 У 2 1 Э 31 Б 2 К 12 Ф 22 Ю 32 В 3 Л 13 Х 23 Я 33 Г 4 М 14 Ц 24 Д 5 Н 15 Ч 25 Е 6 О 16 Ш 26 Ё 7 П 17 Щ 27 Ж 8 Р 18 Ъ 28 З 9 С 19 Ы 29 И 10 Т 20 Ь 30 Некоторые...
милка328
15.04.2020 03:33
При поисковой системы найдите информацию об Узбекистане напишите...
kostaKOSTAkosta
15.01.2020 15:25
Придумайте ситуацию на уроке, когда учитель использует ветвление или цикл , принимая решения...
Bludmila0509
15.01.2020 15:25
Перечислите носители информации,используемые в современных компьютерах...
Bonta
29.07.2021 20:05
Пискливі слова ілля муромця та соловія...
Кирилл222123123413
29.07.2021 20:05
Как будет по языку. просыпаюсь. 2. иду умываться. 3. иду завтракать. 4. передиваюсь. 5. иду в школу. перевести на...
Михаил1946
29.07.2021 20:05
Перевести на казахский язык мой папа купил новые окна...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
var (s,k):=(ReadlnString,0);
for var i:=1 to s.Length do
if s[i] in ['.',';','?'] then k+=1;
Writeln('Количество предложений равно ',k)
end.