products/Sources/formale Sprachen/COBOL/Test-Suite/SQL P/cdr/   (LibreOffice Version 25.8.3.2©)  Datei vom 4.1.2008 mit Größe 9 kB image not shown  

Quellcode-Bibliothek double-2.cob   Sprache: Cobol

  

       identification division.
       program-id. dou2.
       author. "Patrick Cousot".
       date-written. 10.3.2006.
       date-compiled.
       data division.
       working-storage section.
       01 pic X.
         88 xfalse value 0.
         88 xtrue  value 1.
       77 x pic 9(4) comp-4.
       77 y pic 9(4) comp-4.
       77 z pic 9(4) comp-4.
       procedure division.
      *   if ((x < -1.0e38) or (x > 1.0e38)) 
          if ((x < -1.0e13) or (x > 1.0e13)) 
           stop run.
         perform until false
          compute y = x + 1.0e21
          compute z = x - 1.0e21
      *     compute y = x + 1.0e18
      *     compute z = x - 1.0e11
           compute x = y - z
         end-perform.
       end-program dou2.

Messung V0.5 in Prozent
C=88 H=100 G=94

¤ 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.0.0Bemerkung:  (vorverarbeitet am  2026-09-28) ¤

*Bot Zugriff




Wurzel

Suchen

PVS Prover

Isabelle Prover

NIST Cobol Testsuite

Cephes Mathematical Library

Vienna Development Method

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 und die Messung sind noch experimentell.