Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
artemumnov2
02.06.2022 19:21 •
Другие предметы
Посчитать количество восклицательных предложений в тексте длины не более 255 символов. (программа Паскаль)
Показать ответ
Ответ:
WhiteRout
16.04.2019 23:00
var s: String; i, k: Integer;
begin
ReadLn(s);
for i:=2 to Length(s) do
if (s[i]='!') and (s[i-1]<>'!') then Inc(k);
WriteLn(k);
end.
0,0
(0 оценок)
Популярные вопросы: Другие предметы
superrobbot2000
23.04.2021 16:55
нужна Запропонуйте творчий міні-портрет Богдана Ступки...
sobik21
07.03.2020 15:25
ОТДАЮ ВСЕ ЧТО ЕСТЬ Укажите предложение в котором нет ошибки в употреблении местоимения А) Ребенку страшно самому в комнате. Б) В ихнем доме часто гостили родственники из...
Aslanty
07.03.2020 15:25
Контрольна робота за темою «Образ майбутнього в літературі. Зростання і взаємини зі світом» (творчість Р. Д. Бредбері, Р. Шеклі, А. Ліндгрен) Початковий та середній рівень...
rayl2
12.08.2022 17:59
Как узнать свой номер билайн?...
kpiscom2
17.03.2021 13:08
В куске 25 м ткани. Хватит ли этой ткани, чтобы сшить 6 платьев, расходуя на каждое по 3 м ткани? Сколько метров ткани останется, если расходовать на каждое по 4 м?...
valentingordien
17.03.2021 13:08
2 тетради стоят столько же, сколько 1 блокнот, а 1 набор красок в 4 раза дороже, чем блокнот. 1) Посчитай, хватит ли 100 р., чтобы купить 8 таких тетрадей, 2 блокнота...
GranMartin
17.03.2021 13:08
На обороте обложки учебника изображён квадрат площадью 1 кв.дм. Красными линиями выделены два прямоугольника. Найди площадь каждого из них....
HarryPotter2015
17.03.2021 13:08
У входа в парк были две клумбы. Одна клумба имела форму квадрата, длина стороны которого 3 м, а другая — форму прямоугольника, длины сторон...
vladpasin34
17.03.2021 13:08
В корзине было 5 кг свёклы, а в 6 одинаковых ящиках — 60 кг. Во сколько раз больше было свёклы в одном ящике, чем в корзине?...
skillet12oz
17.03.2021 13:08
В альбоме для раскрашивания было 25 рисунков. В первый день Оля раскрасила несколько рисунков, во второй — на 3 рисунка больше, чем в первый. После этого...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
ReadLn(s);
for i:=2 to Length(s) do
if (s[i]='!') and (s[i-1]<>'!') then Inc(k);
WriteLn(k);
end.