Partition an integer x into n primes: Difference between revisions
m
→{{header|Phix}}: " + " output
m (Minor edit to Prolog code) |
m (→{{header|Phix}}: " + " output) |
||
Line 1,318:
integer {v,n} = tests[i]
object res = partition(v,n)
res = iff(res=0?"not possible":substitute(trim(sprint(res),"{}"),","," + "))
printf(1,"Partition %d into %d primes: %s\n",{v,n,res})
end for</lang>
{{out}}
<pre>
Partition 99809 into 1 primes:
Partition 18 into 2 primes:
Partition 19 into 3 primes:
Partition 20 into 4 primes: not possible
Partition 2017 into 24 primes:
Partition 22699 into 1 primes:
Partition 22699 into 2 primes:
Partition 22699 into 3 primes:
Partition 22699 into 4 primes:
Partition 40355 into 3 primes:
</pre>
|