fork download
  1. visits = %w[
  2. CS
  3. CA
  4. SOB
  5. ABO
  6. OBD
  7. LDO
  8. AOL
  9. ]
  10. result = {}
  11. visits.each do |visit|
  12. chars = visit.chars
  13. chars.each do |char|
  14. result[char] ||= []
  15. result[char] += chars - [char]
  16. end
  17. end
  18. result.each do |k, v|
  19. puts '%s: %s' % [k, v.join(', ')]
  20. end
  21.  
Success #stdin #stdout 0.01s 6440KB
stdin
Standard input is empty
stdout
C: S, A
S: C, O, B
A: C, B, O, O, L
O: S, B, A, B, B, D, L, D, A, L
B: S, O, A, O, O, D
D: O, B, L, O
L: D, O, A, O