Форум программистов, компьютерный форум, киберфорум
Геометрия
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.55/11: Рейтинг темы: голосов - 11, средняя оценка - 4.55
2 / 2 / 1
Регистрация: 21.10.2011
Сообщений: 116

Формула 6-лепестковой розы

24.03.2015, 14:51. Показов 2210. Ответов 13
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Добрый день!

Нужна формула 6-лепестковой розы, я нашел формулу sin(6*f)^0.5
http://www.wolframalpha.com/in... f%29%5E0.5 Вот так она должна работать

Перевожу в декартову систему и пишу код получается вот так
Кликните здесь для просмотра всего текста
ActionScript 3
1
2
3
4
5
6
7
8
9
10
if (Math.sin(3*fix[i]) > 0)
{
    electron[i].x = 390 + radiusX * Math.sqrt(Math.abs((Math.sin(6 * fix[i])))) * Math.cos(fix[i]);
    electron[i].y = 310 + radiusY * Math.sqrt(Math.abs((Math.sin(6 * fiy[i])))) * Math.sin(fiy[i]);
}
else
{
       electron[i].x = 390 - radiusX * Math.sqrt(Math.abs((Math.sin(6 * fix[i])))) * Math.cos(fix[i]);
       electron[i].y = 310 - radiusY * Math.sqrt(Math.abs((Math.sin(6 * fiy[i])))) * Math.sin(fiy[i]);
}


Но у меня получается 12 лепестков
Physics-9.swf

Ставив так выходит только 3
Кликните здесь для просмотра всего текста
ActionScript 3
1
2
3
4
5
6
7
8
9
10
if (Math.sin(3*fix[i]) > 0)
{
    electron[i].x = 390 + radiusX * Math.sqrt(Math.abs((Math.sin(3 * fix[i])))) * Math.cos(fix[i]);
    electron[i].y = 310 + radiusY * Math.sqrt(Math.abs((Math.sin(3 * fiy[i])))) * Math.sin(fiy[i]);
}
else
{
       electron[i].x = 390 - radiusX * Math.sqrt(Math.abs((Math.sin(3 * fix[i])))) * Math.cos(fix[i]);
       electron[i].y = 310 - radiusY * Math.sqrt(Math.abs((Math.sin(3 * fiy[i])))) * Math.sin(fiy[i]);
}

Physics-91.swf

В чем ошибка может быть?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
24.03.2015, 14:51
Ответы с готовыми решениями:

Цвет лепестковой диаграммы
привет всем. вот такая задача. 1. как написать макрос для построения лепестковой диаграммы? 2. как сделать так, чтоб значения в...

Розы Гранди и фигуры Лиссажу
Здравствуйте! Помогите пожалуйста написать программу для выполнения фигур Лиссажу и роз Гранди. Была бы очень признательна, если программа...

Построить график розы ветров
Подскажите, как построить круговую диаграмму, отображающую соотношение направлений ветров «Ю», «С», «В» и «З» в летние месяцы. Таблица...

13
Эксперт по математике/физике
 Аватар для Том Ардер
4218 / 3418 / 396
Регистрация: 15.06.2009
Сообщений: 5,818
24.03.2015, 16:32
DIMA_N, здесь не код нужен (да ещё без комментариев), а исходные формулы, по которым он написан. С пояснениями!
А что получается 12 или 3 - и вовсе не посмотреть.
0
2 / 2 / 1
Регистрация: 21.10.2011
Сообщений: 116
24.03.2015, 17:03  [ТС]
Том Ардер, найденная формула https://www.cyberforum.ru/cgi-bin/latex.cgi?\sqrt{\sin \left(6*f \right)}
На сайте она отображается как 6 лепестковая фигура

Перевожу в декартову систему ее
https://www.cyberforum.ru/cgi-bin/latex.cgi?x=\sqrt{\sin \left(6*\phi  \right)}*\cos \left(\phi  \right)
https://www.cyberforum.ru/cgi-bin/latex.cgi?y=\sqrt{\sin \left(6*\phi  \right)}*\sin \left(\phi  \right)

