let in for x:=1 to 10 do (x)+(1) ; 1 end