Leap year: Difference between revisions
Content added Content deleted
(→BQN: add) |
|||
Line 1,329: | Line 1,329: | ||
1997 is not a leap year. |
1997 is not a leap year. |
||
2000 is a leap year.</pre> |
2000 is a leap year.</pre> |
||
=={{header|BQN}}== |
|||
<syntaxhighlight lang="bqn">Leap ← 0=4|100÷˜⍟(0=|)¨⊢</syntaxhighlight> |
|||
Or: |
|||
<syntaxhighlight lang="bqn">Leap ← -˝0=4‿100‿400|⌜⊢</syntaxhighlight> |
|||
Test: |
|||
<syntaxhighlight lang="bqn">Leap 1900‿1996‿1998‿1999‿2000‿2024‿2100</syntaxhighlight> |
|||
{{out}} |
|||
<pre>⟨ 0 1 0 0 1 1 0 ⟩</pre> |
|||
=={{header|Bracmat}}== |
=={{header|Bracmat}}== |