Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.11.2015, 21:37   #1
DinaMadina
Новичок
Джуниор
 
Регистрация: 23.11.2015
Сообщений: 1
По умолчанию последовательность символов,состоящая из слов

Дана последовательность символов,состоящая из слов.Если существует буква,встречающаяся во всех словах то вывести на экран сообщение "да",иначе-сообщение "нет".
DinaMadina вне форума Ответить с цитированием
Старый 23.11.2015, 21:53   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Ну могу предложить делать так:
1) Разворот строки на массив слов: http://www.programmersforum.ru/showt...369#post398369
2) В циклах проверять каждую букву по этому массиву:
Код:
var i:integer; c:char; b:boolean;
...
for c:='a' to 'z' do begin
 b:=true;
 for i:=1 to Кол-во слов do 
   if pos(c,слово[i])=0 then begin b:=false;break;end;
 if b then writeln('Буква ',c,' есть в каждом слове');
end;
Где слово[i] - элемент массива слов.

Идея годится?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
адана строка символов, состоящая из слов. Вывести все слова строки в алфавитном порядке. 9066788 Паскаль, Turbo Pascal, PascalABC.NET 1 19.01.2014 17:00
Дана последовательность символов, состоящая из слов. Вывести на экран слова, в которых все символы повторяющиеся (строки на C) Роман64 Помощь студентам 0 22.12.2013 15:00
задача на СИ. Строки. Дана последовательность символов, состоящая из слов одинаковой длины. Найти слова, являющиеся "особой парой" Роман64 Помощь студентам 2 18.12.2013 16:06
Паскаль.Дана последовательность символов, состоящая из слов. икше Помощь студентам 2 03.12.2012 19:34
. Задана строка символов. состоящая из отдельных слов, разделенных пробелами. Преобразовать ее, оставив в ней только первые два Proskurina Паскаль, Turbo Pascal, PascalABC.NET 1 29.05.2012 19:35