Даны две строки символов S1 и S2. Выяснить, верно ли, что среди символов строки S1 имеются все буквы строки S2
// PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018
// Внимание! Если программа не работает, обновите версию!
begin
(ReadlnString.ToHashSet >= ReadlnString.ToHashSet).Print
end.
Нас не удивишь, что когда недоучка не понимает решение, он не вопрос задает, а отмечает решение нарушением))) Модераторы, конечно, потом отметку снимают, а вот клеймо недоучки остаётся)))
Еще одна, более точная реализация, (ReadlnString.ToHashSet.Except(ReadlnString.ToHashSet).Count=0).Print
В ПАСКАЛЕ
Это и есть Паскаль, глаза раскройте пошире, там в первой строке написано ЖИРНЫМИ БОЛЬШИМИ буквами что паскаль
// PascalABC.NET 3.4.2,
Я же сразу написал, что недоучка...