Restructuring

This commit is contained in:
2024-07-01 13:49:44 +00:00
parent f11b705ef0
commit 8d60e1b905
194 changed files with 1296 additions and 112 deletions

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;