var a;
begin
a:=1;
if a=1 then begin
a := a*2+3;
end;
end.