changed file and folder names to a sane scheme

This commit is contained in:
ikselven 2017-07-12 00:08:34 +02:00
parent c19129e6dd
commit b725343392
34 changed files with 44 additions and 0 deletions

38
e0005/euler0005.jl Normal file
View file

@ -0,0 +1,38 @@
#!/usr/bin/julia
function isPrime(number::UInt64)
if number in [2,3,5]
return true
elseif number % 2 == 0
return false
end
for i range(3, 2, floor(UInt64, number))
if number % i == 0
return false
end
end
return true
end
function generatePrimeList(number::UInt64)
primeList = Array{UInt64,1}([2])
limit = div(number-1, 2)
for i range(3, 2, limit)
if isPrime(i)
push!(primeList, i)
end
end
primeList
end
function euler005(number::UInt64)
primeList = generatePrimeList(number)
exponents = floor.(UInt64, log.(primeList, number))
prod(primeList .^ exponents)
end
euler005(1)
@time euler005(20)

4
e0005/euler0005.rkt Normal file
View file

@ -0,0 +1,4 @@
#lang racket
(do ((n 20 (+ n 20)))
((andmap zero? (map ((curry remainder) n) (range 1 21))) n))