Найти сумму трёхзначных чисел,сумма цифр которых число нечетное.Сколько чисел вошло в сумму?

var i,n,c:integer;begin for i:=100 to 999 do if i mod 2 <> 0 then begin n:=n+i; c:=c+1; end; writeln('Сумма цифр:',n); write('Вошло в сумму:',c,' чисел');end.я не очень понел твой вопрос но я думаю что мой ответ правельный