Напишите программу определить полярные координаты точки, заданные декартовыми координатами (x,y) по формулам f=arctg(x/y), r=√x^2+y^2. при вычислении угла @ необходимо учесть, что значение х может быть равно нулю, а угол может находиться в различных четвертях.
177
233
Ответы на вопрос:
Procedure polar(x, y: real; var r, f: real); begin r : = sqrt(sqr(x) + sqr(y)); if x = 0 then if y = 0 then f : = 0 else if y > 0 then f : = pi / 2 else f : = -pi / 2 else begin f : = arctan(y / x); if x < 0 then if y > = 0 then f : = f + pi else f : = f - pi end end; { тестовое решение } var r, fi: real; begin polar(1, 1, r, fi); writeln('(+1; +1) -> (', r, '; ', fi, ')'); polar(1, -1, r, fi); writeln('(+1; -1) -> (', r, '; ', fi, ')'); polar(-1, 1, r, fi); writeln('(-1; +1) -> (', r, '; ', fi, ')'); polar(-1, -1, r, fi); writeln('(-1; -1) -> (', r, '; ', fi, ')'); polar(0, 1, r, fi); writeln('(0; +1) -> (', r, '; ', fi, ')'); polar(0, -1, r, fi); writeln('(0; -1) -> (', r, '; ', fi, ')'); polar(0, 0, r, fi); writeln('(0; 0) -> (', r, '; ', fi, ')'); end. тестовое решение: (+1; +1) -> (1.4142135623731; 0.785398163397448) (+1; -1) -> (1.4142135623731; -0.785398163397448) (-1; +1) -> (1.4142135623731; 2.35619449019234) (-1; -1) -> (1.4142135623731; -2.35619449019234) (0; +1) -> (1; 1.5707963267949) (0; -1) -> (1; -1.5707963267949) (0; 0) -> (0; 0)
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Дахич117.04.2022 13:08
-
danila2003uly11.11.2020 09:12
-
Arina575125.04.2021 13:30
-
alinkaaa2525.01.2023 03:49
-
matveibr08.05.2022 20:53
-
Andreychic2328.01.2021 06:03
-
Lis25pfi17403.10.2020 05:42
-
ersnobestoy9uo807.10.2022 23:15
-
axmefibragimovp09v9404.02.2021 09:40
-
VanyaKEKEP31.10.2020 01:01
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.