Информатика, опубликовано 2018-08-22 18:02:01 by Гость
Дана строка символов выяснить верно ли что в строке имеются 5 подрат идущих букв е на паскале
Ответ оставил Гость
Var s:string;
begin
writeln(Введите строку:);
readln(s);
if POS(еееее,s)>0
then writeln(В строке имеются 5 подряд идущих букв е)
else writeln(В строке нет 5 подряд идущих букв е);
end.
Пример:
Введите строку:
Примееееер пример
В строке имеются 5 подряд идущих букв е
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.
Форма вопроса доступна на