© unbekannterkünstler@newsgroup

Die geklammerten Ausdrücke in der RETURN-Anweisung liefern jeweils ein TRUE(1) oder FALSE(0). Dementsprechend wird auch das Gesamtergebnis TRUE oder FALSE sein.

Trifft der erste Ausdruck zu, ist Schaltjahr (alle 4 Jahre). Trifft der zweite Ausdruck auch zu, ist kein Schaltjahr (Ausnahmeregel alle 100 Jahre). Entsprechend würde das TRUE der 100-Jahre-Ausnahme vom TRUE der 4-Jahres-Regel abgezogen werden und somit ein FALSE ergeben (kein Schaltjahr). Ist der dritte Ausdruck auch WAHR, (Ausnahmeregel alle 400 Jahre - zuletzt im Jahr 2000), fällt der Ausfall des Schaltjahres aus - es ist Schaltjahr.

Dies ist die vermutlich kürzeste Version der Schaltjahreserkennung.

Der einfachste Weg, ein Programm schneller zu machen ist: Lass alles weg, was Du nicht brauchst.

/* REXX */
ARG JAHR
RETURN (JAHR // 4 = 0) - (JAHR // 100 = 0) + (JAHR // 400 = 0)