Помогите, пожалуйста! Нужно написать программу на Pascal: дано пятизначное число, найти сумму всех его ЧЕТНЫХ цифр.
Ты как условие пишешь? "Всех четерех". У тебя пятизначное число. Так четырех или пяти цифр найти?
Весь код писать не буду. Напишу ток ф-ю нахождения. while ( a != 0) begin // Ввел ты свое число, допустим - а. c = a div 10; // Делим его на 10, т.е берем его последнюю цифру d = d+c; // в эту переменную накапливаем сумму цифр end // конец цикла
А на четность кто будет проверять ?