еще несколько задачек

[zayai]

Задание1.
сосотавать и отладить программу для вычисления по указанной формуле.Значения переменных ,указанных в правой части,ввести с клавиатуры,результат вывести на экран.

Z=(A2/B+A/B2)2*√(A/2B)

ЗАДАНИЕ2
сосотавать и отладить программу для вычисления по указанной формуле.Значения переменных ввести с клавиатуры,результат вывести на экран.
|cos⁡(π/x)|/(1-πx^2 )+1/(sin⁡(1-sin^2 x)


задание3
задана сторона треугольника и два прилежащих к ней угла.Найти биссектрису.

[alex_fcsm]

const pi=3.14;
var res,x:real;

begin
 readln(x);
 res:=abs(cos(pi/x))/(1-pi*sqr(x))+1/(sin(1-sqr(sin(x))));
writeln(res);
end.

var a,b,a2,b2,z:real;

begin
 readln(a,b,a2,b2);
 z:=sqr(A2/B+A/B2)*sqrt(A/B2);
 writeln(z);
end.

[zayai]

пасибки,а с 1 и 3 не поможите???