Найти сумму нечетных цифр целого положительного числа. Если возможно, то с циклом while. PASCAL ABC
Держи, код прикреплён ниже. Открытый код: ideone.com/C0VEKp.
В принципе, a := abs(a) не зачем, так как в условии указано, что число положительное.