Přidat otázku mezi oblíbenéZasílat nové odpovědi e-mailem Kde zistím aký deň bol ?

d, m, r sa zadá, hádam netreba vysvetľovať, čo je čo.1

if m < 3 then
  begin
    dec(r);
    inc(m, 12);
  end;
x := trunc(r * 365.25 - r div 100 + r div 400 + m * 30.6 + d) mod 7
Algoritmus je spamäti, ale funkčný. Zdroj je kniha Svet počítačov. 0 je myslím sobota, 1 nedeľa atď, treba otestovať, to si už nepamätám.

Edit: Funkčnosž algoritmu je 100 % od dátumu 15. 10. 1582 odkedy sa prešlo na gregoriánsky kalendár z juliánskeho.

Reakce na odpověď

1 Zadajte svou přezdívku:
2 Napište svou odpověď:
3 Pokud chcete dostat ban, zadejte libovolný text:

Zpět do poradny