Панграма є рядком , яка містить всі літери a- zвід англійського алфавіту, НЕ чутливі до регістру. (Добре, якщо в панграмі міститься більше однієї копії листа або якщо крім букв вони містять небуквені символи.)

Напишіть програму або функцію, вхідною інформацією якої є список рядків і яка виводить одну або кілька рядків, які мають такі властивості:

• Кожен вихідний рядок повинен бути панграмою.
• Кожен вихідний рядок повинен бути сформований об'єднанням одного або декількох рядків зі списку вводу, розділених пробілами.
• Кожен вихідний рядок повинен бути найкоротшим або прив’язаним до найкоротшого, серед усіх рядків із цими властивостями.

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

Ви можете припустити, що в тексті даних немає недрукованих символів або пробілів, і що жодне слово в ньому не перевищує (26 разів більше природного логарифму довжини списку) символів. (Ви, однак, не можете припускати, що введення не містить нічого, крім букв або лише малих літер; розділові знаки та великі літери цілком можливі.)

Введення та вихід можуть бути надані у будь-якому розумному форматі. Для тестування вашої програми я рекомендую використовувати два тестові випадки: словник англійських слів (у більшості комп'ютерів є одне) та наступний випадок (для якого ідеальна (26-літерна) панограма неможлива, тому вам доведеться знайти її що містять дублікати букв):

abcdefghi
defghijkl
ijklmnop
lmnopqrs
opqrstuvw
rstuvwxyz

Ви повинні включити зразок результатів програми разом з поданням. (Це може бути різним для різних людей внаслідок використання різних списків слів.)

Стан перемоги

Це виклик з кодом з обмеженою складністю . Переможець - найкоротша програма (у байтах), яка працює в поліноміальний час . (Підсумок для людей, які не знають, що це означає: якщо подвоїти розмір списку слів, програма повинна стати повільнішою не більше ніж постійний коефіцієнт. Однак постійний фактор, про який йде мова, може бути таким же великим, як і ви Наприклад, допустимо, щоб воно стало в чотири рази повільніше або у вісім разів повільніше, але не для того, щоб воно стало меншим на коефіцієнт довжини списку слів; фактор, через який він стає повільніше, повинен бути обмежений.)

Ruby 159 (ітеративний)

Рубін 227 220 229 227 221 (рекурсивна)

Нове ітеративне рішення (засноване на алгоритмі, описаному @Niel):

c={('A'..'Z').to_a=>""}
while l=gets
d=c.clone
c.map{|k,v|j=k-l.upcase.chars
w=v+" "+l.strip
d[j]=w if !c[j]||c[j].size<w.size}
c=d
end
x=c[[]]
p x[1..-1] if x

Старе рекурсивне рішення:

W=[]
while l=gets
W<<l.strip
end
I=W.join(" ")+"!!"
C={[]=>""}
def o(r)if C[r]
C[r]
else
b=I
W.map{|x|s=r-x.upcase.chars
if s!=r
c=x+" "+o(s)
b=c if c.size<b.size
end}
C[r]=b
end
end
r=o ('A'..'Z').to_a
p r[0..-2] if r!=I

Вимірювання байтів базується на відведенні остаточного нового рядка у файлі, що не має значення ruby 2.3.1p112. Кількість байтів повернулася назад після виправлення невеликої помилки (додавання.downcase .upcase для нечутливості до випадку, як цього вимагає постановка проблеми).

Ось більш рання версія до скорочення ідентифікаторів і така:

#!/usr/bin/env ruby

$words = [];

while (line=gets)
  $words << line[0..-2];
end

$impossible = $words.join(" ")+"!!";

$cache = {};

def optimize(remaining)
  return $cache[remaining] if ($cache[remaining]);
  return "" if (remaining == []);

  best = $impossible;

  $words.each{|word|
    remaining2 = remaining - word.chars;
    if (remaining2 != remaining)
      curr = word + " " + optimize(remaining2);
      best = curr if (curr.length < best.length);
    end
  };

  $stderr.puts("optimize(#{remaining.inspect})=#{best.inspect}");

  return $cache[remaining] = best;
end

result = optimize(('a'..'z').to_a);

puts(result[0..-1]);

Як це працює? В основному він підтримує набір символів, які все ще охоплюють, і повторюється лише на слові, якщо це зменшить непокритий набір. Додатково запам'ятовуються результати рекурсії. Кожному підмножині 2 ^ 26 відповідає запис таблиці запам'ятовування. Кожен такий запис обчислюється у часі, пропорційному розміру вхідного файлу. Отже, вся справа в цьому O(N)(де Nрозмір вхідного файлу), хоча і з величезною константою.

JavaScript (ES6), 249 248 байт, можливо, конкуруючи

a=>a.map(w=>w.replace(/[a-z]/gi,c=>b|=1<<parseInt(c,36)-9,b=0,l=w.length)&&(m.get(b)||[])[0]<l||m.set(b,[l,w]),m=new Map)&&[...m].map(([b,[l,w]])=>m.forEach(([t,s],e)=>(m.get(e|=b)||[])[0]<=t+l||m.set(e,[t+l+1,s+' '+w])))&&(m.get(-2^-1<<27)||[])[1]

Пояснення: Перетворює масив, перетворюючи букви в бітову маску, зберігаючи лише найкоротше слово для кожної бітової маски на карті. Потім повторіть копію карти, збільште карту, додавши кожну комбіновану бітову маску, якщо отриманий рядок буде коротшим. Нарешті поверніть рядок, збережений для растрової карти, відповідну панграмі. (Повертається, undefinedякщо такої рядки не існує.)

Python 3, 98 , 94 , 92 байт

print([s for s in input().split()if sum([1 for c in range(65,91)if chr(c)in s.upper()])>25])

Ітератується через представлення алфавіту ASCII та додає 1 до списку, якщо буква знайдена в рядку. Якщо сума списку більше 25, він містить усі літери алфавіту і буде надрукований.