« previous entry | next entry »
Maijs. 17., 2006 | 10:06 pm
posted by: taapati in pajautaa
ar kādu funkciju var (ja vispār var) pārvērst dienu (kā datumu un mēnesi) dienas numurā pēc kārtas (gadā)? nu tā, lai no 01.01 iegūtu 1, bet no 01.02 iegūtu 32? turklāt 29.februāri var ignorēt :)
from:
cannibalsmith
date: Maijs. 18., 2006 - 08:35 am
#
if (gads - 2000) / 4 = abs((gads - 2000) / 4) then menesi[2] := 29;
Tad dienas numuru gadā iegūsti ar ciklu
for i := 1 to month do rezultats := rezultats + menesi[i];
un beigās pieskaiti dienu sakitu.
Atbildēt | Diskusija
from:
cannibalsmith
date: Maijs. 18., 2006 - 08:36 am
#
Atbildēt | Iepriekšējais