Quelltexteinrückung

[jfheins]

Ich würde es so einrücken:

Delphi-Quellcode:

begin //hinzugefügt, damit es passt ....
  k := 4;
  if a < k then
  begin
    a := b + 2;

    if a < k then
      b := 3
    else
      a := b;

    k := k * k
  end
  else
    k := k + a;

  if k <> 9 then
    a := k - a;
  b := a + 2
end;

Ich finde das etwas übersichtlicher - die Fragen solltne jetzt einfach zu beantworten sein