Serabe Reloaded

Bienvenidos a un lugar donde la programación, los vídeos, las divagaciones y las subnormalidad se combinan para demostrar que el caos puede ser bello.

Serabe Reloaded

Conecto ergo sum. Non conecto ergo urgueo.

"Cualquiera puede enfadarse, eso es algo muy sencillo. Pero enfadarse con la persona adecuada, en el grado exacto, en el momento oportuno, con el propósito justo y del modo correcto, eso, ciertamente, no resulta tan sencillo."
Aristóteles.

Problema 2

Enunciado:
Suma todos los números pares de la sucesión de Fibonacci menores que un cuatro millón.

Primera solución:

La primera solución es muy simple. Hay un método que devuelve un array con todos los números de la sucesión de Fibonacci menores que un máximo max tomando como inicio un array de dos elementos arr.

PLAIN TEXT

RUBY:

def fib1(max,arr=[1,1])
while(arr.last <max) do
arr <<(arr.last+arr[arr.size-2])
end
arr.pop
arr
end

Después simplemente se eliminan los impares y se suman los que quedan.

PLAIN TEXT

RUBY:

def euler2a(max, ini=[1,1])
fib1(max,ini).delete_if{|x| x%2 == 1}.inject{|memo,obj| memo+obj}
end
puts euler2a(4e6)

Segunda solución:

Esta solución es un poco mejor. Se va a hacer un nuevo método que calcule todos los números de la sucesión de Fibonacci menores que un máximo max pero que sólo almacene aquellos que pasen una condición que se le pasa como bloque:

PLAIN TEXT

RUBY:

def fib2(max,a=1,b=1)
arr = []
arr <<a if yield(a)
while(b<max) do
arr <<b if yield(b)
a,b=b,a+b
end
arr
end

Después sólo hace falta pasar el filtro adecuado, y sumar los resultados:

PLAIN TEXT

RUBY:

def euler2b(max,a=1,b=1)
fib2(max,a,b){|x| x%2==0}.inject{|memo,obj| memo+obj}
end
puts euler2b(4e6)

Tercera solución:

Esta tercera solución es una modificación directa de la segunda. En vez de almacenar los datos, se suman directamente.

PLAIN TEXT

RUBY:

def fib3(max,a=1,b=1)
res = 0
res += a if yield(a)
while(b<max) do
res += b if yield(b)
a,b=b,a+b
end
res
end
def euler2c(max,a=1,b=1)
fib3(max,a,b){|x| x%2==0}
end
puts euler2c(4e6)

Y eso es todo.

Actualización: Hay diferencias entre la página de PyEuler y la del Proyecto Euler. El problema ha sido actualizado para corresponderse con esta última.

23 Mar 08 | Anti-GOTAM, Matemáticas, Programación, Ruby, RubyEuler

Escribe un comentario

"El hombre, en su orgullo, creó a Dios a su imagen y semejanza."
Friedrich Nietzsche

Serabe Reloaded

Serabe Reloaded

Problema 2

Escribe un comentario

Chat

Categorías

Blogroll

Ci-Fi

Programación

Mi Wishlist

Mi meta