10001th prime: Difference between revisions
m
→{{header|Prolog}}
Line 513:
findnsols(Index, N, isPrime(N), PrimeList),!,
last(PrimeList, PrimeAtIndex),
format('prime(~
{{out}}
<pre>?- do.
|