Developing.ru

Уважаемые, помогите пожалуйста с решением нескольких задач

1. Строка, содержащая произвольный текст, состоит не более чем из 200 символов. Написать, какие буквы и сколько раз встречаются в этом тексте.
2. Из заданной символьной строки выбрать те символы, которые встречаются в ней только один, в том порядке, в котором они встречаются в тексте.
3. Определите, является ли заданная строка правильной записью вещественного числа с возможным знаком и десятичной точкой.
4. С клавиатуры вводиться отрывок N строкю Требуется напечатать строку, в которой больше всего слов.

Буду очень благодарен если поможете с решением данных задач.
Заранее большое вам Спасибо!

1. var a: array['A'..'Z'] of integer;
for i:=1 to length(s) do inc(a[upcase(s)]);
2. Смотрите соседние темы, только что кому-то такую же задачку решил.
3. Читаем мануал по функции val
4. Запоминаем первую строку. После этого каждую введенную сравниваем: если в ней больше строк, чем в запомненной - запоминаем только что введенную. Разбиение строки на слова - в разделе "Алгоритмы"