miércoles, 22 de diciembre de 2010

PROYECTO EULER - Problemas interesantes!?!?!

Hasta ahora, pasar el tiempo y los momentos en compañía de la codificación para solucionar las cuestiones planteada por el Proyecto Euler ha sido una tarea de inmensa satisfacción sobre todo porque plantea retos sobresalientes que inquietan por nuevos conceptos y conocimientos, sin embargo algunas de estas cuestiones tienen cierto sin sabor cuando parecen planteadas por salir del paso, es más es incluso ofensivo que se planteen problemas tan sin sentido, ejemplo de ello es el problema 13 que para su desarrollo más tiempo se toma el introducir los escuálidos 100 números de 50 dígitos cada uno, que lo que implica sumarlos todos para saber cuales son los diez primero dígitos de este resultado.

Personalmente prefiero los problemas que implican el generar script's para encontrar resultados con características especiales como el problema 12 en el que piden descubrir el primer número triangular que tiene más de quinientos divisores.

Pero bueno, los problemas ya están escritos así que no hay modo, dejo script que generé para resolver el problema 12, este script debe mejorarse para que sea más precisa su ejecución pero así como esta consigue el objetivo.

%Encuentra números triangulares, en particular el número triangular que (en
%este caso) tenga más de 501 divisores, por mejorar que cuando encuentre el
%primero que cumpla la condición se detenga.
d=(1:1000000);
for n=1:1000000
    T=n*(n+1)/2;
    p=find(rem(T,d)==0);
    if length(d(p))>=501
        disp(T);
        disp(length(d(p)));
    end
end


Así hasta ahora están resueltos 12 de los 13 problemas en los que he trabajado porque el problema 11 pide enseñarle al computador a resolver sopas de letras con una matriz 20X20, resolver ese problema sera sublime jejeje.

esDebian

0 comentarios:

Publicar un comentario en la entrada