Eigene Beobachtungen vom Kometen 153P/Ikeya-Zhang und ...

I Anhang
I.1 Berechnung der Anzahl
Tage vom 1.1.
Die Anzahl Tage werden
vom 1.Januar des Jahres aus gezählt, dabei ist der 1.1. der Tag 1, der 2.1.
ist der Tag 2, etc.
I.1.1 Rechenbeispiel
Die Anzahl Tage vom
1.Januar bis zum 11.März:
In der Tabelle (I.1.2) sehen wir, dass der 28.Februar
der 59.Tag ist. Von diesem Zeitpunkt bis zum
11.3. sind es noch 11 Tage,
nun ist die Anzahl der Tage vom 1.Januar; 59+11 = 70
Somit sind vom 1.Januar bis zum 11.März 70 Tage vergangen.
I.1.2 Tabelle zur Berechnung der Anzahl Tage vom 1.1. an
Tabelle 5:Berechnungstabelle der Anzahl Tage
Ende des Monats Anzahl Tage Ende des Monats Anzahl Tage Ende des Monats Anzahl Tage
31.Januar 31 31.Mai 151 30.September 273
28.Februar 59 30.Juni 181 31.Oktober 304
31.März 90 31.Juli 212 30.November 334
30.April 120 31.August 243 31.Dezember 365
I.1. 3 Programm
zur Berechnung der Anzahl Tage
Dieses Programm
entwickelte ich für den Taschenrechner TI-89
Tabelle 6: Programm zur Berechnung der Anzahl Tage vom 1.1. an für den TI-89
Quelltext Bildschirmanzeige
:Prgm :ClrIO :Local q,r,j1,j2,j11,m1,r,b,a,x
:Dialog :Title "Berechnung der Anzahl Tage n ©B.Burtscher "
:DropDown "Monat",seq(string(i), i,1,12),q
:DropDown "Tag",seq(string(i),i,1,31),r
:EndDlog
:PopUp {"2001","2002","2003","2004"},j11 :2001→j1 :2001→j2
:If j11=2 Then
:j1+1→j1 :j2+1→j2 :EndIf :If j11=3 Then :j1+2→j1 :j2+2→j2
:EndIf :If j11=4 Then :j1+3→j1 :j2+3→j2 :EndIf :1→m1 :1→t1 :If m1