Подсчитать, сколько раз в данной строке встречается заданная буква

@Люся · Регистрация: 11.02.2013

Author24 — интернет-сервис помощи студентам

Подсчитать, сколько раз в данной строке встречается некоторая буква, вводимая с клавиатуры.

@CodeR · 10.04.2013, 14:07

Pascal
1
2
3
4
5
6
s - введенная строка
ch - введённая буква
k - кол-во вхождений буквы
For i:=1 to Length(s) do
 if s[i]=ch then inc(k);
writeln(k,'раз(а) = ');

@Viktory1992 · 10.04.2013, 14:07

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
    str: String;
    ch: char;
    count,i: integer;
begin
    count := 0;
    write('vvedite stroku');
    readln(str);
    write('vvedite simvol')
    readln(ch);
    for i:=1 to length(str) do
        if str[i]=ch then count := count + 1;
    writeln('kol-vo simvolov', count);  
end.

@Люся · 10.04.2013, 16:11 **[ТС]**

спасибо

Новые блоги и статьи Все статьи Все блоги /
SwiftUI Data Flow: Передача данных между представлениями mobDevWorks 23.03.2025 При первом знакомстве со SwiftUI кажется, что фреймворк предлагает избыточное количество механизмов для передачи данных: @State, @Binding, @StateObject, @ObservedObject, @EnvironmentObject и другие. . . .	Моки в Java: Сравниваем Mockito, EasyMock, JMockit Javaican 23.03.2025 Как протестировать класс, который зависит от других сложных компонентов, таких как базы данных, веб-сервисы или другие классы, с которыми и так непросто работать в тестовом окружении? Для этого и. . .	Архитектурные паттерны микросервисов: ТОП-10 шаблонов ArchitectMsa 22.03.2025 Популярность микросервисной архитектуры объясняется множеством важных преимуществ. К примеру, она позволяет командам разработчиков работать независимо друг от друга, используя различные технологии и. . .	Оптимизация рендеринга в Unity: Сортировка миллиона спрайтов GameUnited 22.03.2025 Помните, когда наличие сотни спрайтов в игре приводило к существенному падению производительности? Время таких ограничений уходит в прошлое. Сегодня геймдев сталкивается с задачами совершенно иного. . .	Образование и практика Igor3D 21.03.2025 Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .
Lazarus. Таблица с объединением ячеек. Massaraksh7 21.03.2025 Понадобилась представление на экране таблицы с объединёнными ячейками. И не одной, а штук триста, и все разные. На Delphi я использовал для этих целей TStringGrid, и то, кривовато получалось. А в. . .	Async/await в Swift: Асинхронное программирование в iOS mobDevWorks 20.03.2025 Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .	Колмогоровская сложность: Приёмы упрощения кода ArchitectMsa 20.03.2025 Наверное, каждый программист хотя бы раз сталкивался с кодом, который напоминает запутанный лабиринт — чем дальше в него погружаешься, тем сложнее найти выход. И когда мы говорим о сложности кода, мы. . .	PostgreSQL в Kubernetes: Подготовка кластера и настройка Mr. Docker 20.03.2025 Когда доходит до контейнеризации баз данных и особенно таких требовательных к ресурсам системах как PostgreSQL, многие команды до сих пор колеблются, прежде чем перенести их в контейнерную. . .	C++26: Индексирование пакетов и метапрограммирование bytestream 20.03.2025 Эволюция C++ продолжается стремительными темпами – каждый новый стандарт приносит функциональность, о которой мы мечтали годами. Звучит слишком громко? Если вы когда-либо боролись с вариадическими. . .

@Люся 0 / 0 / 1 Регистрация: 11.02.2013 Сообщений: 35

	Подсчитать, сколько раз в данной строке встречается заданная буква 10.04.2013, 13:47. Показов 12924. Ответов 3 Метки нет (Все метки) Подсчитать, сколько раз в данной строке встречается некоторая буква, вводимая с клавиатуры. 0

@Люся 0 / 0 / 1 Регистрация: 11.02.2013 Сообщений: 35
	10.04.2013, 16:11 [ТС]
	спасибо 0

Опции темы