Projekt mit
1 €
unterstützen?
So geht das *:


Step 12 - Programmsteuerung 4:

Die "While"-Schleife

Eine while-Schleife wiederholt die Befehlszeilen zwischen begin und end so lange, bis die Bedingung false ist.
Es wird dabei zuerst nach der Bedingung gefragt und dann erst, insofern diese wahr ist, die Anweisungen bearbeitet. Daher wird diese Schleife auch als "abweisende Schleife" bezeichnet.

Die Struktur:
  while Bedingung do
  begin
    // Anweisungen
  end;
  // (ent)sprechend: während irgendwas wahr ist mache irgendwas

  // Wann endet diese Schleife?
  while true do
  begin
     // Anweisungen
  end;

Kleines Beispiel zum Dividieren mit unbestimmten Zahlen aber mit einem Ergebnis in Ganzzahlen und mit Rest:
vorausgesetzt sind hier die Variablen divident:Real, divisor:Real, ergebnis:Integer und rest:Real.

var
  divident,
  divisor,
  ergebnis : Integer;
begin  
  ...
  while (divident = divisor) or  (divident > divisor) do
  begin
    divident := divident - divisor;
    ergebnis := ergebnis + 1;
  end;
  Showmessage('Lösung: '+ (inttostr(ergebnis)) + ' Rest: '+(FloatToStr(divident)));
end;

Viele haben ein Problem die while-Schleife und die If-Anweisung auseinanderzuhalten. Dabei ist es relativ einfach:
Die if-Anweisung tritt genau dann ein, wenn etwas wahr ist und die While-Schleife tritt solange ein, wie dies wahr ist. Es heist nicht umsonst "wenn wahr dann" also "if true then" und im Gegensatz dazu "während das_wahr_ist mache" also "while this_is_true do". Die while-Schleife wird also immer wieder wiederholt.


Das Kommentarmodul dieser Seite wurde deaktiviert. Daher sendet bitte alle Fragen, Anregungen oder Probleme mit dem Kapitel-Namen im Betreff (bzw. zu welchem Thema es sich handelt) an folgende Mailadresse:

";

www.marco-hetzel.de
www.delphi-lernen.de
www.lazarus-lernen.de

© 2006-2021 by Marco Hetzel , last modified 01.11.2018, 10:28

(* Unterstützung dient der Aufrechthaltung laufender Kosten für dieses Projekt und fördert die Erweiterung. Bitte beachten, dass dies ein privates Projekt ist und ich daher nicht wie ein Verein eine Spendenbescheinigung ausgeben kann. Da ich allerdings auch Remote-Schulungen anbiete (gewerblich) kann ich dennoch eine Rechnung nach §19 UStG ausstellen, sofern ich einen Auftrag zuvor erhalte und dem zustimme.)