BCX Console Demonstration Program s30.bas
DIM
a$ a$
=
DATE$
?
"Today is "
, a$