for i := 1 to 100 do
# ^-^
i = i+1