Day of the week: Difference between revisions

Content added Content deleted
No edit summary
m (→‎{{header|FreeBASIC}}: removed redundant code)
Line 241: Line 241:


' empty keyboard buffer
' empty keyboard buffer
While InKey <> "" : Var _key_ = InKey : Wend
While InKey <> "" : Wend
Print : Print "hit any key to end program"
Print : Print "hit any key to end program"
Sleep
Sleep
Line 276: Line 276:


' empty keyboard buffer
' empty keyboard buffer
While InKey <> "" : Var _key_ = InKey : Wend
While InKey <> "" : Wend
Print : Print "hit any key to end program"
Print : Print "hit any key to end program"
Sleep
Sleep
Retrieved from "https://rosettacode.org/wiki/Day_of_the_week"