Напишите пожалуйста задачи в Паскале
z1 = 1 - (1/4 * sin(2a) ^ 2 + cos(2a))
z2 = cos(a) ^ 2 + cos(a) ^ 4

1

Ответы и объяснения

2014-03-10T19:16:01+04:00
Var  a,r,y: real;
begin
readln(a);  
r:= (1 - (1/4 * sqr(sin(2*a)) + cos(2*a)));
 y:= sqr(cos(a)) + sqr(cos(a))*sqr(cos(a)); 
writeln(r,y);
end.