Дана строка, слова в которой разделены пробелами. Проверьте, содержит ли строка хотя бы одну цифру. в PackalABC.Net тема "строки"
Нет такой системы "паскальabc". Есть старая Pascal ABC и новая PascalABC.NET
var s,st: string; begin writeln('строка: '); readln(s); st:='0123456789'; if s.IndexOf(st)<>0 then writeln('содержит') else writeln('не содержит'); end.
Пожалуйста, "по такому принципу" тут почти все решается, для того такую версию Паскаля и создали.
Alviko спс за прошлое решение, по такому принципу решил ост задачи
вот сижу и спрашиваю
Задание дали такое и нифига не обьяснили
*ищем
Непонятно, если мы изем в строке символы, зачем нам знать, что строка разделенана слова и как именно она разделена?
// PascalABC.NET 3.1, сборка 1200 от 13.03.2016 begin if ReadlnString.IndexOfAny('0123456789'.ToCharArray)>-1 then Writeln('Содержит') else Writeln('Не содержит') end.
Сейчас поправлю...при копировании улетело слово
работает
ага
Все....проверяйте
Понятно... эта же функция от 0 строку индексирует.
\Странно.... и правда глюк какой-то с цифами.... минуту, поправлю
ок
Ошибка после else
спасибо большое