Path: utzoo!attcan!utgpu!jarvis.csri.toronto.edu!mailrus!purdue!gatech!hubcap!bo
From: bo@hubcap.clemson.edu (Bo Slaughter)
Newsgroups: comp.lang.pascal
Subject: Day of Week Algorithm
Message-ID: <6570@hubcap.clemson.edu>
Date: 25 Sep 89 01:11:30 GMT
Organization: Clemson University, Clemson, SC
Lines: 12


Does anyone out there have a day of the week algorithm in pascal?
I want to be able to pass to it the date, and get the day out.
Something like this:

function dayofweek(day,month,year:integer):integer;

Pass to it 09 as the month, 24 as the day, and 1989 as the year, and get
1 as the output (sunday).

Thanks,
Bo Slaughter