Дано двузначное число. определите входит ли в него цифра 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 Искомой цифры в числе нет