Days between dates: Difference between revisions
Content added Content deleted
(→{{header|Vlang}}: Rename "Vlang" in "V (Vlang)") |
|||
Line 1,863: | Line 1,863: | ||
</pre> |
</pre> |
||
=={{header|RPL}}== |
|||
{{works with|Halcyon Calc|4.2.7}} |
|||
≪ → d m y |
|||
≪ m 9 + 12 MOD |
|||
y OVER #10d / - |
|||
DUP 365 * OVER #4d / + OVER #100d / - SWAP #400d / + |
|||
SWAP 306 * 5 + #10d / + d + 1 - B→R |
|||
≫ ≫ |
|||
'GREGN' STO |
|||
≪ SWAP 1 2 '''START''' |
|||
→ date |
|||
≪ date 9 10 SUB STR→ date 6 7 SUB STR→ date 1 4 SUB STR→ |
|||
GREGN SWAP |
|||
≫ |
|||
'''NEXT''' - |
|||
≫ |
|||
'NBDAYS' STO |
|||
"1902-01-01" "1968-12-25" NBDAYS |
|||
"2019-01-02" "2019-01-01" NBDAYS |
|||
"2019-01-01" "2019-03-01" NBDAYS |
|||
"2020-01-01" "2020-03-01" NBDAYS |
|||
{{out}} |
|||
<pre> |
|||
4: 24465 |
|||
3: -1 |
|||
2: 59 |
|||
1: 60 |
|||
</pre> |
|||
=={{header|Ruby}}== |
=={{header|Ruby}}== |
||
<syntaxhighlight lang="ruby">require "date" |
<syntaxhighlight lang="ruby">require "date" |