/!\ Ce programme est un sous-programme qui ne peut pas fonctionner seul. Pour le tester, téléchargez le deuxième fichier DATER ! /!\

Ce petit sous-programme permet de calculer le jour de la semaine à partir d'une date donnée, comprise entre le 1er janvier de l'an 1 et le 31 décembre 9999.
Pour les dates passées, il prend en compte les changements de calendrier (je vous invite d'ailleurs à tester la date historique du 5 octobre 1582). Pour celles futures, elles sont calculées selon le calendrier grégorien actuel.

Initialisation : les variables J, M, et A servent à indiquer le jour, le mois et l'année.
Sortie : la variable R renvoie le jour de la semaine de la date indiquée (1 = LUNDI, ... 7 = DIMANCHE, et π si la date n'existe pas).

Source de l'algorithme : calendrier universel des éditions du Kangourou.