Neighbour primes: Difference between revisions

m
Line 531:
np=$(_neighbourprime ${i} parr)
(( np > 0 )) && printf "%3d %3d %6d\n" ${parr[i]} ${parr[i+1]} ${np}
done</lang>{{out}}<pre>
{{out}}<pre>
p q p*q+2
--- --- -----
Line 553 ⟶ 554:
419 421 176401
439 443 194479
487 491 239119</pre>
</pre>
 
=={{header|Mathematica}}/{{header|Wolfram Language}}==
70

edits