Re: Numer tygodnia w roku. [HMP2014]
Kod:
int sub NumerTygodnia(string sData)
date dMoja
dMoja.FromStr( sData )
date dBazowa
dBazowa.Set( dMoja.Year, 1, 1 )
dBazowa.SubDays( (dBazowa.DayOfWeek() - 2) + 7 )
NumerTygodnia = dMoja.WeeksUntil( dBazowa )
endsub
print NumerTygodnia("2014-12-29")
