TWC277

2 files changed, 24 insertions, 0 deletions

diff --git a/challenge-277/deadmarshal/ruby/ch-1.rb b/challenge-277/deadmarshal/ruby/ch-1.rb
new file mode 100644
index 0000000000..1f27e056d0
--- /dev/null
+++ b/challenge-277/deadmarshal/ruby/ch-1.rb
@@ -0,0 +1,15 @@
+#!/usr/bin/env ruby
+
+def count_common(arr1,arr2)
+  h = Hash.new(0)
+  (arr1 + arr2).each {|e| h[e] += 1 }
+  (h.values.select{|e| e == 2}).size
+end
+
+p count_common(['Perl','is','my','friend'],
+	       ['Perl','and','Raku','are','friend'])
+p count_common(['Perl','and','Python','are','very','similar'],
+	       ['Python','is','top','in','guest','languages'])
+p count_common(['Perl','is','imperative','Lisp','is','functional'],
+	       ['Crystal','is','similar','to','Ruby'])
+
diff --git a/challenge-277/deadmarshal/ruby/ch-2.rb b/challenge-277/deadmarshal/ruby/ch-2.rb
new file mode 100644
index 0000000000..f7137c59c7
--- /dev/null
+++ b/challenge-277/deadmarshal/ruby/ch-2.rb
@@ -0,0 +1,9 @@
+#!/usr/bin/env ruby
+
+def strong_pairs(arr)
+  (arr.uniq.combination(2).select{|e| (e[0] - e[1]).abs < e.min}).size
+end
+
+p strong_pairs([1,2,3,4,5])
+p strong_pairs([5,7,1,7])
+