Сделать так чтоб не повторялись буквы

19.12.2013, 14:19. Показов 2014. Ответов 0

Метки нет (Все метки)

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

Помогите пожалуйста с задачей
Условие : Дана непустая последовательность слов из строчных русских букв; между
соседними словами - запятая, за последним словом - точка. Напечатать в алфавитном
порядке: все гласные буквы, которые входят в каждое слово.

Нужно сделать так чтоб буквы не повторялись к примеру : Слово Апппаап - должно вывести только "А" и "П"

Вот моя программа :

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Program lalala;
Var
s,alf,gls:string;
i,j:integer
c:char;
begin
alf='ёуеыаоэяию';
gls:=' ';
readln(s);
for i:=1 to length(s) do
for j:=1 to length(alf) do
if s[i]=alf[j] then
gls:=gls+s[i];
writeln(gls);
for i:=1 to length(gls) d0
for j:=length(gls) downto 2 do
begin
c:=gls[j];
if gls[j]<gls[j-1] then
begin
gls[j]:=gls[j-1];
gls[j-1]:=c;
end;
end;
writeln(gls);
readln;
end.

Если что то не так поправьте) до воскресенье плизз)

Вложения

прога2.rar (21.6 Кб, 2 просмотров)

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

19.12.2013, 14:19

Ответы с готовыми решениями:

Как сделать так чтобы вопросы не повторялись?
Есть массив из 5-ти вопросов. Выбираются случайно 3. Как сделать так чтобы вопросы не повторялись? Заранее спасибо. ...

Расставить на поле 4х4 буквы ABCD так что бы они не повторялись ни в строке, ни в столбце
Добрый день! помогите в написаны игры. Суть игры : Нужно расставить на поле 4на4 буквы ABCD так что бы они не повторялись ни в строке,...

Как сделать так чтоб в TextBox не вводились цифры или буквы?
как поставить ограничения на то что вводишь в TextBox ? чтоб сразу нее вводились либо буквы либо цифры

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

19.12.2013, 14:19

Помогаю со студенческими работами здесь

как сделать так, чтоб если вводишь не цифры, а буквы он не выкидывал из программы, а выполнял команду
Всем привет. Помогите. я начал программировать в С++ и спрогал калькулятор. вот код: #include <iostream> #include...

Массив случайных чисел, как сделать чтоб они не повторялись?
Я сделал массив с рандомными числами, как сделать чтоб они не повторялись ? srand(time(NULL)); int*Arr; const int R=10; ...

Собрать слово из двух слов так, чтобы буквы в составленном слове не повторялись
Всем привет, нужна помощь,есть два слова 'апр' и 'рио', нужно сделать из них одно слово без повторов букв, т.е должно получиться...

Судоку: Сделать так, чтобы цифры не повторялись
Пишу игру судоку. Не могу сделать так, чтобы цифры не повторялись. Вот код заполнения поля: procedure zapolnenie; var...

Сколькими способами можно составить машинное слово из пяти букв, так чтобы буквы в слове не повторялись
помогите мне задачами никак решить не могу Буквы слова КОМБИНАТОРИКА написаны на карточках. Сколькими способами можно составить...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.	Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .

Наверх