Numbers in base 10 that are palindromic in bases 2, 4, and 16: Difference between revisions
Content added Content deleted
m (→{{header|Wren}}: Minor tidy) |
(Added Easylang) |
||
Line 523: | Line 523: | ||
</pre> |
</pre> |
||
=={{header|EasyLang}}== |
|||
<syntaxhighlight> |
|||
func reverse n base . |
|||
while n > 0 |
|||
r = r * base + n mod base |
|||
n = n div base |
|||
. |
|||
return r |
|||
. |
|||
for i = 0 to 25000 - 1 |
|||
if reverse i 2 = i and reverse i 4 = i and reverse i 16 = i |
|||
write i & " " |
|||
. |
|||
. |
|||
</syntaxhighlight> |
|||
{{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|Euler}}== |
=={{header|Euler}}== |