Вписываю эти формулы в код в итоге у меня получается не 6 лепестков, а 12.
0
Эксперт по математике/физике
 Аватар для Том Ардер
4218 / 3418 / 396
Регистрация: 15.06.2009
Сообщений: 5,818
24.03.2015, 18:06
DIMA_N, почему в коде проверяется знак https://www.cyberforum.ru/cgi-bin/latex.cgi?\sin (3\varphi )?
Нужно показывать (и объяснять) точные формулы, по которым написан код, иначе это сравнение кислого с мягким.
0
2 / 2 / 1
Регистрация: 21.10.2011
Сообщений: 116
24.03.2015, 18:10  [ТС]
Том Ардер
https://www.cyberforum.ru/cgi-bin/latex.cgi?\sin \left(3\phi  \right)
это ошибочно там на самом деле https://www.cyberforum.ru/cgi-bin/latex.cgi?\sin \left(6\phi  \right)

Если не делаю проверку то получается цветок, без перехода через нулевую точку

Пример : Physics-9.swf

Чтобы запустить надо нажать на синий прямоугольник, можно увеличить скорость для наглядности кнопкой +

Причем если на том же сайте ставлю
https://www.cyberforum.ru/cgi-bin/latex.cgi?\sqrt{\sin \left(3\phi  \right)}
https://www.cyberforum.ru/cgi-bin/latex.cgi?\sqrt{\sin \left(5\phi  \right)}
https://www.cyberforum.ru/cgi-bin/latex.cgi?\sqrt{\sin \left(7\phi  \right)}

Прорисовывает правильно у меня 3,5,7 лепестков соответственно.

А пробуя четные рисует в 2 раза больше лепестков.

Может я как-то формулу не правильно перевел?

Перевожу методом таким :

https://www.cyberforum.ru/cgi-bin/latex.cgi?x= formula * \cos \left(\phi  \right)
https://www.cyberforum.ru/cgi-bin/latex.cgi?y= formula * \sin \left(\phi  \right)
0
Эксперт по математике/физике
 Аватар для jogano
6360 / 4067 / 1512
Регистрация: 09.10.2009
Сообщений: 7,550
Записей в блоге: 4
24.03.2015, 21:37
Вам нужно убрать вторую часть условия - else. Иначе вместо отрисовки функции, которая существует не везде, а именно https://www.cyberforum.ru/cgi-bin/latex.cgi?\sqrt{\sin 6\varphi }, вы рисуете функцию https://www.cyberforum.ru/cgi-bin/latex.cgi?\left[\begin{matrix} \sqrt{\left|\sin 6\varphi  \right|}, \: \sin 6\varphi \geq 0\\  -\sqrt{\left|\sin 6\varphi  \right|}, \: \sin 6\varphi < 0  \end{matrix}, которая существует везде. Вот вам и 12 лепестков.

Добавлено через 1 минуту
Ну и, само собой, в проверке if(....) поменять с https://www.cyberforum.ru/cgi-bin/latex.cgi?3\varphi на https://www.cyberforum.ru/cgi-bin/latex.cgi?6\varphi
0
2 / 2 / 1
Регистрация: 21.10.2011
Сообщений: 116
24.03.2015, 22:47  [ТС]
jogano , Я не могу понять, просто так писать?
ActionScript 3
1
2
electron[i].x = 390 + radiusX * Math.sqrt ( Math.sin ( 6 * fix[i] ) ) * Math.cos(fix[i]);
electron[i].y = 310 + radiusY * Math.sqrt ( Math.sin ( 6 * fiy[i] ) ) * Math.sin(fiy[i]);
тогда тоже не то выходит, рисует лепесток и в точку 0 0
Physics-9.swf

Чтобы запустить надо нажать на синий прямоугольник, можно увеличить скорость для наглядности кнопкой +
0
Эксперт по математике/физике
 Аватар для jogano
