Anonymous user
Special divisors: Difference between revisions
m
→{{header|REXX}}: added a foot header.
MaiconSoft (talk | contribs) (Added Delphi example) |
m (→{{header|REXX}}: added a foot header.) |
||
Line 238:
if $\=='' then say center(idx, 7)"│" substr($, 2) /*possible display residual output.*/
if cols>0 then say '───────┴'center("" , 1 + cols*(w+1), '─')
say
say 'Found ' commas(sdns) @sdns
Line 255 ⟶ 256:
61 │ 157 163 167 169 173 179 181 187 191 193
71 │ 197 199
───────┴───────────────────────────────────────────────────────────────────────────────────────────────────────────────
Found 72 special divisors N that reverse(D) divides reverse(N) for all divisors D of N, where N < 200
| |||