Составьте программу, определяющую, входит ли введенная вами цифра в десятичную запись введенного вами трехзначного числа
Ответы
Ответ дал:
0
begin
var (n, x) := ReadInteger2();
while n > 0 do
begin
if n mod 10 = x then break
else n := n div 10
end;
Print(n > 0 ? 'входит' : 'не входит')
end.
Приложения:
Похожие вопросы
2 года назад
2 года назад
2 года назад
8 лет назад
9 лет назад
9 лет назад