Код:
vent1 := false;
vent2 := false;
vent3 := false;
if mech1 then
vent1 := true;
vent2 := true;
end_if;
if mech2 then
vent1 := true;
vent3 := true;
end_if;
...