home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / MADTRB9.ZIP / DATE.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1985-12-12  |  124 b   |  9 lines
  1. Program date;
  2. {$I date.inc }
  3. begin
  4.  clrscr;
  5.  gotoxy(1,2);
  6.  write('Date today: (day/month/year) ');
  7.  showdate;
  8. end.
  9.