Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
a.n.t

Подсчитать сколько раз заданная пара символов входит во вводимый текст

29.12.2009, 23:17. Показов 1453. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Тема лабы: символьный тип
Использовать строковый тип нельзя. Заранее огромное спасибо.

Добавлено через 21 час 45 минут
Помогите позязя, завтра сдавать(

Добавлено через 4 часа 49 минут
Галактеко опасносте, помогите плз
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
29.12.2009, 23:17
Ответы с готовыми решениями:

В заданной последовательности символов подсчитать число пробелов и определить, входит ли в неё заданная буква
Дана последовательность символов х1, х2, ..., xn. Определить: -количество пробелов; -входит ли в последовательность буква Р. Заранее...

Подсчитать, сколько раз встречается заданная буква в последнем слове текста
Задача:Подсчитать, сколько раз встречается заданная буква в последнем слове текста Выводит ноль.Помогите исправить код программы. ...

Определить сколько раз слово “did” входит в заданный текст
Помогите Сделать лаби, пожалуста, я не могу сделать их, так как времени мало, завтра должен сдать(((. Помогите будь-ласка потому что к...

1
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
30.12.2009, 15:47
Лучший ответ Сообщение было отмечено как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses crt;
var s1,s2,c1,c2:char;
   k:integer;
begin
clrscr;
writeln('Введите 2 символа:');
readln(s1,s2);//пробел и Enter тоже символы! Лучше не вводить.
writeln('Введите текст, окончаеие ввода 0');
k:=0;
read(c1);
repeat
read(c2);
if(c1=s1)and(c2=s2)then k:=k+1;
c1:=c2;
until c2='0';
readln;
writeln;
write('Пара ',s1,s2,' встречена ',k,' рз.');
readln
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
30.12.2009, 15:47
Помогаю со студенческими работами здесь

Подсчитать сколько раз среди данных символов встречается символ + и сколько раз - символ * в отдельности
1. Дана последовательность из n символов. Подсчитать сколько раз среди данных символов встречается символ + и сколько раз - символ * в...

Определить, сколько раз в заданный текст входит каждая из 3 введенных букв
Написать программу для оределения - сколько раз в заданный текст входит каждая из 3 введенных букв.

Выяснить, входит ли данное слово в указанный текст, и если да, то сколько раз.
Дан файл ,содержащий произвольный текст на русском языке. Выяснить, входит ли данное слово в указанный текст, и если да, то сколько раз.

Подсчитать, сколько раз среди данных символов встречается символ +, и сколько раз символ *
Даны натуральное число n, символы s1, …, sn. Подсчитать: а) сколько раз среди данных символов встречается символ +, и сколько раз символ...

Дано целое число N .Входит ли цифра 3 в его запись, если входит, то сколько раз
Дано целое число N.Входит ли цифра 3 в его запись если входит , то сколько раз?


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru