Задачи по FreePascal

[ScoPld]

while, repeat и for
Вычислить значения двух функций в n равномерно распределенных в диапазо-
не а≤x≤b точках.

a=-Pi
b=Pi
n=20

F1(x)=|sinx|+|cosx|
F2(x)=|sin x|-|cos x|

Нужно составить три программы, соответственно на while, repeat и for

Массивы:

одномерный массив:
Дан массив X из чисел (6<n<10). Вычислить:
y = x1 - x2 + x3 - ...- xn-1 +xn


двумерный массив:
Определить, является ли заданная квадратная матрица девятого порядка магическим квадратом, т. е. такой, в которой суммы элементов во всех строках и столбцах одинаковы.


Кто чем может, помогите пожалуйста