diff options
Diffstat (limited to 'challenge-150/abigail/ruby')
| -rw-r--r-- | challenge-150/abigail/ruby/ch-1.rb | 17 | ||||
| -rw-r--r-- | challenge-150/abigail/ruby/ch-2.rb | 24 |
2 files changed, 41 insertions, 0 deletions
diff --git a/challenge-150/abigail/ruby/ch-1.rb b/challenge-150/abigail/ruby/ch-1.rb new file mode 100644 index 0000000000..137545d9f8 --- /dev/null +++ b/challenge-150/abigail/ruby/ch-1.rb @@ -0,0 +1,17 @@ +#!/usr/bin/ruby + +# +# See https://theweeklychallenge.org/blog/perl-weekly-challenge-150 +# + +# +# Run as: ruby ch-1.rb < input-file +# + +ARGF . each_line do |line| + fib_prev, fib_last = line . strip() . split(" ") + while fib_last . length < 51 do + fib_prev, fib_last = fib_last, fib_prev + fib_last + end + puts (fib_last [50]) +end diff --git a/challenge-150/abigail/ruby/ch-2.rb b/challenge-150/abigail/ruby/ch-2.rb new file mode 100644 index 0000000000..5ecfdb6f3f --- /dev/null +++ b/challenge-150/abigail/ruby/ch-2.rb @@ -0,0 +1,24 @@ +#!/usr/bin/ruby + +# +# See https://theweeklychallenge.org/blog/perl-weekly-challenge-150 +# + +# +# Run as: ruby ch-2.rb +# + +primes = [2, 3, 5, 7, 11, 13, 17, 19] +for n in 1 .. 500 do + has_square = false + for p in 0 .. 7 do + if n % (primes[p] * primes[p]) == 0 then + has_square = true + end + end + if !has_square then + print (n) + print (" ") + end +end +print ("\n") |
