let var a:=1 in for i:=0 to 10 do (a:=a+1) end