Turbo Pascal 10

Оператор цикла с параметром for

1. Дано натуральное число n. Найти сумму всех четных и нечетных чисел от 1 до n.
2. Дано натуральное число n. Вычислить n! (n!=1×2×3×…×n).
3. Дано натуральное число n. Вычислить 1! + 2! + … + n!.
4. Дано натуральное число n. Вычислить – n корней.