RosettaCodeData/Task/Semordnilap/Crystal/semordnilap.cr
2025-02-27 18:35:13 -05:00

8 lines
239 B
Crystal

words = File.read("unixdict.txt").each_line.to_set
semordnilap = words.compact_map {|word|
reversed = word.reverse
if word < reversed && words.includes? reversed
{ word, reversed }
end
}
p semordnilap.size, semordnilap.sample(5)