Регистрация
annaerkina
02.07.2022 21:07
Информатика
Есть ответ 👍

это надо сделать в python

141
245
Посмотреть ответы 1

Ответы на вопрос:

lipa2907
lipa2907
4,6(40 оценок)
Var s,sw: string;         i,j,bst: integer; begin       s: ='строка для решения арба еле реестр';         bst: =1;   sw: ='';   write('строка для поиска - ');         writeln(s);       for i: =1 to length(s) do       begin       if (ord(s[i])=32) then       begin           if (s[bst]=s[i-1]) then           begin                for j: =bst to i-1 do sw: =sw+s[j];                         writeln('найдено слово - ',sw);               sw: ='';               end;             bst: =i+1;             end;           end;     if (s[bst]=s[length(s)]) then     begin           for i: =bst to length(s) do sw: =sw+s[i];             writeln('найдено слово - ',sw);         end; end.

Популярно: Информатика