Предмет: Информатика, автор: Nesh1999

Решите задачу: Все описано во вложении

Приложения:

Ответы

Автор ответа: Аноним
0
// 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


Автор ответа: Аноним
0
пожалуйста
Похожие вопросы
Предмет: Математика, автор: nastay21619