Der Nachfolger des WDR-Computerclub mit Wolfgang Back und Wolfgang Rudolph - ...und immer ein Bit übrigbehalten!


Das Forum zur C-Control-1
Welche C-Control-Varianten existieren?
Übersicht - Suchen - Neueste 50 Beiträge - Neuer Beitrag - Login - Registrieren
INFO - FAQ - CC2-Forum - CCPro-Forum 

 Re: Demoprogramm: Fakultätsberechnung mittels Rekursion Kategorie: Open-Micro/Open-Mini/Open-Midi/Open-Macro/Open-Maxi (von Dietmar, Homepage - 23.08.2020 22:59)
 Als Antwort auf Demoprogramm: Fakultätsberechnung mittels Rekursion von Dietmar - 23.08.2020 17:37
Dietmar nutzt:  Open-Micro, Open-Mini, Open-Midi, Open-Macro, Open-Maxi, Open-Mini Station
Hallo zusammen,

das Demoprogramm soll in erster Linie die Technik der Rekursion verdeutlichen. Auf der OM läßt sich die Fakultät natürlich leichter mittels FOR..NEXT-Schleife berechnen:

' ===========================================================================
' Fakultät per FOR..NEXT-Schleife berechnen.
' In OCBASIC 1.11a für Open-Maxi von Dietmar Harlos am 23. August 2020
' ===========================================================================

' --- Definitionen ----------------------------------------------------------

INCLUDE "omax.def"       'Definitionen für die Open-Maxi

DIM a BYTE               'eine Byte-Variable
DIM w INT                'eine Word-Variable (16 Bit) im Zweierkomplement

' --- Hauptprogramm ---------------------------------------------------------

PrintSpc=ON              'Bei PRINT dezimale Zahlen mit führendem Leerzeichen ausgeben
End2Host=ON              'Bei Programmende (siehe END) gleich in den Host-Modus wechseln

w=1
FOR a=2 TO 7
  w=w*a
NEXT a

PRINT "Die Fakultät von 7 ist";w;"."

END                      'Programm beenden. Wegen End2Host=ON in den Host-Modus gehen

' --- Programmende ---------------------------------------------------------


Viel Spaß und Erfolg mit den OM-Mikrocontrollern!

Dietmar

Passender Link: Infosite zu den OM-Mikrocontrollern

Meine Homepage: http://ccintern.dharlos.de

 Antwort schreiben

Bisherige Antworten:

Re: Demoprogramm: Fakultätsberechnung mittels Rekursion (von Joachim - 24.08.2020 16:01)
    Re: Demoprogramm: Fakultätsberechnung mittels Rekursion (von Dietmar - 24.08.2020 16:24)
        Rekursion verdeutlicht (von Dietmar - 24.08.2020 19:57)
            Re: Rekursion verdeutlicht (von Joachim - 24.08.2020 20:27)