Ach ja, normaler Weise müßte der Compiler bei deinem 1. Code auch noch gemeckern.
So in der Richtung - Variable könnte undefiniert sein.
Denn da fehlt noch ein kleiner Befehl:
Code:
[b]procedure[/b] proc;
[b]var[/b]
b: boolean;
[b]begin[/b]
[color=red]b := false;[/color]
[b]if[/b] bedingung1 [b]then[/b]
[b]begin[/b]
anweisung;
b := true;
[b]end[/b];
[b]if[/b] bedingung2 [b]then[/b]