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