КАК составить программу для нахождения самых длинных слов из текста

[DJONIK93]

ребят помогите кто может. задали составить программу для нахождения самых длинных слов из предложенного текста. любым способом.

[Sazary]

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

#include <stdio.h>
#include <conio.h>
#include <string.h>

int main()
{
 char str[100];
 char *p,wrd[50];
 int len=0;
 gets(str);
 
 p = strtok(str," ,.!\0");
 while(p)
  {
   if(len==0 || strlen(p)>len)
    {
     strcpy(wrd,p);
     len = strlen(p);
    }
  p = strtok(NULL," ,.!\0");
  }
  
 printf("The longest word: %s (%d)\n",wrd,len); 
		
	getch();
	return 0;
}

[DJONIK93]

спасиб большое

[DJONIK93]

а вот ишо как можно переделать этот код
Program x;
uses crt;
var s,j: string;
p,w:integer;
begin;
clrscr;
Write ('Напишите слова: ');
Readln (s);
p:=pos (' ',s);
j:=copy (s,1,p-1);
Delete (s,1,p);
w:=length (j);
p:=length (s);
if p>w then
write ('Длинное слово: ', s)
else
write ('Длинное слово: ', j);
readln;
end.

штобы не только 2 слова учитывалось а любое из которых я напишу... я помню что там надо как то циклы еще добавлять, вот тока я незнаю как и че

[Sazary]

Это раздел C++, а не Паскаль.

Вам нужно в цикле искать очередной пробел начиная с позиции, которая будет увеличиваться с каждым найденным словом.

[DJONIK93]

ясно ясно)