Archive
Archive for March 23rd, 2008
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.
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.
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:
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:
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.
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.
Categories: Anti-GOTAM, Maths, Programming, Ruby, RubyEuler euler project, Maths, Programming, programming, RbEuler, Ruby
Punto G
¿Usted sabÃa algo de esto?
Improve the web with Nofollow Reciprocity.
Mi Wishlist
