Pascal. Множества

[blondinochka]

Помогитепожалуйста. нужно решить задачку:
Дан текст. Группу символов, разделенную с одной или обеих сторон пробелами и не содержащую внутри себя пробелов, назовем словом. Удалить небуквенные символы, которыми начинается или заканчивается слово.

пример: "drjghdkjfgdkjgh 645djghjghdkjgh dkfhgkdjhg09887 ......" - текст должен вводится с клавиатуры
в словах 645djghjghdkjgh и dkfhgkdjhg09887 нужно удалить цифры

[Stilet]

Только недавно тут пример задачи по выделению из строки чисел писал.
http://www.programmersforum.ru/showthread.php?t=52971
Вот посмотри, и подправь чтоб числа отсеивало.

[blondinochka]

я в программировании не понимаю к сожалкнию. Подправь пожалуйста!

[Zhanna5006]

Помогите решить пожалуйста:
Даны два множества M и N, мощность которых равна 15 и 12 соответственно. Из данных множеств выделить подмножества чисел, делящихся на 2 без остатка.
Множества M и N описать как типизированные константы. На печать вывести значения элементов множеств W=M∪N и U=W\(M1∩X1).

[Андрей.12]

var m,n,w,p,x1:set of 1..12;
a,b,i:integer;
begin
m:=[];
n:=[];
w:=[];
x1:=[];
for i:=1 to 12 do
begin
readln(a);
readln(b);
m:=m+[a];
n:=n+[b];
end;
begin
w:=m+n;
for i:=1 to 12 do
if (i div 2=0) and (i in n) and (i in m) then
x1:=x1+[i];
end;
end.

как то так, не понял условие u=w\(m1*x1)