let
	var i:=1
	var j:=0
in
	for i := 1 to 10 do
		j :=j+1
end
