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