Wilson primes of order n: Difference between revisions

Content added Content deleted
m (added whitespace, used superscripts, used a bigger font size to better show the superscripts and factorial symbol, used an HTML "times" symbol instead of x.)
m (→‎{{header|REXX}}: changed a comment.)
Line 172: Line 172:
say ' order │'center(title, w )
say ' order │'center(title, w )
say '───────┼'center("" , w, '─')
say '───────┼'center("" , w, '─')
do n=oLO to oHI /*search for Wilson primes of order O.*/
do n=oLO to oHI /*search for Wilson primes of order N.*/
nmf= !(n-1); pom = -1**n /*precalculate a factorial and +|- */
nmf= !(n-1); pom = -1**n /*precalculate a factorial and +|- */
$=
$=