Ciklusváltozók és a “lokalitás” kényszere
Var i:Integer;
Procedure A;
Begin
For i:= … do …
End;
Begin
For i:= … do
Begin … A; … End;
End.