Информатика, опубликовано 2018-08-22 18:25:55 by Гость
Дано двузначное число. определите входит ли в него цифра b
Ответ оставил Гость
Var
n,b:integer;
begin
Write(Введите натуральное двухзначное число: );
Read(n);
Write(Введите искомую цифру: );
Read(b);
if (n mod 10 = b) or (n div 10 = b) then
Writeln(Искомая цифра в числе есть)
else
Writeln(Искомой цифры в числе нет)
end.
Контрольные решения
Введите натуральное двухзначное число: 38
Введите искомую цифру: 3
Искомая цифра в числе есть
Введите натуральное двухзначное число: 50
Введите искомую цифру: 2
Искомой цифры в числе нет
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
