uses System.SysUtils, System.DateUtils;
var
VictoryDate: TDateTime;
begin
//date only
VictoryDate := EncodeDate(1945, 5, 9);
WriteLn(FormatDateTime(
'yyyy-mm-dd', VictoryDate));
//date and time
VictoryDate := EncodeDateTime(
1945, 5, 9, 1, 0, 0, 0);
WriteLn(FormatDateTime(
'yyyy-mm-dd hh:nn', VictoryDate));
end.