Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
16
Task/Multifactorial/Julia/multifactorial.julia
Normal file
16
Task/Multifactorial/Julia/multifactorial.julia
Normal file
|
|
@ -0,0 +1,16 @@
|
|||
using Printf
|
||||
|
||||
function multifact(n::Integer, k::Integer)
|
||||
n > 0 && k > 0 || throw(DomainError())
|
||||
k > 1 || factorial(n)
|
||||
return prod(n:-k:2)
|
||||
end
|
||||
|
||||
const khi = 5
|
||||
const nhi = 10
|
||||
println("Showing multifactorial for n in [1, $nhi] and k in [1, $khi].")
|
||||
for k = 1:khi
|
||||
a = multifact.(1:nhi, k)
|
||||
lab = "n" * "!" ^ k
|
||||
@printf(" %-6s → %s\n", lab, a)
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue