Day of the week: Difference between revisions

Optimised! :)
(Optimised! :))
Line 2,745:
'''Works with''' TI-84+/SE only
<lang ti83b>
:For(A, 2008,2121
:If dayofWk(A,12,25)=1
:If Ans=1
:Disp A
:End
Line 2,770 ⟶ 2,769:
2118
Done</pre>
 
=={{header|TUSCRIPT}}==
<lang tuscript>
Anonymous user