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