print "The last day of the month is ",
  Date_to_Text_Long((Today())[0..1],Days_in_Month((Today())[0..1]));