Чему будет равно значение переменной c в результате выполнения фрагмента программы a:=1257; c:=0; while a>0 do begin

Это программа целиком будет иметь такой видVar a,b,c:integer;begina:=1257;c:=0; while (a>0) do begin if (a mod 2 <> 0) then b:= a mod 10; c:=c+b; a:=a div 10; end; writeln(c);end.Результатом этой программы будет ответ 18. Значит выбрать нужно 4 ответ