Строковые переменные, Помогите решить несколько простеньких задач! Опции

[nesh]

Всем ПРИВЕТ!!! С ПРАЗДНИКОМ!!!
Очень нужно несколько простеньких задач по строковым переменным:
1)Определить количество знаков препинания в строке;
2)Определить количество цифр в строке;
3)Удалить из строки символов все пробелы;
4)Определить самое длинное слово в строке.
Каждая программа должна быть отдельно и слова в них я должен вводить свои!!!
P.S. Ответы набери в поиске не принимаются, так как я все облазил в поисковике, но именно вот этих программ по строковым переменным я не нашел!!!
Вот я составил 2 программы, может они помогут в размышлении над верхними:
1)Запись слова в обратном порядке:
program obratno;
{Слово в обратном порядке}
var x: string [100];
i,n: word;
begin
writeln('введите слово');
readln(x);
writeln('слово в обратном порядке: ');
n:=length(x);
for i:=n downto 1 do
write(x[i]);
end.
2)Определить количество слов в строке (очень похожа на верхнюю 1, только почему-то не получается):
program sl_v_stroke;
{Количество слов в строке}
var x: string [100];
i,n,r: word;
begin
writeln('введите слово ');
readln(x);
n:=length(x);
r:=1;
for i:=1 to n do
if x[i]=' ' then
r:=r+1;
writeln(количество слов в строке: ');
writeln®;
end.
ЗАРАНЕЕ ОЧЕНЬ БЛАГОДАРЕН!!!

[мисс_граффити]

без проблем сделаю...
нужно 4 или 6? не поняла, что с последними 2.
и это... код в теги надо заключать.

[nesh]

Что 4 или 6???!!!
Что именно ты не поняла в последних двух задачах???!!!
Хорошо, в следущие разы обязательно буду это делать!!!

[мисс_граффити]

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

[nesh]

Нужно только первые 4 и желательно побыстрее!!!

[мисс_граффити]

Без проблем сегодня сделать
Пиши в личку... Обсудим способ оплаты.

[nesh]

А, так ты еще и за деньги хотела сделать???!!!
Нет, прости, меня такое не устраивает!!!
Когда я искал прошлые задачи на этом форуме, то мне их сделали абсолютно бесплатно!!!

[arhimag]

Так, парень смотри, где вопрос задаешь.
Здесь раздел("Задачи на заказ"), где решают задачи за деньги, а раздел ("Задачи"), там можно попросить, что бы тебе помогли решить проблему совершенно бесплатно.

[nesh]

Хорошо, в следующий раз буду более внимательным!!!
Просто, в прошлый раз, когда я искал задачу, то я задавал в этом разделе вопрос и мне совершенно бесплатно за час их сделали, за что я очень благодарен!!!