MinsPerDay
Модуль: SysUtils
const
MinsPerDay = HoursPerDay * MinsPerHour;
Константа возвращает количество минут в дне. Значение получается путем умножения значения констант HoursPerDay и MinsPerHour :
Константа, как и другие, связанные с датой и временем, объявлена в модуле SysUtils :
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 |
program DateTimeConst; {$APPTYPE CONSOLE} uses SysUtils; begin Writeln('Уведомление: ', HoursPerDay); Writeln('Уведомление: ', MinsPerHour); Writeln('Уведомление: ', SecsPerMin); Writeln('Уведомление: ', MSecsPerSec ); Writeln('Уведомление: ', MinsPerDay); Writeln('Уведомление: ', SecsPerDay); Writeln('Уведомление: ', MSecsPerDay); Readln; end. |