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

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.
И язык называется не пасхалия а паскаль!