не могу понять...

[Dutchman]

Сформулировать массив, каждый элемент которого - слово. Предусмотреть контроль ввода по сформулированному массиву определить:
- самое длинное слово
- вывести все слова которые начинаються с заданной буквы.

Я вообшем-то догадываюсь как ее сделать, но не могу написать, т.е. мне нужно задать массив типа string, затем если в массиве встречаеться пробел я должен посчитать кол-во элементов в нем, затем сбросить счетчик на 0 и т.д. пока не кончиться предложение... и затем найти наибольшее? а как 2 задание делаеться вообще без понятия помогите пожалуйста.

[AVer]

если в массиве встречаеться пробел я должен посчитать кол-во элементов в нем...

А зачем пробел? Каждый элемент массива и будет слово. Пишешь процедуру сравнения. Это легко, и ты вроде как понял... Второе задание делается так: В цикле в переменную-буфер типа string забиваешь каждый элемент массива. Если певый символ этой строки равняется заданной бокве - пишем, иначе - нет.

[Dutchman]

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

А зачем пробел? Каждый элемент массива и будет слово. Пишешь процедуру сравнения. Это легко, и ты вроде как понял... Второе задание делается так: В цикле в переменную-буфер типа string забиваешь каждый элемент массива. Если певый символ этой строки равняется заданной бокве - пишем, иначе - нет.

напиши процедуру сравнения пожалуйста

[AVer]

напиши процедуру сравнения пожалуйста

Вот сравнение:

const n=5;     //Число элементов
var a:array[1..n] of string;
     i,max:integer;
begin
max:=1;
for i:=2 to n do
if length(a[i]) > length(a[max]) then
max:=i;
end;

Самая длинная строка - a[max].

[Dutchman]

Cпасибо, зделал