Найти угол между отрезком прямой, соединяющий начало координат с точкой А (х, у) и осью ОХ. точка лежит в первой четверти

Question

Информатика

Тимаша

12 октября, 10:07

Найти угол между отрезком прямой, соединяющий начало координат с точкой А (х, у) и осью ОХ. точка лежит в первой четверти

+3

Ответы (1)

Знаете ответ на вопрос?

Алеша · Answer 1

Var

x, y, f, eps:real;

begin

eps:=0.000000001;

Readln (x, y) ;

if x>eps then

f:=arctan (y/x)

else f:=3.1415926535/2;

Writeln ('Угол = ', f:1:4, ' радиан = ', (f*180) / 3.1415926535:3:4, ' градусов') ;

end.