28+14 БАЛЛОВ!!!!!!!!!! Используйте оператор break или continue. В шестизначном целом числе определите позицию первой нечетной цифры.

Вопрос школьника по предмету Информатика

28+14 БАЛЛОВ!!!!!!!!!!
Используйте оператор break или continue.
В шестизначном целом числе определите позицию первой нечетной цифры.

Ответ учителя по предмету Информатика

//PascalABC.Net 3.2

begin

var n:=readstring (‘Ввод числа: ‘)+’ ‘;

var i:=0;

for i:=1 to length(n) do if n[i] in [‘1’, ‘3’, ‘5’, ‘7’, ‘9’] then break;

if i=length(n) then write (‘Нет нечетной цифры’) else write(i);

end.