Найти самое длинное слово в строке.

[Mineralkaaaa]

Найти самое длинное слово в строке,в качестве разделителей только пробелы,прошу более менее простым кодом без структур.
Язык-С++,недоходит как выделить слово и определить его размер.
Так лучше?

[Вадим Мошев]

Сколько вы сможете заплатить за решение этой задачи?

[BDA]

var
  s, s1, smax: string;
  i: integer;

begin
  write('Введите строку: ');
  readln(s);
  smax := '';
  s1 := '';
  for i := 1 to length(s) do
    if s[i] <> ' ' then s1 := s1 + s[i]
   	else
    begin
      if length(s1) > length(smax) then 
        smax := s1;
      s1 := '';
    end;
  if length(s1) > length(smax) then 
    smax := s1; 
  write('Самое длинное слово ',  smax);
  readln;
end.

[Вадим Мошев]

BDA, Конечно, извиняюсь, но в чём смысл того, что вы ходите по темам и решаете студентам задачи? Если вы просто упражняетесь, то нет вопросов, хотя могли бы купить задачник. Если же нет, то смысла от вашего альтруизма нет, поскольку репутацию вы таким образом не заработаете, так как новички на неё влиять не могут, да и потом, у вас её достаточно, как мне кажется.

[Mineralkaaaa]

Сообщение от BDA

var
  s, s1, smax: string;
  i: integer;

begin
  write('Введите строку: ');
  readln(s);
  smax := '';
  s1 := '';
  for i := 1 to length(s) do
    if s[i] <> ' ' then s1 := s1 + s[i]
   	else
    begin
      if length(s1) > length(smax) then 
        smax := s1;
      s1 := '';
    end;
  if length(s1) > length(smax) then 
    smax := s1; 
  write('Самое длинное слово ',  smax);
  readln;
end.

на с++ так-то,где студенты на паскале решают?

[Mineralkaaaa]

........................

[Вадим Мошев]

жаль вас,по логике нет смысла от 2к страниц с вопросами студентов о помощи,ибо у всех возможности разные

Вот этого не могу понять. Объясните.

[Mineralkaaaa]

Сообщение от Вадим Мошев

Вот этого не могу понять. Объясните.

вы говорите зачем помогаете новичкам,ведь и так репутация на уровне,и зачем вообще лазать по темам и решать студентам задачи.
Эта тема и создана для того,чтобы добрые люди помогали студентам,а по вашей логике,от неё нет смысла,так как репутации в + не будет от новичков=>смысла нет

[Stilet]

где студенты на паскале решают?

Это тонкий троллинг?

жаль вас

Жалко у пчелки. А тебе стоит спасибо BDA сказать, и в следующий раз умнее будешь четко формулируя тему, или создавая ее в правильном по тематике разделе.

P.S. чтоб без голословия: http://www.programmersforum.ru/showthread.php?t=214478

[Вадим Мошев]

Это обсуждалось уже на форуме неоднократно, поэтому отвечу лишь тезисно.
1. На нашем форуме ошибочно отождествлять понятия "помочь" и "решить за кого-то".
2. Если студент (в данном случае) действительно хочет научится программированию, то пусть он задаёт вопросы, которые у него возникли в процессе написания программы.
3. Если вы не желаете учиться или же вам этот предмет не нужен, то остаётся дожидаться добрых людей, которые напишут программу за просто так (но можете и не дождаться), либо же платить деньге за то, чтобы вам эту задачу решили, но получите в этом случае гарантированное и рабочее решение (если не принимать во внимание мошенников).

Мне кажется, что я всё равно не понял до конца ваше сообщение, ну да ладно, считаю, что я вам развёрнуто ответил.