6360 / 4067 / 1512
Регистрация: 09.10.2009
Сообщений: 7,550
Записей в блоге: 4
24.03.2015, 23:44
Assembler
1
2
3
4
5
if (Math.sin(6*fix[i]) >= 0)
{
    electron[i].x = 390 + radiusX * Math.sqrt(Math.sin(6 * fix[i])) * Math.cos(fix[i]);
    electron[i].y = 310 + radiusY * Math.sqrt(Math.sin(6 * fix[i])) * Math.sin(fix[i]);
}
Добавлено через 1 минуту
Убрал fiy[i] - не понятно, что это такое. Угол должен быть один, а у вас два угла - fix[i] и fiy[i]

Добавлено через 7 минут
В экселе рисует нормально - 6 лепестков, по формулам
для координаты х =390+30*ЕСЛИ(SIN(6*RC[-1])>=0;КОРЕНЬ(SIN(6*RC[-1]));0)*COS(RC[-1])
для координаты y =310+20*ЕСЛИ(SIN(6*RC[-2])>=0;КОРЕНЬ(SIN(6*RC[-2]));0)*SIN(RC[-2])

Добавлено через 5 минут
Или даже так, чтобы электрон не прыгал в точку (0;0) в непрорисовываемых секторах:
Assembler
1
2
3
4
5
6
7
8
9
10
if (Math.sin(6*fix[i]) >= 0)
{
    electron[i].x = 390 + radiusX * Math.sqrt(Math.sin(6 * fix[i])) * Math.cos(fix[i]);
    electron[i].y = 310 + radiusY * Math.sqrt(Math.sin(6 * fix[i])) * Math.sin(fix[i]);
}
else
{
     electron[i].x = 390;
     electron[i].y = 310;
}
1
2 / 2 / 1
Регистрация: 21.10.2011
Сообщений: 116
25.03.2015, 00:18  [ТС]
jogano
Да работает, спасибо большое, но оказывается формула не так, она рисует по часовой стрелки лепестки, а мне надо чтобы шарик который идет по этой траектории уходил в -
и было как тут только с 6 лепестками, это наверное другая формула
физика91
0
Эксперт по математике/физике
 Аватар для jogano
6360 / 4067 / 1512
Регистрация: 09.10.2009
Сообщений: 7,550
Записей в блоге: 4
25.03.2015, 00:35
DIMA_N, да, так и задумано, если углы перебираются от 0 до 2П подряд. А если вам нужно перескакивать не на соседние лепестки, тогда опишите по номерам лепестков, как должна проходиться траектория, и подумаем, как это сделать. Для трёх лепестков, красиво выходит. А для 6-и лепестков я что-то не вижу последовательности обхода.
0
2 / 2 / 1
Регистрация: 21.10.2011
Сообщений: 116
25.03.2015, 00:45  [ТС]
jogano, я думаю примерно так
Буду очень благодарен если поможете!
0
Эксперт по математике/физике
 Аватар для jogano
6360 / 4067 / 1512
Регистрация: 09.10.2009
Сообщений: 7,550
Записей в блоге: 4
25.03.2015, 06:35
Нужно отдельно вводить два угла один угол для синуса под корнем (синус таки с модулем), а другой - для перевода из полярной системы координат в декартову.
Формулы тогда такие:
https://www.cyberforum.ru/cgi-bin/latex.cgi?\begin{cases}x=390+30\sqrt{\left|\sin 6\varphi  \right|}\cos \psi  \\ y=310+30\sqrt{\left|\sin 6\varphi  \right|}\sin \psi   \end{cases}, где вся ваша конструкция проходится, когда https://www.cyberforum.ru/cgi-bin/latex.cgi?\varphi \in [0;\pi), а угол https://www.cyberforum.ru/cgi-bin/latex.cgi?\psi связан с https://www.cyberforum.ru/cgi-bin/latex.cgi?\varphi сложной зависимостью, чтобы кривая обходилась так, как вам нужно:
https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
<br />
\psi =\left(\varphi -\frac{5 \pi}{6}\left[\frac{6\varphi }{\pi} \right]+\frac{13\pi }{6}\left(\left[\frac{2\varphi }{\pi} \right] mod 2\right) \right)\left(-1 \right)^{\left[\frac{2\varphi }{\pi } \right]}
Вместо (-1)^... (не во всех языках программирования это делается корректно для отрицательных оснований степени), можно сделать цикл if(...): сначала сделать присваивание https://www.cyberforum.ru/cgi-bin/latex.cgi?<br />
<br />
\psi :=\left(\varphi -\frac{5 \pi}{6}\left[\frac{6\varphi }{\pi} \right]+\frac{13\pi }{6}\left(\left[\frac{2\varphi }{\pi} \right] mod 2\right) \right), затем условие
Visual Basic
1
2
3
if Int(2*fi/Pi) mod 2 = 1 then
psi=-psi
end if
0
2 / 2 / 1
Регистрация: 21.10.2011
Сообщений: 116
25.03.2015, 11:14  [ТС]
jogano,
Спасибо почти то что надо, вот так получается Вложение 505440,

