A Maple egy fejlett matematikai problémamegoldó és programozói szoftver.
-
xDJCx #455 Öröknaptárra egy gyors megoldás, a Maple beépített naptárjával:
OROKNAPTAR:=proc(ev,ho,nap)
description "Oroknaptar a Maple beepitett naptar algoritmusa alapjan";
local dt,napok;
uses StringTools;
napok:=table(["Sunday"="vasárnap","Monday"="hétfõ","Tuesday"="kedd","Wednesday"="szerda","Thursday"="csütörtök","Friday"="péntek","Saturday"="szombat"]);
dt := ParseTime("%Y-%m-%d", cat(ev,"-",ho,"-",nap));
cat(ev,".",ho,".",nap,". ",napok[dt:-weekDayName]);
end proc;
OROKNAPTAR(2010,5,7);