// PascalABC.NET 3.1, сборка 1200 от 13.03.2016 begin if ReadlnString.IndexOfAny('0123456789'.ToCharArray)>-1 then Writeln('Содержит') else Writeln('Не содержит') end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку