Учеба и наука

Решено

ОЧЕНЬ СРОЧНО ПОМОГИТЕ!!!!!!PASCAL - вопрос №156575

Выяснить, верно ли, что в последовательности s[1],...,s[n] имеются пять идущих подряд букв e.

декабрь 4, 2011 г.

  • Всего ответов: 1

  • Радик - аватарка

    Радик

    5-й в Технологиях

    k:=0;
    for i:=1 to n do
    begin
    if s[i]='e' then k:=k+1
    else k:=0;
    if k=5 then writeln('Есть 5 е подряд');
    end;

    декабрь 5, 2011 г.
    Ответ понравился автору
    Лучший ответ по мнению автора

Похожие вопросы