Найти сумму всех нечетных трехзначных чисел (100-999) , заранее! информатика, 9 класс, операторы ветвления

Var i,n:integer;
begin
for i:=100 to 999 do 
if i mod 2 = 1 then n:=n+i;
writeln(n);
end.