Palindrome dates: Difference between revisions
J
m (→{{header|Haskell}}: Tidied.) |
(J) |
||
Line 1,223:
9290-09-29</pre>
=={{header|J}}==
<syntaxhighlight lang=J>task=: {{
r=. ''
days=. todayno 2020 02 02
while. 15 > #r do.
days=. ({:days)+1+i.1e4
r=. r, days#~(-:|.)"1":,.1 todate days
end.
15 10{.isotimestamp todate r
}}</syntaxhighlight>
<syntaxhighlight lang=J> task''
2021-12-02
2030-03-02
2040-04-02
2050-05-02
2060-06-02
2070-07-02
2080-08-02
2090-09-02
2101-10-12
2110-01-12
2111-11-12
2120-02-12
2121-12-12
2130-03-12
2140-04-12
</syntaxhighlight>
=={{header|Java}}==
<syntaxhighlight lang="java">
| |||