profile
Опубликовано 5 лет назад по предмету Информатика от cent85

Дана строка, состоящая из 50 символов. Составьте программу, используя процедуру которая определяет сколько раз встречается в строке слог ‘ea’.

  1. Ответ
    Ответ дан Gleb1Kosyrev
    var s:string;k:integer;

    procedure SubInc(var s:string;var k:integer);
    begin;
    while pos('ea',s)<>0 do
    begin;
    delete(s,pos('ea',s),2);
    inc(k);
    end;
    end;

    begin;
    readln(s);
    if length(s)<>10 then exit;
    SubInc(s,k);
    writeln(k);
    end.
    1. Ответ
      Ответ дан Gleb1Kosyrev
      Ох, используя процедуру. Сейчас исправлю.
    2. Ответ
      Ответ дан cent85
      Спасибо огромное
Самые новые вопросы