blob: 58bafa47e4c3cc252db872584fc0fc70bb8d6424 (
plain)
1
2
3
4
5
6
7
8
9
10
|
Program Example18;
{ This program demonstrates the Yesterday function }
Uses SysUtils,DateUtils;
Begin
Writeln(FormatDateTime('"Today is " dd mmmm yyyy',Today));
Writeln(FormatDateTime('"Yesterday was " dd mmmm yyyy',Yesterday));
End.
|
