Date format: Difference between revisions

Content added Content deleted

Inline

@@ Line 2,050: / Line 2,050: @@
 =={{header|Free Pascal}}==
+<lang Pascal>program Format_Date_Time;
-<lang Pascal>WriteLn(FormatDateTime('yyyy-mm-dd', Now) + #13#10 + FormatDateTime('dddd, mmmm dd, yyyy', Now));</lang>
+//{$mode objfpc}{$H+}
+uses
+  SysUtils;
+begin
+  WriteLn(FormatDateTime('yyyy-mm-dd', Now) +#13#10+ FormatDateTime('dddd, mmmm dd, yyyy', Now));
+end.
+    </lang>
 {{out}}
 <pre>