Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
ket174
12.12.2020 11:36 •
Информатика
Составьте программу, которая определяет количество символов ‘! ’ в тексте
Показать ответ
Ответ:
ivanovapolina86
16.09.2020 23:17
Var s:string; i,k:integer;
begin
writeln('Введите строку');
readln(s);
k:=0;
for i:=1 to length(s)
do if s[i]='!' then k:=k+1;
writeln('k=',k);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
black17cat
10.03.2020 13:09
с ! Напишите функцию для печати содержимого текстового файла построчно. В начале каждой напечатанной строки должен быть номер строки, а затем - двоеточие как в исходных данных....
lehaguy
05.11.2021 19:12
с !! Напишите программу, которая открывает указанный текстовый файл, а затем отображает список всех уникальных слов, найденных в файле. Например ввод: input.txt Вывод: Список...
Kirillchakilev
23.05.2020 18:50
Автомобіль подолав відстань s км через населений пункт за t хв. Інформація вводиться в файл Input.txt. Визначити, чи не порушив водій правил дорожнього руху, якщо швидкість автомобіля...
Света11111111119079г
16.03.2022 14:22
PYTHON hel 1. Користувачем вводиться два імені в файл name.txt. Використовуючи конструкцію розгалуження програма повинна вивести в файл name1.txt імена в алфавітному порядку....
aa1055000p0c7vs
13.06.2022 07:47
Excel можете , особенно нужно найти границы диапазона ...
Tobirama0shok
19.03.2023 12:16
Информатика 11 класс ....
АлексейМв
25.04.2022 06:54
Определи, верны ли утверждения. BGВ презентацию можно добавить готовыйзвуковой файл.Запустить воспроизведение звука можнощелчком МЫШИ.В редакторе презентаций нельзязаписывать...
alina13lina87
21.04.2021 23:17
Найти косинус минимального из 4 заданных чисел Python...
fkfofo02
22.10.2022 13:53
Ребят, нужно . 5*216^1156-4*36^1147+6^1153-875 записали в системе счисления с осн 6. определите разность мелду колвом цифр 5 и колвом нулей в записи этого числа...
Maguire
25.03.2023 16:33
Пользователь отвечает на вопрос программы: «Сколько Вам лет» (0 выдает сообщение «Вам x лет». При этом стоит учесть, что для разных чисел используются разные склонения, например,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln('Введите строку');
readln(s);
k:=0;
for i:=1 to length(s)
do if s[i]='!' then k:=k+1;
writeln('k=',k);
end.