программирование линейных алгоритмов

[Xeniya82]

Помогите разобраться с задачкой, использую программу Паскаль

Маятник длиной l=0,994 м совершает колебания, отклоняясь от вертикали на угол α=50 градусов. Определить период колебания по следующим формулам
t_1=2π√(l/g)
t_2=2π√(l/g(1+1/16 α^(2 )))
t_3=2π√(l/g(1+1/4 〖sin〗^(2 ) α/2+9/64 〖sin〗^(4 ) α/2))
где g– ускорение силы тяжести.

что я делаю не правильно, как получить эти ответы
Ответы: 2,000039; 2,047083; 2,048588

я написала так:
program var1;
var
l,a,g,t1,t2,t3:real;
begin
l:=0.994;
a:=50.00;
{vvecti znacenie uckoreniya cili tyagecti.}
write('g=');readln(g);
{vizeclit' t1.}
t1:=2*pi*sqrt(l/g);
{vizeclit' t2.}
t2:=2*pi*sqrt(l/g*(1+(1/16)*a*sqr(2)));
{vizeclit' t3.}
t3:=2*pi*sqrt(l/g*(1+(1/4)*sin(sqr(2))*(a/2)+(9/64)*sin(sqr(4))*(a/2)));

writeln('t1=');
writeln('t2=');
writeln('t3=');
end.

Запускаю RUN и он выдает ошибку:
Runtime error 207 at 032B:0004

[Sparkman]

В 3й формуле у вас в корне появляется отрицательное число. Из отрицательных чисел квадратный корень извлечь нельзя.

[Xeniya82]

спасибо, а если в первых двух формулах нет ошибок , программа должна выводить их решение?

[Mad_Cat]

writeln('t1=',t1);
writeln('t2=',t2);
writeln('t3=',t3);
end.

спасибо, а если в первых двух формулах нет ошибок , программа должна выводить их решение?

нет пока не исправите ошибку в 3 формуле