Леша, Вася, Саша и Коля занимаются в детской спортивной школе в разных секциях: хоккейной, баскетбольной, - id2047963820220730 от Karina3589 30.07.2022 21:38

Question

Информатика: Леша, Вася, Саша и Коля занимаются в детской спортивной школе в разных секциях: хоккейной, баскетбольной, волейбольной и футбольной. Саша, Леша и баскетболист занимаются в одном классе. Леша и Вася на тренировки ходят пешком вместе, а хоккеист ездит на автобусе. Футболист не знаком ни с баскетболистом, ни с волейболистом. Кто в какой секции занимается?

Karina3589 · Accepted Answer

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.

MOGZ ответил