Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.85/13: Рейтинг темы: голосов - 13, средняя оценка - 4.85
29 / 29 / 2
Регистрация: 11.02.2012
Сообщений: 57
1

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

26.04.2012, 09:49. Показов 2387. Ответов 3
Метки нет (Все метки)

3.1. Введите с клавиатуры фамилию, имя и отчество. Программа должна преобразовать введенные данные и вывести их в виде инициалов и фамилии. Например, при вводе Тургенев Иван Сергеевич программа должна вывести И.С. Тургенев.
3.2. Дан текст на русском языке. Напечатать в алфавитном порядке все гласные буквы, которые не входят ни в одно слово.


Помогите сделать на паскале!!!
1
Лучшие ответы (1)
Заказывайте контрольные, курсовые и дипломы здесь.
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.04.2012, 09:49
Ответы с готовыми решениями:

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

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

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

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

3
Почетный модератор
7957 / 3928 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
26.04.2012, 11:55 2
Лучший ответ Сообщение было отмечено ildwine как решение

Решение

Цитата Сообщение от Жека78 Посмотреть сообщение
3.2. Дан текст на русском языке. Напечатать в алфавитном порядке все гласные буквы, которые не входят ни в одно слово.
подойдет?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
const g: set of char=['У','Е','Ы','А','О','Э','Я','И','Ю',
                      'у','е','ы','а','о','э','я','и','ю'];
var p,t: set of char;
    str: string;
    i: byte;
 
begin
p:=[];
write('s='); readln(str);
for i:=1 to length(str) do
    if not (str[i] in p) then p:=p+[str[i]];
t:=g-p;
for i:=1 to 255 do
    if chr(i) in t then write(chr(i),' ');
readln;
end.
1
29 / 29 / 2
Регистрация: 11.02.2012
Сообщений: 57
26.04.2012, 13:33  [ТС] 3
Да подойдёт!)))
спасиб!)
1
1 / 1 / 0
Регистрация: 23.12.2011
Сообщений: 37
25.05.2012, 18:31 4
Напечатать в алфавитном порядке все гласные буквы, которые входят только в одно слово. как сделать такую?
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.05.2012, 18:31

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

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

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

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

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


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

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

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