Question

Из окна формы вводятся координаты точки на плоскости (x,y). Вычислить и вывести в окно формы полярные координаты точки по формулам. Написать на паскале

Answer 1

var
  X, Y, Rad, Fi: real;
  
begin
  //readln(X, Y);
  Rad := Sqrt(Sqr(X) + Sqr(Y));
  Fi := ArcCos(X / Rad);
  writeln(System.string.Format('Coords: ({0}; {1})', X, Y));
  writeln('Radius: ', Rad);
  writeln('Argle: ', Fi * 180 / Pi);
end.