Написать циклическое решение уравнения на Паскале. 2(cos(x-1)/sin(x-1))^2
Написать циклическое решение уравнения на Паскале.
2(cos(x-1)/sin(x-1))^2
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
const
dx=1;
var
x:real;
begin
x:=-10;
while x<=10 do
begin
if x-1<>0 then
writeln ('y= ',2*(cos(x-1))/Sin(sqr(x-1)))
else
writeln('-');
x:=x+dx;
end;
Readkey;
end.
Не нашли ответ?
Похожие вопросы