RosettaCodeData/Task/Show-the-epoch/Pascal/show-the-epoch.pas
2023-07-01 13:44:08 -04:00

9 lines
165 B
ObjectPascal

Program ShowEpoch;
uses
SysUtils;
begin
Writeln(FormatDateTime('yyyy-mm-dd hh:nn:ss.zzz', Now));
Writeln(FormatDateTime('yyyy-mm-dd hh:nn:ss.zzz', 0));
end.