Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Дана строка, слова в которой разделены пробелами. Проверьте, содержит ли строка хотя бы одну цифру. в PackalABC.Net тема "строки"

Ответ оставил Гость

// PascalABC.NET 3.1, сборка 1200 от 13.03.2016
begin
  if ReadlnString.IndexOfAny(0123456789.ToCharArray)>-1
  then Writeln(Содержит) else Writeln(Не содержит)
end.