Формулу вот так вбил

ActionScript 3
1
2
3
4
5
6
psi[i] = (fi[i] - (5*Math.PI/6)*(6*fi[i]/Math.PI) + 13 * Math.PI /6 * ((2*fi[i]/Math.PI)%2));
if ((6*fi[i]/Math.PI) % 2 == 1) 
{
    psi[i] = psi[i] * -1;
    trace("34657890876547890");
}
Иф у меня не когда не срабатывает

Вывожу psi выводит такие значения

Не могу понять когда и почему резкий перескок происходит
Кликните здесь для просмотра всего текста

-12.256901498889103
-12.256901498889103
-12.256901498889103
-12.255234832222438
-12.255234832222438
-12.255234832222438
-12.25356816555577
-12.25356816555577
-12.25356816555577
-12.251901498889108
-12.251901498889108
-12.251901498889108
-12.250234832222437
-12.250234832222437
-12.250234832222437
-12.24856816555577
-12.24856816555577
-12.24856816555577
-12.246901498889105
-12.246901498889105
-12.246901498889105
-12.245234832222438
-12.245234832222438
-12.245234832222438
-12.24356816555577
-12.24356816555577
-12.24356816555577
-12.2419014988891
-12.2419014988891
-12.2419014988891
-12.240234832222434
-12.240234832222434
-12.240234832222434
-12.238568165555776
-12.238568165555776
-12.238568165555776
-12.236901498889106
-12.236901498889106
-12.236901498889106
-12.235234832222439
-12.235234832222439
-12.235234832222439
-12.23356816555577
-12.23356816555577
-12.23356816555577
-12.231901498889105
-12.231901498889105
-12.231901498889105
-12.230234832222438
-12.230234832222438
-12.230234832222438
-12.228568165555771
-12.228568165555771
-12.228568165555771
-12.226901498889106
-12.226901498889106
-12.226901498889106
-12.225234832222437
-12.225234832222437
-12.225234832222437
-12.22356816555577
-12.22356816555577
-12.22356816555577
-12.221901498889103
-12.221901498889103
-12.221901498889103
-12.220234832222438
-12.220234832222438
-12.220234832222438
-12.218568165555777
-12.218568165555777
-12.218568165555777
-12.216901498889106
-12.216901498889106
-12.216901498889106
-12.215234832222436
-12.215234832222436
-12.215234832222436
-12.21356816555577
-12.21356816555577
-12.21356816555577
-12.211901498889105
-12.211901498889105
-12.211901498889105
-12.210234832222438
-12.210234832222438
-12.210234832222438
-12.208568165555768
-12.208568165555768
-12.208568165555768
-12.206901498889103
-12.206901498889103
-12.206901498889103
-12.205234832222441
-12.205234832222441
-12.205234832222441
-12.20356816555577
-12.20356816555577
-12.20356816555577
-12.201901498889104
-12.201901498889104
-12.201901498889104
-12.200234832222439
-12.200234832222439
-12.200234832222439
-12.198568165555773
-12.198568165555773
-12.198568165555773
-12.196901498889106
-12.196901498889106
-12.196901498889106
-12.195234832222436
-12.195234832222436
-12.195234832222436
-12.19356816555577
-12.19356816555577
-12.19356816555577
-12.191901498889106
-12.191901498889106
-12.191901498889106
-12.190234832222439
-12.190234832222439
-12.190234832222439
-12.188568165555772
-12.188568165555772
-12.188568165555772
-12.186901498889107
-12.186901498889107
-12.186901498889107
-12.185234832222442
-12.185234832222442
-12.185234832222442
-12.183568165555771
-12.183568165555771
-12.183568165555771
-12.181901498889104
-12.181901498889104
-12.181901498889104
-12.180234832222439
-12.180234832222439
-12.180234832222439
-12.178568165555774
-12.178568165555774
-12.178568165555774
-12.176901498889107
-12.176901498889107
-12.176901498889107
-12.175234832222433
-12.175234832222433
-12.175234832222433
-12.173568165555768
-12.173568165555768
-12.173568165555768
-12.17190149888911
-12.17190149888911
-12.17190149888911
-12.17023483222244
-12.17023483222244
-12.17023483222244
-12.168568165555772
-12.168568165555772
-12.168568165555772
-12.166901498889107
-12.166901498889107
-12.166901498889107
-12.165234832222438
-12.165234832222438
-12.165234832222438
-12.163568165555771
-12.163568165555771
-12.163568165555771
-12.161901498889105
-12.161901498889105
-12.161901498889105
-12.16023483222244
-12.16023483222244
-12.16023483222244
-12.158568165555774
-12.158568165555774
-12.158568165555774
-12.156901498889106
-12.156901498889106
-12.156901498889106
-12.155234832222439
-12.155234832222439
-12.155234832222439
-12.153568165555772
-12.153568165555772
-12.153568165555772
-12.15190149888911
-12.15190149888911
-12.15190149888911
-12.15023483222244
-12.15023483222244
-12.15023483222244
-12.148568165555773
-12.148568165555773
-12.148568165555773
-12.146901498889104
-12.146901498889104
-12.146901498889104
-12.145234832222439
-12.145234832222439
-12.145234832222439
-12.143568165555774
-12.143568165555774
-12.143568165555774
-12.141901498889103
-12.141901498889103
-12.141901498889103
-12.140234832222436
-12.140234832222436
-12.140234832222436
-12.138568165555778
-12.138568165555778
-12.138568165555778
-12.136901498889106
-12.136901498889106
-12.136901498889106
-12.135234832222439
-12.135234832222439
-12.135234832222439
-12.133568165555772
-12.133568165555772
-12.133568165555772
-12.131901498889107
-12.131901498889107
-12.131901498889107
-12.130234832222442
-12.130234832222442
-12.130234832222442
-12.128568165555773
-12.128568165555773
-12.128568165555773
-12.126901498889104
-12.126901498889104
-12.126901498889104
-12.12523483222244
-12.12523483222244
-12.12523483222244
-12.123568165555774
-12.123568165555774
-12.123568165555774
-12.121901498889107
-12.121901498889107
-12.121901498889107
-12.12023483222244
-12.12023483222244
-12.12023483222244
-12.118568165555779
-12.118568165555779
-12.118568165555779
-12.116901498889106
-12.116901498889106
-12.116901498889106
-12.11523483222244
-12.11523483222244
-12.11523483222244
-12.113568165555773
-12.113568165555773
-12.113568165555773
-12.111901498889107
-12.111901498889107
-12.111901498889107
-12.110234832222442
-12.110234832222442
-12.110234832222442
-12.108568165555772
-12.108568165555772
-12.108568165555772
-12.106901498889101
-12.106901498889101
-12.106901498889101
-12.105234832222443
-12.105234832222443
-12.105234832222443
-12.103568165555775
-12.103568165555775
-12.103568165555775
-12.101901498889108
-12.101901498889108
-12.101901498889108
-12.10023483222244
-12.10023483222244
-12.10023483222244
-12.098568165555776
-12.098568165555776
-12.098568165555776
-12.096901498889107
-12.096901498889107
-12.096901498889107
-12.095234832222436
-12.095234832222436
-12.095234832222436
-12.093568165555773
-12.093568165555773
-12.093568165555773
-12.091901498889108
-12.091901498889108
-12.091901498889108
-12.090234832222443
-12.090234832222443
-12.090234832222443
-12.088568165555772
-12.088568165555772
-12.088568165555772
-12.086901498889105
-12.086901498889105
-12.086901498889105
-12.08523483222244
-12.08523483222244
-12.08523483222244
-12.083568165555775
-12.083568165555775
-12.083568165555775
-12.081901498889108
-12.081901498889108
-12.081901498889108
-12.080234832222441
-12.080234832222441
-12.080234832222441
-12.078568165555772
-12.078568165555772
-12.078568165555772
-12.076901498889107
-12.076901498889107
-12.076901498889107
-12.075234832222437
-12.075234832222437
-12.075234832222437
-12.073568165555777
-12.073568165555777
-12.073568165555777
-12.071901498889112
-12.071901498889112
-12.071901498889112
-12.070234832222443
-12.070234832222443
-12.070234832222443
-12.068568165555774
-12.068568165555774
-12.068568165555774
-12.066901498889106
-12.066901498889106
-12.066901498889106
-12.06523483222244
-12.06523483222244
-12.06523483222244
-12.063568165555775
-12.063568165555775
-12.063568165555775
-12.061901498889105
-12.061901498889105
-12.061901498889105
-12.056901498889108
-12.056901498889108
-12.056901498889108
-12.051901498889109
-12.051901498889109
-12.051901498889109
-12.046901498889108
-12.046901498889108
-12.046901498889108
-12.041901498889105
-12.041901498889105
-12.041901498889105
-12.036901498889108
-12.036901498889108
-12.036901498889108
-12.031901498889109
-12.031901498889109
-12.031901498889109
-12.026901498889108
-12.026901498889108
-12.026901498889108
-12.02190149888911
-12.02190149888911
-12.02190149888911
-12.016901498889109
-12.016901498889109
-12.016901498889109
-12.01190149888911
-12.01190149888911
-12.01190149888911
-12.006901498889112
-12.006901498889112
-12.006901498889112
-12.001901498889112
-12.001901498889112
-12.001901498889112
-11.996901498889109
-11.996901498889109
-11.996901498889109
-11.99190149888911
-11.99190149888911
-11.99190149888911
-11.98690149888911
-11.98690149888911
-11.98690149888911
-11.981901498889112
-11.981901498889112
-11.981901498889112
-11.97690149888911
-11.97690149888911
-11.97690149888911
-11.971901498889114
-11.971901498889114
-11.971901498889114
-11.96690149888911
-11.96690149888911
-11.96690149888911
-11.961901498889109
-11.961901498889109
-11.961901498889109
-11.95690149888911
-11.95690149888911
-11.95690149888911
-11.951901498889109
-11.951901498889109
-11.951901498889109
-11.94690149888911
-11.94690149888911
-11.94690149888911
-11.941901498889106
-11.941901498889106
-11.941901498889106
-11.93690149888911
-11.93690149888911
-11.93690149888911
-11.93190149888911
-11.93190149888911
-11.93190149888911
-11.926901498889107
-11.926901498889107
-11.926901498889107
-11.92190149888911
-11.92190149888911
-11.92190149888911
-11.91690149888911
-11.91690149888911
-11.91690149888911
-11.91190149888911
-11.91190149888911
-11.91190149888911
-11.90690149888911
-11.90690149888911
-11.90690149888911
-11.90190149888911
-11.90190149888911
-11.90190149888911
-11.896901498889111
-11.896901498889111
-11.896901498889111
-11.891901498889114
-11.891901498889114
-11.891901498889114
-11.886901498889111
-11.886901498889111
-11.886901498889111
-11.88190149888911
-11.88190149888911
-11.88190149888911
-11.876901498889112
-11.876901498889112
-11.876901498889112
-11.871901498889114
-11.871901498889114
-11.871901498889114
-11.866901498889112
-11.866901498889112
-11.866901498889112
-11.861901498889107
-11.861901498889107
-11.861901498889107
-11.856901498889114
-11.856901498889114
-11.856901498889114
-11.851901498889111
-11.851901498889111
-11.851901498889111
-11.846901498889114
-11.846901498889114
-11.846901498889114
-11.841901498889111
-11.841901498889111
-11.841901498889111
-11.836901498889114
-11.836901498889114
-11.836901498889114
-11.831901498889112
-11.831901498889112
-11.831901498889112
-11.82690149888911
-11.82690149888911
-11.82690149888911
-11.821901498889112
-11.821901498889112
-11.821901498889112
-11.816901498889115
-11.816901498889115
-11.816901498889115
-11.811901498889112
-11.811901498889112
-11.811901498889112
-11.806901498889115
-11.806901498889115
-11.806901498889115
-11.801901498889112
-11.801901498889112
-11.801901498889112
-11.796901498889115
-11.796901498889115
-11.796901498889115
-11.791901498889116
-11.791901498889116
-11.791901498889116
-11.786901498889115
-11.786901498889115
-11.786901498889115
-11.781901498889113
-11.781901498889113
-11.781901498889113
-11.776901498889115
-11.776901498889115
-11.776901498889115
-11.771901498889118
-11.771901498889118
-11.771901498889118
-11.766901498889116
-11.766901498889116
-11.766901498889116
-11.761901498889111
-11.761901498889111
-11.761901498889111
-11.756901498889116
-11.756901498889116
-11.756901498889116
-11.751901498889115
-11.751901498889115
-11.751901498889115
-11.746901498889113
-11.746901498889113
-11.746901498889113
-11.741901498889115
-11.741901498889115
-11.741901498889115
-11.736901498889113
-11.736901498889113
-11.736901498889113
-11.731901498889115
-11.731901498889115
-11.731901498889115
-11.726901498889116
-11.726901498889116
-11.726901498889116
-11.721901498889116
-11.721901498889116
-11.721901498889116
-11.716901498889113
-11.716901498889113
-11.716901498889113
-11.711901498889116
-11.711901498889116
-11.711901498889116
-11.706901498889113
-11.706901498889113
-11.706901498889113
-11.701901498889116
-11.701901498889116
-11.701901498889116
-11.696901498889114
-11.696901498889114
-11.696901498889114
-11.69190149888912
-11.69190149888912
-11.69190149888912
-11.686901498889114
-11.686901498889114
-11.686901498889114
-11.681901498889113
-11.681901498889113
-11.681901498889113
-11.676901498889116
-11.676901498889116
-11.676901498889116
-11.671901498889117
-11.671901498889117
-11.671901498889117
-11.666901498889116
-11.666901498889116
-11.666901498889116
-11.661901498889113
-11.661901498889113
-11.661901498889113
-11.656901498889116
-11.656901498889116
-11.656901498889116
-11.651901498889117
-11.651901498889117
-11.651901498889117
-11.646901498889116
-11.646901498889116
-11.646901498889116
-11.641901498889117
-11.641901498889117
-11.641901498889117
-11.636901498889117
-11.636901498889117
-11.636901498889117
-11.631901498889118
-11.631901498889118
-11.631901498889118
-11.62690149888912
-11.62690149888912
-11.62690149888912
-11.621901498889118
-11.621901498889118
-11.621901498889118
-11.616901498889117
-11.616901498889117
-11.616901498889117
-11.611901498889118
-11.611901498889118
-11.611901498889118
-11.606901498889117
-11.606901498889117
-11.606901498889117
-11.601901498889118
-11.601901498889118
-11.601901498889118
-11.596901498889117
-11.596901498889117
-11.596901498889117
-11.591901498889122
-11.591901498889122
-11.591901498889122
-11.586901498889118
-11.586901498889118
-11.586901498889118
-11.581901498889115
-11.581901498889115
-11.581901498889115
-11.576901498889118
-11.576901498889118
-11.576901498889118
-11.571901498889119
-11.571901498889119
-11.571901498889119
-11.566901498889118
-11.566901498889118
-11.566901498889118
-11.561901498889119
-11.561901498889119
-11.561901498889119
-11.556901498889118
-11.556901498889118
-11.556901498889118
-11.551901498889118
-11.551901498889118
-11.551901498889118
-11.546901498889115
-11.546901498889115
-11.546901498889115
-11.541901498889118
-11.541901498889118
-11.541901498889118
-11.536901498889119
-11.536901498889119
-11.536901498889119
-11.531901498889118
-11.531901498889118
-11.531901498889118
-11.526901498889119
-11.526901498889119
-11.526901498889119
-11.521901498889118
-11.521901498889118
-11.521901498889118
-25.130469664444888
-25.130469664444888
-25.130469664444888
-25.125469664444893
-25.125469664444893
-25.125469664444893
-25.12046966444489
-25.12046966444489
-25.12046966444489
-25.11546966444489
-25.11546966444489
-25.11546966444489
-25.11046966444489
-25.11046966444489
-25.11046966444489
0
Эксперт по математике/физике
 Аватар для jogano
