Pomoću takozvanog vječnog kalendara možete saznati na koji dan u tjednu pada određeni datum u prošlosti, sadašnjosti ili budućnosti. Takav uređaj možete napraviti kod kuće.
Upute
Korak 1
Napravite sedam kalendarskih karata za jedan mjesec, u prvoj u kojoj mjesec započinje u ponedjeljak, u drugoj u utorak, u trećoj od srijede i tako sve do kalendara u kojoj mjesec počinje u nedjelju. Karticama dodijelite brojeve od 1 do 7, a prvom broju kalendar u kojem mjesec počinje u ponedjeljak. Napravite ove kartice od teškog kartona i laminirajte ih, jer je kalendar dizajniran za pohranu i upotrebu dugi niz godina.
Korak 2
Također uvrstite u set vječnog kalendara karticu slijedeće formule: h = d + ((13m-1) / 5) + r + (y / 4) + (v / 4) -2v, gdje: - h je srednji rezultat koji će biti daljnja transformacija; - d - datum; - m - mjesec, odabran na pomalo neobičan način: ožujak - prvi mjesec, veljača - dvanaesti; - d - posljednje dvije znamenke broja godine (ako je mjesec je siječanj ili veljača, a zatim prethodna godina); - u - broj stoljeća od kojeg je jedinica oduzeta (za siječanj ili veljaču oduzmite 2 umjesto 1). Ova je karta također izrađena od debelog kartona i laminiranja. Spajajte sve karte zajedno tako da se ne izgube. Napravite prikladnu futrolu za vječni kalendar, ako želite, u nju spremite kalkulator odgovarajuće veličine.
3. korak
Nakon izračunavanja prema naznačenoj formuli, rezultat h podijelite sa sedam s ostatkom.
4. korak
Uzmi modul iz ostatka dijeljenja.
Korak 5
Uzmite karticu s brojem jednakim rezultatu zadnjeg izračuna, a zatim pomoću nje odredite dan u tjednu.
Korak 6
Po želji napišite program za izvođenje izračuna za obje formule na bilo kojem programskom jeziku koji poznajete. U ovom slučaju, međutim, dijeljenje s ostatkom može biti teško, jer u većini programskih jezika za to ne postoji gotova funkcija. Najprikladnije je koristiti jezik Pascal u kojem je dostupna odgovarajuća funkcija. Da biste pronašli cjelobrojni dio rezultata dijeljenja s ostatkom, upotrijebite redak sljedećeg oblika: c: = div b. Da biste pronašli ostatak dijeljenja, upotrijebite redak drugog oblika: c: = a mod b.
