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
