написать программу, выводящую на экран ответ, содержится ли цифра 5 в трехзначном числе

//PascalABC.NET//Версия 3.3, сборка 1611beginvar a:=ReadInteger();write(a.ToString().Contains('5'));end.