6360 / 4067 / 1512
Регистрация: 09.10.2009
Сообщений: 7,550
Записей в блоге: 4
25.03.2015, 11:49
DIMA_N, вложение не открывается, но я и так вижу ошибки во вводе.
1) https://www.cyberforum.ru/cgi-bin/latex.cgi?\left[\frac{2\varphi }{\pi} \right], \: \left[\frac{6\varphi }{\pi} \right] - это не просто скобки, а целая часть числа, в VBA она обозначается функцией Int(...), у вас - не знаю. А вы ввели это просто как скобки.
Вот какой был бы смысл мне писать https://www.cyberforum.ru/cgi-bin/latex.cgi?\frac{5\pi }{6}\left[\frac{6\varphi }{\pi} \right], когда без целой части это произведение равно https://www.cyberforum.ru/cgi-bin/latex.cgi?5\varphi?
2) Во 2-й строчке вашего кода нужно в числителе писать не https://www.cyberforum.ru/cgi-bin/latex.cgi?6\varphi, а https://www.cyberforum.ru/cgi-bin/latex.cgi?2\varphi. И опять таки, это всё под целой частью. If не срабатывает, потому что проверяется остаток деления не целого числа на 2 (вы же целую часть не указали).

Добавлено через 2 минуты
У меня в Экселе всё работает - траектория проходится как надо. Правда, оси ориентированы как в математике - вправо и вверх, а не так, как на экране - вправо и вниз.

