blob: 3130dde407111dccc30748d59d7909867f6ad40c (
plain)
1
2
3
4
5
6
7
8
9
10
|
Program Example19;
{ This program demonstrates the Tomorrow function }
Uses SysUtils,DateUtils;
Begin
Writeln(FormatDateTime('"Today is" dd mmmm yyyy',Today));
Writeln(FormatDateTime('"Tomorrow will be" dd mmmm yyyy',Tomorrow));
End.
|
