1

Тема: Допоможіть із завданням Pascal

Задана послідовність слів. Вважаючи перше слово зразком, вибрати ті слова, які можуть бути отримані із зразка шляхом переставлення його літер.
Буду вдячний ,якщо допоможете

2

Re: Допоможіть із завданням Pascal

спочатку реалізуй для одного слова, потім для послідовності

Подякували: snip.dzhek1

3

Re: Допоможіть із завданням Pascal

Сортуйте літери в словах, а тоді порівнюйте. Наприклад, 'кіт' і 'тік' можуть бути отримані одне з іншого. Для перевірки відсортуємо літери, отримаємо 'ікт' та 'ікт' - однакові стрічки.

Подякували: snip.dzhek1

4

Re: Допоможіть із завданням Pascal

Я би для кожного слова завів масив типу такого:

type
  TLettersCount = array['a' .. 'z'] of Integer;

І підраховував кількість різних літер у кожному слові.

Подякували: snip.dzhek1