Various incomplete solutions

This commit is contained in:
FuryFire
2011-04-10 13:19:21 +02:00
parent 94dc7ec373
commit 53e3cf4358
15 changed files with 173 additions and 8 deletions

20
ProjectEuler/029/desc.yml Normal file
View File

@ -0,0 +1,20 @@
title: How many distinct terms are in the sequence generated by a^b for 2 <= a <= 100 and 2 <= b <= 100?
url: http://projecteuler.net/problem=29
desc: |
Consider all integer combinations of a^b for 2 <= a 5 and 2 <= b <= 5:
2^2=4, 2^3=8, 2^4=16, 2^5=32
3^2=9, 3^3=27, 3^4=81, 3^5=243
4^2=16, 4^3=64, 4^4=256, 4^5=1024
5^2=25, 5^3=125, 5^4=625, 5^5=3125
If they are then placed in numerical order, with any repeats removed, we get the following sequence of 15 distinct terms:
4, 8, 9, 16, 25, 27, 32, 64, 81, 125, 243, 256, 625, 1024, 3125
How many distinct terms are in the sequence generated by a^b for 2 <= a <= 100 and 2 <= b <= 100?
solution: Bruteforce
solutions:
solve.php:
desc: Basic Solution - needs BCMath
language: php
solve.rb:
desc: Basic solution
language: ruby

View File

@ -0,0 +1,12 @@
<?php
define('A_START',2);
define('A_END',100);
define('B_START',2);
define('B_END',100);
for($a=A_START;$a<=A_END;$a++) {
for($b=B_START;$b<=B_END;$b++) {
$array[] = bcpow($a,$b);
}
}
echo count(array_unique($array));

21
ProjectEuler/029/solve.rb Normal file
View File

@ -0,0 +1,21 @@
MAX = 6*9**5
value = 2;
total = 0;
for value in (2..MAX) do
a = 0
end
while($value<354294) {
$a = 0;
for($t=0;$t<strlen($value);$t++) {
$a += pow(substr((string)$value,$t,1),5);
}
if($value == $a) { $total += $value;}
$value++;
}
echo $total;