Дано 3-х значное число вывести а все четные цифры числа

Цифры трёхзначного числа n: n div 100; n div 10 mod 10; n mod 10

Проверка на чётность: n.isEven или n mod 2 = 0

PascalABC.NET:

begin

 var n := ReadInteger;

 var a := n div 100;

 var b := n div 10 mod 10;

 var c := n mod 10;

 if (a mod 2 = 0) then write(a);

 if (b mod 2 = 0) then write(b);

 if (c mod 2 = 0) then write(c);

end.

Пример ввода: 190

Пример вывода: 0

Пример ввода: 228

Пример вывода: 228

Пример ввода: 173

Пример вывода: (пустая строка)

1. Оргономика - наука, которая изучает как правильно организовать рабочее место как проектировать инструменты, гаджеты. Чтобы были удобны в использовании человека.

2.Целью эргономикой является изучение закономерность трудовых процессов

3. Соблюдать дисциплину/порядок.

Соблюдать технику безопасности и чистоту

Спрашивать у учителя можно ли передвигаться по классу

4. Упражнение для глаз. При работе с компьютером держать осанку ровно

5. Мылышам не рекомендованр сидеть за компьютером

Детям от 3-4 года нужно сидеть 20-15 мин

6-8 лет до 30 минут

9-11 лет не больше часа

10(10) =2^3+2^1=1010(2)
15(10) = 2^3+2^2+2^1+2^0=8+4+2+1=1111(2)
1010(2) в обратном коде - изменяете 0 на 1, 1 на 0  -> 11110101(2) - обратный код
дополнительный код - это к обратному добавить 1  -> 11110110(2) - дополнительный код
отрицательные числа хранятся в дополнительном коде
15(10) = 1111(2),  обратный код к 1111(2) будет  11110000(2),  дополнительный - 11110001(2)
-15(10) = 11110001(2), дополнительный код к -15(10) будет само число 15
обратный к  -15(2)  ->  00001110(2) ,  добавляем 1  ->  00001110(2) +1 = 00001111(2) = 15(10)