Mangelbehebung

[Vorheriges Kapitel] [Vorherige Seite] [Inhaltsverzeichnis] [Nächste Seite] [Nächstes Kapitel]

TriangleTester2.om
PROCEDURE IsTriangle(len1, len2, len3: INTEGER) : BOOLEAN;
BEGIN
   RETURN (len1 > len3 - len2) &
          (len1 > len2 - len3) &
          (len2 > len1 - len3)
END IsTriangle;

*Die Problematik mit den Überläufen läßt sich durch die Betrachtung von Differenzen vermeiden.
 
dublin$ ./TriangleTester
0/25 tests failed.
dublin$

[Vorheriges Kapitel] [Vorherige Seite] [Inhaltsverzeichnis] [Nächste Seite] [Nächstes Kapitel]
Copyright © 2004, 2005 Andreas Borchert, in HTML konvertiert am 18.02.2005