Jump to content

Date format: Difference between revisions

→‎{{header|Free Pascal}}: A complete proegram
(→‎{{header|Free Pascal}}: A complete proegram)
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
<lang Pascal> WriteLn(FormatDateTime('yyyy-mm-dd', Now) + #13#10 + FormatDateTime('dddd, mmmm dd, yyyy', Now));</lang>
end.
</lang>
{{out}}
<pre>
Cookies help us deliver our services. By using our services, you agree to our use of cookies.