Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!wuarchive!uunet!zephyr.ens.tek.com!tektronix!percy!m2xenix!quagga!ufhx1!cssjs2
From: cssjs2@ufhx1 (Mr JM Scheepers)
Newsgroups: comp.lang.pascal
Subject: Re: Leap year function
Message-ID: <1991Jun6.150135.3022@ufhx1>
Date: 6 Jun 91 15:01:35 GMT
References: <4183@jethro.Corp.Sun.COM> <a4Dy31w164w@allanon.UUCP>
Organization: University of Fort Hare, Alice, Ciskei
Lines: 32

In <a4Dy31w164w@allanon.UUCP> marcos@allanon.UUCP (Marcos Della) writes:

>acm@Sun.COM (Andrew MacRae) writes:
>>In article <JPRD34w164w@allanon.UUCP>, marcos@allanon.UUCP (Marcos Della)
>> But it *doesn't* clear up the 1722 problem.  (In 1722, eleven days were
>> dropped out of the month of September.)
>> 

>You know, I didn't know about the 1722 year.  What month did they drop out the
>days from?  Or did they just shorten all the months except February.

>Also, why the heck di they do it and why that particular year?
>Marcos

The Julian calendar (after Caesar) was introduced in 45 BC, but because of
its simple rules for leap years, Pope Gregory  XIII introduced changes to
correct the discrepancy. He decreed that Thursday, October 4, 1582 would be
followed by Friday, October 15. The British Empire only accepted this in 
1752, and Russia only after the revolution, in 1918.

A function for calculating leap years would be:

function Leap(y: year): boolean;
begin
  Leap := (y mod 4 = 0) and ((y mod 100 <> 0) or (y mod 400)=0))
end

-- 
Inus Scheepers | Internet cssjs2@ufhx1.ufh.ac.za |Disclaimer: Is it my fault
Dept Comp Sci  | Phone +27 404 32011 x 2488 |     that power walks on
Univ Fort Hare | Fax   +27 404 31669 |            crooked legs? 
P/Bag X1314, Alice 5700, Ciskei, South Africa |