1.Составить алгоритм и программу нахождения суммы следующих чисел: 1, 12, 35, 70, 117, ..532.
2.-х-
3.Написать программу, которая вводит с клавиатуры число от 0 до 999999 (использовать переменные типа longint) и выдает на экран дисплея сумму цифр этого числа.
4.Составить алгоритм и программу сортировки массива символов латинского алфавита.
5.Составить алгоритм и программу сортировки массива по убыванию методом пузырьков с перемещнием минимального элемента.
---
хотя бы с одним помогите

3. pascalvar s, a: integer;g:longint;begins:=0;readln(g);while g > 0 do begina:=g mod 10;g:=g div 10;s:=s+a;end;writeln(s)end.