Anonymous user
Find the last Sunday of each month: Difference between revisions
Added Elixir
(Added Elixir) |
|||
Line 514:
2013-Nov-24
2013-Dec-29</pre>
=={{header|Elixir}}==
<lang elixir>defmodule RC do
def lastSunday(year) do
Enum.map(1..12, fn month ->
lastday = :calendar.last_day_of_the_month(year, month)
daynum = :calendar.day_of_the_week(year, month, lastday)
sunday = lastday - rem(daynum, 7)
{year, month, sunday}
end)
end
end
y = String.to_integer(hd(System.argv))
Enum.each(RC.lastSunday(y), fn {year, month, day} ->
:io.format "~4b-~2..0w-~2..0w~n", [year, month, day]
end)</lang>
{{out}}
<pre>
C:\Elixir>elixir lastSunday.exs 2013
2013-01-27
2013-02-24
2013-03-31
2013-04-28
2013-05-26
2013-06-30
2013-07-28
2013-08-25
2013-09-29
2013-10-27
2013-11-24
2013-12-29
</pre>
=={{header|Erlang}}==
Line 552 ⟶ 586:
2013-12-29
</pre>
=={{header|FBSL}}==
<lang qbasic>#APPTYPE CONSOLE
Line 587 ⟶ 622:
Press any key to continue...
</pre>
=={{header|FreeBASIC}}==
<lang FreeBASIC>' version 23-06-2015
| |||