Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.75/8: Рейтинг темы: голосов - 8, средняя оценка - 4.75
0 / 0 / 0
Регистрация: 01.03.2014
Сообщений: 19

Множества. Определить максимальное количество букв латинского алфавита, идущих в тексте подряд

09.02.2015, 16:47. Показов 1693. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дано предложение. Определить максимальное количество букв латинского алфавита, идущих в тексте подряд. Например, са123мама1234папа578нет. Ответ 4.

Добавлено через 38 секунд
Не получается решить )
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
09.02.2015, 16:47
Ответы с готовыми решениями:

Определить количество гласных букв латинского алфавита в тексте
Помогите пожалуйста) Определить количество гласных букв латинского алфавита в некотором тексте.

В заданном тексте из букв латинского алфавита определить общее число вхождений в него букв a, e, c, h
В заданном тексте из букв латинского алфавита определить общее число вхождений в него букв a, e, c, h. Помогите написать эту программу,...

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

2
 Аватар для APALoff
1648 / 1077 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
09.02.2015, 17:23
Цитата Сообщение от Will good Посмотреть сообщение
букв латинского алфавита
Цитата Сообщение от Will good Посмотреть сообщение
Например, са123мама1234папа578нет
Нестыковочка...
1
 Аватар для Новичок
1682 / 1098 / 489
Регистрация: 17.07.2012
Сообщений: 5,361
09.02.2015, 17:28
Лучший ответ Сообщение было отмечено Will good как решение

Решение

Цитата Сообщение от Will good Посмотреть сообщение
са123мама1234папа578нет
Ну на латинские буквы не сильно похоже...
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
const let=['a'..'z','A'..'Z'];
var s:String;
i,max,k:Byte;
begin
Writeln('Введите строку:');
Readln(s);
s:=s+' '; 
max:=0;
k:=0;
for i:=1 to Length(s) do
 if s[i] in let then inc(k) else
 begin
  if k>max then max:=k;
  k:=0;
 end;
Writeln('Ответ:',max);
Readln;
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
09.02.2015, 17:28
Помогаю со студенческими работами здесь

Определить длину содержащейся в тексте максимальной серии символов, отличных от букв латинского алфавита
1.Текст – это непустая последовательность букв. Дан текст. Определить длину содержащейся в тексте максимальной серии символов, отличных от...

Найти наибольшее количество идущих подряд букв в тексте
Добрый вечер помогите пожалуйста Дан текст найти наибольшее количество идущих подряд букв

Дана строка символов. Определить количество букв латинского алфавита
7. Дана строка символов. Определить количество букв латинского алфавита. 7. Дано рядок символів. Визначити кількість літер латинського...

Дана строка символов. Определить количество букв латинского алфавита
Дана строка символов. Определить количество букв латинского алфавита.Задача с++

Определить максимальное количество идущих подряд атомов
пытаюсь написать программу, которая для списка определяет максимальное количество идущих подряд атомов. (define (max a b) (cond ((>...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Автоматическое создание документа при проведении другого документа
Maks 29.03.2026
Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений
Maks 29.03.2026
Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при создании или изменении элементов справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru