помогите задачу решить

← →
223001 (2007-12-22 18:24) [0]

входной файл содержит строку Р состоящую из букв и других символов. Длина строки не привышает 2000 символов. На 2 строке задается слово s длиной не более 15 символов выходной файл должен содержать сообщение о том есть ли в предложении Р все буквы входящие в s

← →
TUser © (2007-12-22 18:38) [1]

читаешь обе строки

сортируешь их, например, Россия -> иоРсся

выкидываешь повторы иоРсся -> иоРся

потом пробегаешь обе строки в цикле типа

j := 1
for i := 1 to length of second do
while j <= length of first do
if first[j] = second[i] then
break
else inc j
if j > length of first or first[j] <> second[j] then
return false
return true

Можно с множествами. Берем пустое множество, Добавляем по очереди все символы строки s в множество, а потом вводим строку P посимвольно и вычитаем каждый символ из множества. Если осталось пустое множество, то ответ "есть".

помогите задачу решить Найти похожие ветки