Добавлено через 14 минут
Вот как вычисляется Пси на VBA:
Visual Basic
1
2
3
4
5
6
7
Function Psi(fi As Double) As Double
Const Pi = 3.1415926
Psi = fi - 5 * Pi / 6 * Int(6 * fi / Pi) + 13 * Pi / 6 * (Int(2 * fi / Pi) Mod 2)
If Int(2 * fi / Pi) Mod 2 = 1 Then
   Psi = -Psi
End If
End Function
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
25.03.2015, 11:49
Помогаю со студенческими работами здесь

Вычислить площадь четырехлепестковой розы
помогите пожалуйста вычислить площадь четырехлепестковой розы r = a sin 4FI

Цветной вывод в консоли (обсуждение кода розы)
Обсуждение кода разноцветного вывода в консоли. Изначальный код: 1) роза, 2) функция печати (1 любой цвет на 1 строку) Еще примеры.

Построить график розы, полярная система координат
Вот, что у меня получилось. Но мне бы хотелось, чтобы на графике верно отображался цветок с нецелым k (количеством лепестков). Я,...

Имеется 3 розы и 5 гвоздик. Требуется составить букет из 3 роз
Имеется 3 розы и 5 гвоздик. Требуется составить букет из 3 роз. Сколькими способами можно составить такой букет? 1) 1 2) 10 3) 15 ...

Построение графика кардиоиды и розы в полярной системе координат
Нужна помощь в построении графика кардиоиды и полярной розы в Pascal ABC. Вся сложность заключается в том, что мне необходимо сделать...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
14
Ответ Создать тему
Новые блоги и статьи
Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения
anaschu 22.03.2026
e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git
1С: Программный отбор элементов справочника по группе
Maks 22.03.2026
Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .
Как я обхитрил таблицу Word
Alexander-7 21.03.2026
Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a
AmbA 21.03.2026
без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
1С: Программный отбор элементов справочника по значению перечисления
Maks 21.03.2026
Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .
Переходник USB-CAN-GPIO
Eddy_Em 20.03.2026
Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru