Дано целое положительное трехзначное число n. Составить программу , входит ли в него...

Question

Дано целое положительное трехзначное число n. Составить программу , входит ли в него цифра 7..

Answer 1

//PascalABC.Net 3.2
begin //true - входит; false - не входит
write ('7' in readstring ('Введите число: '));
end.