Quellcode-Bibliothek

^© Kompilation durch diese Firma

[Weder Korrektheit noch Funktionsfähigkeit der Software werden zugesichert.]

Datei: k_r.siv Sprache: Cobol

Original von: verschiedene^©

       identification division.
       program-id. tp627.
      * aus Herold/Lutz/Wohlrab
      * Grundlagen der Informatik
      * p. 627
       author. JD.
       date-written. 3.11.2008.
       date-compiled.
       data division.
       working-storage section.
       77 w pic 9(8).
       77 r pic 9(8).
       77 i pic 9(8).
       linkage section.
       77 summ pic 9(8).
       procedure division using summ.
      * alle Zahlen zwischen 1 und 10 aufaddieren
          perform varying i from 1 by 1 until i>10
            compute summ=function succ(summ)
          end-perform.
        end-program tp627.

¤ Dauer der Verarbeitung: 0.2 Sekunden (vorverarbeitet) ¤

Download des Quellennavigators
Download des sprechenden Kalenders
in der Quellcodebibliothek suchen

Haftungshinweis

Die Informationen auf dieser Webseite wurden nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit, noch Qualität der bereit gestellten Informationen zugesichert.

Bemerkung:

Die farbliche Syntaxdarstellung ist noch experimentell.