Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Maxyim
15.02.2020 15:48 •
Информатика
Задано значение строковой переменной. определить сколько раз буква "к" встречается в данной строке.
Показать ответ
Ответ:
DenGamer11
07.10.2020 10:43
Данная программа написана для Pascal:
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;
if k=0 then writeln('ни разу') else writeln(k);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kabylbekova2002
17.02.2022 10:22
Валгоритмах записанных ниже, используются переменные а,в. определите значение переменных после выполнения алгоритмов а : = 10; b : = 20; b : = а + b; la : = b - а;...
Glebborg
15.03.2023 12:27
Создать массив а(15).определить произведение элементов массива,стоящих на четных местах., !...
Rita53
28.12.2021 18:27
Скорость передачи данных через adsl соединение равно 6400 бит/с. передача файла через это соединение заняла 9 минут. определите размер файла в килобайтах...
Sharabyrin
04.06.2022 05:04
Каждый компьютер Подключение к интернету называется: А) Узел Б) Серверы. В) протокол. Г) клиенты. E) Дата-центр. F) Доменное имя H)Система....
sasharuf2000
31.01.2021 11:10
Написать программу, которая определяет и выводит на экран количество слов в строке...
farsama
27.09.2020 21:50
Формативное оценивание1. Один из двух постулатов теории специальной теории относительности Эйнштейна состоит в том, что скорость света в свободном пространстве инвариантна.I....
Stepancherk
16.03.2021 11:56
Нужна ли запятая перед словом МОЯ? Сyчкa-eбyчкa, спокойной ночи моя любовь ❤️❤️❤️...
Инна0794
18.08.2022 15:13
Благодарная память Прочитай тексты. Определи, в каких вариантахуказана верная характеристика обоих текстов.Посмотреть текст А В31Посмотреть текст Б...
Daman1777
20.06.2020 22:23
Кинутий під кутом до горизонту м’яч досяг висоти 20 м. Скільки часу він перебував у польоті? задачa2 Камінь кинули зі швидкістю 30 м/с під кутом 60° до горизонту....
nata1116
30.01.2021 00:57
A) 3- topshiriqda berilgan matndan Hoshim- jonning xarakter-xususiyatini ifodalovchi sifatlarni daftaringizgako chirib yozing; b) Hoshimjonga xos xarakter-xususiyatlardanqaysi...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
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;
if k=0 then writeln('ни разу') else writeln(k);
end.