Помогите сделать задачки в Pascal ABC.1.Даны два неотрицательных числа a и

Помогите сделать задачи в Pascal ABC.
1.Даны два неотрицательных числа a и b. Отыскать их среднее геометрическое, т.е. квадратный корень из их творения: (a*b)1/2 (1/2 это ступень).
2.Даны два ненулевых числа. Найти сумму, разность, творение и приватное их модулей.
3.Даны два круга с общим центром и радиусами R1 и R2 (R1gt;R2). Отыскать площади этих кругов S1 и S2, а также площадь S3 кольца, наружный радиус которого равен R1, а внутренний радиус равен R2: S1=п* (R1)^2, S2=п* (R2)^2, S3=S1 - S2. В качестве значения п использовать 3.14.
4.Дана площадь S круга. Отыскать его поперечник D и длину L окружности, ограничивающей этот круг, учитывая, что L=п*D, S=п*D^2/4. В качестве значения п использовать 3.14.