Строки и задачки с ними, запуталась, мож совет дадите Опции

[MapЫшKa]

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

Дано: произвольная строка
Требуется:
1) проверить строку на наличие "{" и "}" символы заключенные между { и } удалить вместе со скобками
2) определить сколько различных русских букв содержит строка ( я ваще тут пас, говорят функция какая то есть специальная)
3) найти самое длинное слово в строке.

вот такая беда. Все бы было просто, вот тока вариантов строки моря, например:

vo sudu li v ogorode {v doline{na polane{v sadu?} ili za zana}ves}koj} hodat nes4astnie programmisti

сама придумала сама ее разобрать не могу, то ли надо удалять
{v doline{na polane{v sadu?} ili za zana}ves}koj}
или
{v doline{na polane{v sadu?} ili za zana}ves}
или
{v doline{na polane{v sadu?}

эх ну и назадают задачек....

[Altair]

Кстати вот что я нашел у меня (старая лаба еще из ФМШ) :

Код

var
s:string;
b:set of char;
c:char;
begin
readln(s); s[succ(ord(s[0]))]:=chr(0);
for c:=chr(1) to s[0] do if not(s[ord(c)] in b) then begin include(b,s[ord(c)]); inc(s[succ(ord(s[0]))]) end;
writeln(ord(s[succ(ord(s[0]))]))
end.

Программа выдает количество различных букв в строке....