Keçmişdə, indiki və ya gələcəkdə müəyyən bir tarixin həftənin hansı gününə düşdüyünü qalıcı təqvim adından öyrənə bilərsiniz. Belə bir cihazı evdə edə bilərsiniz.
Təlimat
Addım 1
Bir ay üçün yeddi təqvim kartı düzəldin, bunlardan birincisi ayın bazar ertəsi, ikincisindən çərşənbə axşamı, üçüncüsündən çərşənbə günündən başlayacaq və bu ayın bazar günü başlayacağı təqvimə qədər. Kartlara 1-dən 7-ə qədər nömrələr təyin edin və ilk nömrəni ayın bazar ertəsi günü başlayacağı təqvimə təyin edin. Bu kartları ağır kartondan düzəldin və laminatlaşdırın, çünki təqvim uzun illər saxlanılması və istifadəsi üçün hazırlanmışdır.
Addım 2
Həmişə təqvim dəstinə aşağıdakı formulu bir kartı daxil edin: h = d + ((13m-1) / 5) + r + (y / 4) + (v / 4) -2v, burada: - h sonrakı çevrilmənin aralıq nəticəsidir; - d - tarix; - m - bir qədər qeyri-adi bir şəkildə seçilmişdir: mart - ilk ay, fevral - on ikinci; - d - ilin nömrəsinin son iki rəqəmi (əgər ay yanvar və ya fevral aylarıdır, sonra əvvəlki il); - in - vahidin çıxarıldığı əsrin sayı (yanvar və ya fevral ayları üçün 1 əvəzinə 2 çıxarın) Bu kart eyni zamanda qalın kartondan və laminasiyadan hazırlanır. Bütün kartları bir-birinə bağlayın ki, itirilməsinlər. Əbədi təqvim üçün əlverişli bir vəziyyət düzəldin, istəsəniz, uyğun ölçülü bir kalkulyatoru orada saxlayın.
Addım 3
Göstərilən düstura görə hesablamalar aparıldıqdan sonra h-nin nəticəsini qalanı ilə yeddiyə bölün.
Addım 4
Bölmənin qalan hissəsindən modulu götürün.
Addım 5
Son hesablamanın nəticəsinə bərabər olan bir rəqəmi olan bir kart götürün və həftənin gününü təyin etmək üçün istifadə edin.
Addım 6
İstəyə görə bildiyiniz hər hansı bir proqramlaşdırma dilində hər iki düstur üçün hesablamalar aparmaq üçün bir proqram yazın. Bununla birlikdə, bu vəziyyətdə, qalıq ilə bölmək çətin ola bilər, çünki əksər proqramlaşdırma dillərində bunun üçün hazır bir funksiya yoxdur. Müvafiq funksiyanın mövcud olduğu Paskal dilini istifadə etmək ən rahatdır. Qalan ilə bölünmənin nəticəsinin tam hissəsini tapmaq üçün aşağıdakı formada bir sətirdən istifadə edin: c: = a div b. Bölünmənin qalan hissəsini tapmaq üçün başqa formalı bir sətirdən istifadə edin: c: = a mod b.
