Помогите! Надо составить задачку на языке пасхалия. Вычислить сумму всех нечетных

Program prog; var s,i:integer; begin  i:=0;   s:=0;  for i:= 10 to 99 do begin   if i mod 2 = 1 then  s:=s+i;  end; writeln('Ответ ',s); end. И язык называется не пасхалия а паскаль!