Numbers in base 10 that are palindromic in bases 2, 4, and 16: Difference between revisions
Content added Content deleted
Not a robot (talk | contribs) (Add BASIC) |
Not a robot (talk | contribs) (Add C) |
||
Line 126: | Line 126: | ||
20485 |
20485 |
||
21845</pre> |
21845</pre> |
||
=={{header|C}}== |
|||
<lang c>#include <stdio.h> |
|||
#define MAXIMUM 25000 |
|||
int reverse(int n, int base) { |
|||
int r; |
|||
for (r = 0; n; n /= base) |
|||
r = r*base + n%base; |
|||
return r; |
|||
} |
|||
int palindrome(int n, int base) { |
|||
return n == reverse(n, base); |
|||
} |
|||
int main() { |
|||
int i, c = 0; |
|||
for (i = 0; i < MAXIMUM; i++) { |
|||
if (palindrome(i, 2) && |
|||
palindrome(i, 4) && |
|||
palindrome(i, 16)) { |
|||
printf("%5d%c", i, ++c % 12 ? ' ' : '\n'); |
|||
} |
|||
} |
|||
printf("\n"); |
|||
return 0; |
|||
}</lang> |
|||
{{out}} |
|||
<pre> 0 1 3 5 15 17 51 85 255 257 273 771 |
|||
819 1285 1365 3855 4095 4097 4369 12291 13107 20485 21845</pre> |
|||
=={{header|Factor}}== |
=={{header|Factor}}== |