Символы и Строки в Паскаль!

[Kymbat]

Помогите пожалуйста!!!
1)Дана строка, изображающая целое число. Вывести сумму цифр этого числа.
2)Дана строка, состоящая из русских слов, разделенных пробелами (одним или несколькими). Вывести строку, содержащую эти же слова (разделенные одним пробелом), но расположенные в обратном порядке. 3)Дана строка, содержащая несколько круглых скобок. Если скобки расставлены правильно (то есть каждой открывающей соответствует одна закрывающая), то вывести число 0. В противном случае вывести или номер позиции, в которой расположена первая ошибочная закрывающая скобка, или, если закрывающих скобок не хватает, число –1.
Срочно!!! желательно полностью! Заранее благодарю!!

[Shift_sk]

1)

var s:string;a,d,b,s2:integer;
begin
read(s);
val(s,a,d);
b:=a;
while b>0 do begin
a:=b;
a:=15 mod 10;
s2:=s2+a;
b:=b div 10;
end;
writeln(s2);
end.

возможно можно и проще!