0 / 0 / 0
Регистрация: 27.12.2013
Сообщений: 16

Программа для определения кол-ва знаков препинания и строчных гласных букв

09.03.2014, 20:53. Показов 1798. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Всем привет.
Подскажите пожалуйста, как можно в Delphi 7 релизовать следующую задачку:
Составит программу, которая определяет кол-во знаков препинания и кол-во строчных гласных букв в заданном наборе символов.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
09.03.2014, 20:53
Ответы с готовыми решениями:

Посчитать количество гласных букв, согласных букв, цифр и знаков препинания в строке
С клавиатуры введена строка на кирилице. Посчитать количество гласных букв, согласных букв, цифр и знаков препинания в строке. Если...

Дан текст, состоящий из строчных латинских букв и знаков препинания.
Дан текст, состоящий из строчных латинских букв и знаков препинания. Определить, какие гласные буквы (a,e,i,o,u) встретились в этом тексте...

Дан текст из строчных латинских букв. Составить программу определения количества гласных букв (a,e,i,o,u)
Дан текст из строчных латинских букв. Составить программу определения количества гласных букв (a,e,i,o,u), встречающихся в тексте.

1
Эксперт Pascal/Delphi
 Аватар для droider
4925 / 2792 / 856
Регистрация: 04.10.2012
Сообщений: 10,177
09.03.2014, 22:35
Лучший ответ Сообщение было отмечено Myokard как решение

Решение

Myokard, для русского набора символов (текста)
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
const
RusGlas=['а', 'у', 'о', 'ы', 'и', 'э', 'я', 'ю', 'ё', 'е']; //гласные
symb=['.', ',', ';', ':', '-', '!', '?', '(', ')']; //знаки препинания
var
stroka:string;
i, glascount, symbcount:Byte;
begin
stroka :=edt1.Text;  //входная строка
glascount :=0;  symbcount :=0;
for i := 1 to Length(stroka) do begin
if stroka[i] in RusGlas then Inc(glascount);
if stroka[i] in symb then Inc(symbcount);
end;
ShowMessage('Количество строчных гласных - '+InttoStr(glascount)+#10#13+
'Количество знаков препинания - '+InttoStr(symbcount));
end;
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
09.03.2014, 22:35
Помогаю со студенческими работами здесь

Ограничение в пароле: наличие строчных и прописных букв, а также знаков препинания
Занимаюсь созданием программы,застопорилась на моменте ввода пароля,нужно обезопасить программу. У одной группы пользователей ограничение...

Посчитать количество гласных букв и знаков препинания
как посчитать? дано предложение подсчитайте количество знаков препинания и гласных букв в строке

Кол-во знаков препинания и букв в строке
Требуется подсчитать кол-во букв и знаков препинания в строке, но программа упорно не хочет считать буквы, выдаёт кол-во равное нулю. В чём...

Программа для вывода на экран знаков препинания(с указанием их АСКИ-кода) знаков препинания
Напишите и отладьте программу для вывода на экран(с указанием их АСКИ -кода) знаков препинания

Подсчитать количество знаков препинания и гласных букв в строке.
Даны предложения. Подсчитать количество знаков препинания и гласных букв в строке. Добавлено через 18 минут помогите надо позавал


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

Новые блоги и статьи
Анализ и линтинг кода JavaScript: ESLint, Prettier и JSHint
run.dev 26.04.2025
JavaScript прошёл долгий путь от простого языка для анимации веб-страниц до основы современной веб-разработки. С ростом сложности приложений, увеличением кодовых баз и масштабированием команд. . .
Паттерны в Python: Singleton, Factory и Observer
py-thonny 26.04.2025
Паттерны проектирования — это проверенные временем решения типовых проблем разработки программного обеспечения. Их история берёт начало с книги "Приёмы объектно-ориентированного проектирования. . . .
Исключения в C#: Stack Overflow, Access Violation и Out of memory
stackOverflow 26.04.2025
Исключения в C# — это не только механизм оповещения о проблемах, а целое искусство управления потоком выполнения программы в экстремальных ситуациях. Обычное исключение, например,. . .
Логирование в C# ASP.NET Core с помощью Serilog, ElasticSearch, Kibana
stackOverflow 25.04.2025
Помните те времена, когда для анализа проблемы приходилось подключаться к серверу, искать нужный лог-файл среди десятков других и вручную фильтровать тысячи строк в поисках ошибки? К счастью, эти дни. . .
Структура "железный OnKeyUp" вместо антидребезга. Полностью асинхронный счётчик.
Hrethgir 25.04.2025
Программа для симуляции схемы - Logisim Evolution В общем какое-то время отвлёкся, так было надо, теперь когда запилю это на verilog и FPGA , досоставлю заявку в ФИПС на полезную модель - не готов. . .
Автоматизация Amazon Web Services (AWS) с Boto3 в Python
py-thonny 25.04.2025
Облачные вычисления стали неотъемлемой частью современной ИТ-инфраструктуры, а Amazon Web Services (AWS) занимает лидирующие позиции среди провайдеров облачных услуг. Управление многочисленными. . .
Apache Kafka vs RabbitMQ в микросервисной архитектуре
ArchitectMsa 25.04.2025
Современная разработка ПО всё чаще склоняется к микросервисной архитектуре — подходу, при котором приложение разбивается на множество небольших, автономных сервисов. В этой распределённой среде. . .
Параллельное программирование с OpenMP в C++
NullReferenced 24.04.2025
Параллельное программирование — подход к созданию программ, когда одна задача разбивается на несколько подзадач, которые могут выполняться одновременно. Оно стало необходимым навыком для. . .
Цепочки методов в C# с Fluent API
UnmanagedCoder 24.04.2025
Современное программирование — это не только решение функциональных задач, но и создание кода, который удобно поддерживать, расширять и читать. Цепочки методов и Fluent-синтаксис в C# стали мощным. . .
Мульти-тенантные БД с PostgreSQL Row Security
Codd 23.04.2025
Современные облачные сервисы и бизнес-приложения всё чаще обслуживают множество клиентов в рамках единой программной инфраструктуры. Эта архитектурная модель, известная как мульти-тенантность, стала. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru