@саша 1.9.9.4

Дана строка символов, состоящая из произвольного текста, слова разделены пробелами. Вывести на экран порядковый номер слова минимальной длины и количество символов в этом слове.

Помогите, идеи есть но как это все в код реализовать не понимаю.

0

@Siyatel

используйте подпрограммы Pos,Length,sizeof для работы со строковыми переменными

Добавлено через 1 час 6 минут
используйте подпрограммы Pos,Length,delete для работы со строковыми переменными
схема приблизительно такая.

0. искомый номер слова inomer:=1;
1.берете строку и вычисляете её длину с помощью length
2. ищете первый пробел с помощью i:=pos(' ',stroka);
3. высекаете первое слово и запоминаете его в новой переменной
slowo=copy(stroka,1,i-1);
4. запоминатете номер слова в некой переменной, пусть это будет jj:=1;
это может быть номер цикла.
5. вычисляете длину слова и запоминаете его в переменной
dlina:=length(slowo);
6. запоминаете эту длину в произвольную перменную для сравнения в следующем цикле dlina2:= dlina;
5.удаляете из строки первое слово delete(stroka,1,i);
6. начиная со второго цикла сравниваете длину предыдущего слова с текущим.
if dlina2<dlina then inomer:=jj;
---повторяется цикл до исчерпания слова.

1