Нужны две задачи, в школе строки так и не объяснили, а по книгам читал так и не понял как это сделать...

I. Найти все слова, которые встречаются в каждом из двух заданных предложений .

II. Выяснить сколько раз встречается каждая буква алфавита в строке.

Может хотя бы одну подскажите, а до второй уже сам додумаюсь? Заранее спасибо

проблема еше актуальна? вот как можно посчитать число слов в сторке

for i:=1 to length(s) do begin
s1:=copy(s,i,length(a));
if s1=a then inc(k);
end;
слово задано строкой а, строка-s, к-счетчик.
но это так в качестве идеи
не замечает пробелов и регистра