Programmiersprache Pascal

Nichtabweisschleife ( REPEAT - UNTIL - Schleife )

Struktogramm

aktion wird solange wiederholt, bis die Bedingung erfüllt ist.
Die Aktion wird immer mindestens einmal ausgeführt.

Pseudocode

   REPEAT
     anweisungsfolge
   UNTIL bedingung
Die Nichtabweisschleife ist ein Spezialfall des verallgemeinerten Zyklus:
   LOOP
     anweisungsfolge
     WHEN bedingung THEN EXIT
   END LOOP
Pascal

  REPEAT
    anweisungsfolge;
  UNTIL bedingung;
Abweichend von anderen Anweisungen muß hier die Anweisungsfolge nicht in BEGIN ... END eingeschachtelt werden.

Beispiel:

  REPEAT
    bestellen;
    essen;
    trinken;
  UNTIL konto < minimum;

Achtung:

Beispiel:
  WHILE 1.0 + x <> 1.0 DO
    x := x / 2;

  REPEAT
    x := x / 2;
  UNTIL 1.0 + x = 1.0;
Andere Sprachen (z.B. C) realisieren mitunter auch die Nichtabweisschleife mit Hilfe einer Wiederholbedingung.



P. Böhme, 06.09.1996