fork download
  1. uses sysutils;
  2.  
  3. var I:Integer;
  4.  
  5. begin
  6. for I:=1 to 12 do WriteLn(FormatDateTime('mmmm',EncodeDate(2000,I,1)));
  7. end.
Success #stdin #stdout 0s 388KB
stdin
Standard input is empty
stdout
January
February
March
April
May
June
July
August
September
October
November
December