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.
0 comentarios:
Publicar un comentario en la entrada