/* valid for and let */

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