Ответ(ы) на вопрос:
Гость // PascalABC.NET 3.2, сборка 1325 от 19.10.2016
begin
var x,y:real;
Write('Введите координаты точки: '); Read(x,y);
var rho:=sqrt(x*x+y*y);
var fi:=arctan(y/x);
Writeln('Радиус: ',rho,', угол(рад): ',fi)
end.
Пример:
Введите координаты точки: 3 -2.7
Радиус: 4.03608721412211, угол(рад): -0.732815101786507
Не нашли ответ?
Похожие вопросы