Galite sužinoti, kuriai savaitės dienai konkreti data yra praeityje, dabartyje ar ateityje, naudodamiesi vadinamuoju amžinuoju kalendoriumi. Tokį prietaisą galite pasigaminti namuose.
Nurodymai
1 žingsnis
Pasidarykite septynias kalendorines korteles vienam mėnesiui, iš kurių pirmasis prasideda pirmadienį, antrasis antradienį, trečias nuo trečiadienio ir t. T. Iki kalendoriaus, kuriame mėnuo prasideda sekmadienį. Kortelėms priskirkite skaičius nuo 1 iki 7 ir pirmąjį skaičių priskirkite kalendoriui, kuriame mėnuo prasideda pirmadienį. Padarykite šias korteles iš sunkiojo kartono ir jas laminuokite, nes kalendorius yra skirtas laikyti ir naudoti daugelį metų.
2 žingsnis
Į amžino kalendoriaus rinkinį taip pat įtraukite kortelę, kurios formulė tokia: h = d + ((13m-1) / 5) + r + (y / 4) + (v / 4) -2v, kur: - h yra tarpinis rezultatas, kurį reikia toliau transformuoti; - d - data; - m - mėnuo, pasirinktas šiek tiek neįprastu būdu: kovo mėn. - pirmasis mėnuo, vasario mėn. - dvyliktas; - d - du paskutiniai metų skaičiaus skaitmenys (jei mėnuo yra sausis arba vasaris, tada ankstesni metai); - į šimtmetį, iš kurio atimtas vienetas, skaičius (sausio arba vasario mėn. atimkite 2, o ne 1). Ši kortelė taip pat pagaminta iš storo kartono ir laminavimo. Susegkite visas korteles taip, kad jos nepamestų. Padarykite patogų amžinojo kalendoriaus dėklą, jei norite, jame laikykite atitinkamo dydžio skaičiuoklę.
3 žingsnis
Atlikę skaičiavimus pagal nurodytą formulę, padalykite h rezultatą iš septynių su likusia dalimi.
4 žingsnis
Paimkite modulį iš likusios dalybos.
5 žingsnis
Paimkite kortelę, kurios skaičius lygus paskutinio skaičiavimo rezultatui, ir naudokite ją savaitės dienai nustatyti.
6 žingsnis
Pasirinktinai parašykite programą, kad atliktumėte abiejų formulių skaičiavimus bet kuria jums žinoma programavimo kalba. Tačiau šiuo atveju dalijimasis su likusia dalimi gali būti sunkus, nes daugumoje programavimo kalbų tam nėra parengtos funkcijos. Patogiausia naudoti „Pascal“kalbą, kuria galima naudotis atitinkama funkcija. Norėdami rasti dalijimo rezultato su likusiąja dalimi sveiką skaičių, naudokite šios formos eilutę: c: = a div b. Norėdami rasti likusią padalijimo dalį, naudokite kitos formos eilutę: c: = a mod b.