Numbers in base 10 that are palindromic in bases 2, 4, and 16: Difference between revisions

Add C
(Add BASIC)
(Add C)
Line 126:
20485
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}}==
2,115

edits