1A2₁₆ = 418₁₀
<span>110100000</span>₂ = 416
Нам нужно число Больше 416, но меньше 418, это число 417
Человек в XXI веке, который не будет уметь пользоваться ЭВМ, будет подобен человеку ХХ века, не умевшему ни читать, ни писать
Типо вот таких?
Program primer;
Uses crt;
var a: integer;
begin clrscr;
write('Введите число a = ');
readln(a);
writeln;
if ((a mod 10) = 4) or ((a div 10) = 4) then
writeln('Цифра 4 входит в число ')
else
writeln('Цифра 4 не входит в число ');
readln;
end.