Question

ПОМОГИТЕ РЕШИТЬ ЗАДАЧУ БЕЗ ИСПОЛЬЗОВАНИЯ ФУНКЦИЙ PYTHON

Дано предложение, в котором имеется несколько букв е. Найти:

а) порядковый номер первой из них;

б) порядковый номер последней из них

Answer 1

Ответ:

Объяснение:

var

 S: String;

 i: Integer;

 PosStart, PosEnd: Integer;

begin

 Readln(S);

 PosStart := Pos('e', S); // находим порядковый номер первого "е"

 for i:=Length(S) downto 1 do

   if(S[i] = 'e') then begin

     PosEnd := i; // последний "е"

     Break;

   end;

 Writeln('PosStart = ', PosStart, '; PosEnd = ', PosEnd);

 ReadLn;

end.