Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
123SS
0 / 0 / 0
Регистрация: 23.11.2016
Сообщений: 35
1

Вывести на экран все русские согласные буквы строки в алфавитном порядке.

21.12.2016, 00:34. Просмотров 1062. Ответов 1
Метки нет (Все метки)

Вывести на экран все русские согласные буквы строки в алфавитном порядке.

Добавлено через 2 часа 7 минут
пж ребят
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.12.2016, 00:34
Ответы с готовыми решениями:

Вывести на экран все русские согласные буквы строки
Решить задачу! Задание 1 "Вывести на экран все русские согласные буквы строки." Задание 2...

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

Вывести в алфавитном порядке все встречающиеся русские буквы.
Дан текст.Вывести в алфавитном порядке все встречающиеся в нем русские буквы. Задача дана для...

Вывести в алфавитном порядке все согласные буквы, которые не входят ни в одно слово
Помогите решить задачу написать программу в Паскале ABC, пожалуйста. За ранее спасибо. Дан текст...

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

1
Tosse
56 / 56 / 114
Регистрация: 09.12.2016
Сообщений: 143
21.12.2016, 12:43 2
Лучший ответ Сообщение было отмечено 123SS как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
type
T_buk = set of char;
var
a,b:T_buk;
s:string;
i,k:integer;
begin
writeln('Введите строку');
readln(s);
b:=[];
a:=['б', 'в', 'г', 'д', 'ж', 'з', 'й', 'к', 'л', 'м', 'н', 'п', 'р', 'с', 'т', 'ф', 'х', 'ц', 'ч', 'ш', 'щ'];
for i:=1 to length(s) do
    if s[i] in a then
        begin
        include(b,s[i]);
        end;
for i:=1 to 255 do
    if chr(i) in b then
        write(chr(i):2);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.12.2016, 12:43

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

Напечатать в алфавитном порядке все согласные буквы, которые не входят ни в одно слово
Задача на множества. Дан текст на русском языке. Напечатать в алфавитном по*рядке все согласные...

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


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru