97

Найти четные цифры трехзначного числа

terfawer 07 сентября 2022

Найти четные цифры трехзначного числа

категория: информатика

80

var d,i: integer; s: string; Begin read (d); s: =str (d); for i: =1 to length (s) do if int (s[i]) mod 2=0 then writeln (s[i]); End.

пользователи выбрали этот ответ лучшим

Знаете другой ответ?
Другие вопросы по информатике

ПОПУЛЯРНОЕ
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...