Расчёт значения БГП: методы и ошибки.

Рассуждения на различные темы

Модератор: AnLik

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #601 depths » 23 янв 2018, 16:45

Вы не пробовали сделать проверку формул?
Например можно по этим формулам построить сферу и посмотреть все ли шарики на своих местах.



Anrie01
Пользователь
Сообщения: 500
Зарегистрирован: 16 янв 2017, 23:26
Репутация: 222
Настоящее имя: Андрей
Откуда: Тольятти

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #602 Anrie01 » 23 янв 2018, 18:53

обязательно, я постоянно проверяю себя. В программе есть строки рисующие шары для двух плоскостей XY и YZ одновременно, просто я их не стал показывать. Одновременно с этим вырисовывается периметр сферы, для визуального контроля, попадают ли шары в него, или выходят за пределы. При отладке пошагово продвигался по тексту, контролировал действия компа.
Попробую сделать ролик как заполняются шары от первого, до третьего или пятого слоя. Дальше тоже можно, но уже в месиве шаров ничего не ясно, вся сфера залита кучей вспомогательных линий и т.д.

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #603 depths » 24 янв 2018, 16:47

И какие вы делаете выводы?

Anrie01
Пользователь
Сообщения: 500
Зарегистрирован: 16 янв 2017, 23:26
Репутация: 222
Настоящее имя: Андрей
Откуда: Тольятти

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #604 Anrie01 » 25 янв 2018, 07:52

depths писал(а):И какие вы делаете выводы?

Я не могу представить бесконечность в природе. Так же наука говорит пока о 100 - 200 млрд Галактик. Расчёт сил на такое кол-во я для себя делал с расстояниями и массами, потом для вас в 10 раз больше кол-во единичной массы. Силу с этого числа собрать не удается из-за расстояния до них, потому что планета ближе и оталкивает сильнее в 1Е+17 раз, чем расчетные 200 млрд Галактик пытаются притолкнуть. Тем более что левая половина противодавит на правую. Экранирование для гравитации я не понимаю как устроено, если все во Вселенной в гравитации и участвует?
Если гравитация (перемещение масс на встречу друг другу) является следствием какого то другого эффекта, то его нужно искать.
Но пока придерживаюсь мнения - что гравитация это притяжение напрямую, без отталкивания.

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #605 depths » 25 янв 2018, 18:30

Anrie01 писал(а):Силу с этого числа собрать не удается из-за расстояния до них, потому что планета ближе и оталкивает сильнее в 1Е+17 раз, чем расчетные 200 млрд Галактик пытаются притолкнуть.

Если хотите, я могу пояснить вам многие моменты в личной переписке. Я достаточно глубоко разобрался в вопросе :)

Вопрос к всем. Пирамиду дальше считаем? Мой выход на доказательство сходимости понятен?

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #606 depths » 25 янв 2018, 18:55

Изображение
На верхние лучи слева не смотрите, смотрел что там получается.
Последний раз редактировалось depths 25 янв 2018, 19:31, всего редактировалось 1 раз.

Insider
Пользователь
Сообщения: 2550
Зарегистрирован: 08 окт 2016, 11:47
Репутация: 576

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #607 Insider » 25 янв 2018, 19:26

depths писал(а):Пирамиду дальше считаем?

Как хотите. Я пирамиду посчитал сам. Вам показал.

depths писал(а):Мой выход на доказательство сходимости понятен?

Не понятен.

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #608 depths » 25 янв 2018, 19:44

Insider писал(а):
depths писал(а):Мой выход на доказательство сходимости понятен?

Не понятен.

А с какого места не понятно? Как лучи формируются понятно? Как их количество считать понятно?

Insider
Пользователь
Сообщения: 2550
Зарегистрирован: 08 окт 2016, 11:47
Репутация: 576

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #609 Insider » 25 янв 2018, 19:50

depths писал(а):Как лучи формируются понятно? Как их количество считать понятно?

Нет, не понятно.
А вообще, лучше выдать доказательство целиком. С понятным и подробным описанием.
Я это сделал, если помните.

Anrie01
Пользователь
Сообщения: 500
Зарегистрирован: 16 янв 2017, 23:26
Репутация: 222
Настоящее имя: Андрей
Откуда: Тольятти

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #610 Anrie01 » 26 янв 2018, 07:24

depths писал(а):Изображение
На верхние лучи слева не смотрите, смотрел что там получается.

Вы хотите найти все существующие лучи в пирамиде, состоящей из 1000 рядов? Если да, то шаг между шарами в луче надо тоже учесть. Посмотрю.

Anrie01
Пользователь
Сообщения: 500
Зарегистрирован: 16 янв 2017, 23:26
Репутация: 222
Настоящее имя: Андрей
Откуда: Тольятти

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #611 Anrie01 » 26 янв 2018, 07:33

depths писал(а):Если хотите, я могу пояснить вам многие моменты в личной переписке. Я достаточно глубоко разобрался в вопросе :)

Да интересно, но пишите сюда, будет тема для общения для многих

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #612 depths » 26 янв 2018, 14:15

Anrie01 писал(а):
depths писал(а):Если хотите, я могу пояснить вам многие моменты в личной переписке. Я достаточно глубоко разобрался в вопросе :)

Да интересно, но пишите сюда, будет тема для общения для многих

Тут другие вопросы обсуждать как-то "не комильфо".
Помнится делал специальную тему куда складывалась всё до чего додумался. Можно в ней писать.

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #613 depths » 26 янв 2018, 19:02

Anrie01 писал(а):Вы хотите найти все существующие лучи в пирамиде, состоящей из 1000 рядов? Если да, то шаг между шарами в луче надо тоже учесть.

Проведенные мной исследования структуры пирамиды привели к таким результатам (ранее я о некоторых писал).
Между горизонтальными рядами пирамиды имеем расстояние r0*3^1/2. Если ввести нумерацию этих рядов через n имеем: n*r0*3^1/2.
Внутри ряда вводим нумерацию кругов через m. Берём за единицу шага r0. Тогда нумерация будет: m*r0. Выделим в пирамиде "крайние" лучи - это два боковых луча и центральный луч (про лучи я писал, также смотрите рисунок). Из-за "геометрии" пирамиды круги на луче располагаются равномерно, через одно и тоже расстояние. Это расстояние задаётся вторым от начала луча (вершина пирамиды) кругом на луче. Лучь строится очень просто, нужно из центра вершины и через центр любого круга провести прямую. Продолжая прямую через всю пирамиду мы увидим, что она проходит через центры некоторых нижних кругов. Присмотревшись, поймём, что эти круги лежат на луче на одинаковом расстоянии друг от друга. Получается что каждый следующий круг на луче лежит в ряду номер которого получается простым умножением номера ряда первого от вершины круга на порядковый номер круга в луче. Например: третий ряд, в нем два свободных круга ("крайние" круги не рассматриваем), они расположены симметрично относительно центральной оси пирамиды, поэтому рассмотрим только один, для второго будет такая же ситуация; "координата" "начального" круга (3,1), следующего (3,1)*2=(6,2), и следующего (3,1)*3=(9,3), и далее (3,1)*4=(12,3), (3,1)*5=(15,5)....., (3,1)*N=(3*N,1*N), N пробегает значения от единицы до бесконечности. Для проверки смотрим рисунок.

В силу структуры пирамиды (сдвиг соседних рядов на r0) получим расположение кругов в ряде, в единицах r0:
для чётных n будут чётные m,
для нечётных n будут нечётные m.
Диапазон для m такой:
для чётных n: n-2,
для нечётных n: n-1.
Удобно рассматривать половинку пирамиды, потом результат умножать на два.
Пример. 9 ряд: (9,1),(9,3),(9,5),(9,7).
10 ряд: (10,2)(10,4)(10,6)(10,8)

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #614 depths » 26 янв 2018, 19:17

Смотрим, что (3,1)*3=(9,3). Т.е. лучь (3,1) проходит по девятому ряду. Значит девятый ряд даст начало уже не восьми новым лучам (9-1=8), а только шести. Спускаясь вниз по пирамиде, можно увидеть, что количество новых лучей равно количеству кругов в ряде (m=n-(1 или 2) минус количество кругов из этого ряда уже лежащие на предыдущих лучах. И эта зависимость связана с количеством делителей для номера ряда и количеством делителей для текущих номеров кругов в ряде.

Insider
Пользователь
Сообщения: 2550
Зарегистрирован: 08 окт 2016, 11:47
Репутация: 576

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #615 Insider » 26 янв 2018, 19:34

depths писал(а):для чётных n будут чётные m,
для нечётных n будут нечётные m.
Диапазон для m такой:
для чётных n: n-2,
для нечётных n: n-1.

Начиная отсюда, непонятно.
Что значит "чётные/нечетные" m?
Если m - это у вас нумерация кругов в ряду?
Нумерация идет подряд, четные и нечетные круги: 1, 2, 3,...
???

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #616 depths » 26 янв 2018, 19:37

Интересна ситуация с номерами рядов из простых чисел. Все круги в ряду дают новые лучи. При этом эти же номера дают максимальное вычитание из кратных этим числам номеров. Например седьмой ряд даст 7-1=6 лучей. Из двадцать первого ряда нужно вычесть эти шесть лучей, да ещё лучь от третьего ряда (3,1)*7=2)(21,7). Итого от двадцати новых лучей 21-1=20, останется всего двенадцать новых лучей.

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #617 depths » 26 янв 2018, 19:41

Insider писал(а):
depths писал(а):для чётных n будут чётные m,
для нечётных n будут нечётные m.
Диапазон для m такой:
для чётных n: n-2,
для нечётных n: n-1.

Начиная отсюда, непонятно.
Что значит "чётные/нечетные" m?
Если m - это у вас нумерация кругов в ряду?
Нумерация идет подряд, четные и нечетные круги: 1, 2, 3,...
???

Мы нумерацию ведем в единицах радиуса круга r0, а не в количествах кругов. Поэтому центры кругов в рядах с чётным n приходятся на чётные числа, а c нечетным n на нечетные числа.

Insider
Пользователь
Сообщения: 2550
Зарегистрирован: 08 окт 2016, 11:47
Репутация: 576

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #618 Insider » 26 янв 2018, 19:54

depths писал(а):Мы нумерацию ведем в единицах радиуса круга r0, а не в количествах кругов. Поэтому центры кругов в рядах с чётным n приходятся на чётные числа, а c нечетным n на нечетные числа.

Не понятно!

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #619 depths » 26 янв 2018, 20:28

Insider писал(а):
depths писал(а):Мы нумерацию ведем в единицах радиуса круга r0, а не в количествах кругов. Поэтому центры кругов в рядах с чётным n приходятся на чётные числа, а c нечетным n на нечетные числа.

Не понятно!

Берём пятый ряд (смотрите рисунок). Ведем счёт от центральной оси. Смещаемся на один радиус по горизонтали, попали на центр круга, записываем - (5,1), смещаемся ещё на один радиус в туже сторону, не попали на центр круга, пропускает, снова смещаемся на один радиус, попали на центр круга, записываем - (5,3), снова смещаемся на один радиус, не попали на центр, пропускаем, дальше идёт "крайний" круг, остановка. Итого для пятого ряда: (5,1)(5,3).
Для шестого ряда: (6,2)(6,4).
Рассматривали половину пирамиды. Для полного результата умножаем на два.

Insider
Пользователь
Сообщения: 2550
Зарегистрирован: 08 окт 2016, 11:47
Репутация: 576

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #620 Insider » 26 янв 2018, 20:37

depths писал(а):Берём пятый ряд (смотрите рисунок). Ведем счёт от центральной оси. Смещаемся на один радиус по горизонтали, попали на центр круга, записываем - (5,1), смещаемся ещё на один радиус в туже сторону, не попали на центр круга, пропускает, снова смещаемся на один радиус, попали на центр круга, записываем - (5,3), снова смещаемся на один радиус, не попали на центр, пропускаем, дальше идёт "крайний" круг, остановка. Итого для пятого ряда: (5,1)(5,3).
Для шестого ряда: (6,2)(6,4).
Рассматривали половину пирамиды. Для полного результата умножаем на два.

Понятно.
Ох и намудрил!
Закрутил, завертел, всех запутать захотел :)

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #621 depths » 26 янв 2018, 21:15

Теперь такая хитрая закономерность (гипотеза).
Чтобы узнать лежит ли какой-либо круг на предыдущем луче или нет нужно сделать такие проверки:
- для чётного номера ряда для пары чисел (а,в), которые определяют положение круга в пирамиде должен существовать общий делитель который даёт либо (чет,чет), либо (нечёт,нечёт) - в этом случае круг принадлежит предыдущему лучу, если результат будет в разнобой (чет,нечет) или (нечёт,чет), то такой круг не принадлежит предыдущему лучу;

- для нечётного ряда если существует общий делитель для пары чисел (а,в), то такой круг принадлежит предыдущему лучу, если нет общего делителя, то не принадлежит.

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #622 depths » 29 янв 2018, 11:50

Давайте прикинем как с учётом выясненных закономерностей программно посчитать силу. Напомню что мы считаем силу не от каждого круга в пирамиде, а от каждого луча в пирамиде. Так расчётов меньше.
Лучь определяется двумя числами (n,m), где n меняется от 3 до бесконечности (это номер ряда), а m (положение, номер круга в ряду от центральной оси) меняется от:
(n-2)/2, если n чётное, при этом берутся из этого диапазона только чётные числа за исключением
(n-1)/2, если n нечётное;
Делим на два из-за симметрии относительно центральной оси. Потом, домножим результат на два.
Для чётных m удобно пользоваться формулой:
m=2k, где k=0,1,2...(n-2)/2
Для нечётных m удобно пользоваться формулой:
m=2k+1, где k=0,1,2...(n-1)/2

Мы много раз видели что сила от наклонного луча обратно пропорциональна 1/R^2, прямо пропорциональна косинусу угла между вертикальной осью и лучом, другими словами углом наклона луча. Все константы выносятся за знак суммы.
Поэтому имеем такую формулу для пары (n,m):
3.gif
3.gif (734 байт) 552 просмотра

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #623 depths » 29 янв 2018, 11:55

Как я указывал ранее, из общего массива пар (n,m) нужно исключать пары:
depths писал(а):Теперь такая хитрая закономерность (гипотеза).
Чтобы узнать лежит ли какой-либо круг на предыдущем луче или нет нужно сделать такие проверки:
- для чётного номера ряда для пары чисел (а,в), которые определяют положение круга в пирамиде должен существовать общий делитель который даёт либо (чет,чет), либо (нечёт,нечёт) - в этом случае круг принадлежит предыдущему лучу, если результат будет в разнобой (чет,нечет) или (нечёт,чет), то такой круг не принадлежит предыдущему лучу;

- для нечётного ряда если существует общий делитель для пары чисел (а,в), то такой круг принадлежит предыдущему лучу, если нет общего делителя, то не принадлежит.

Программа должна получиться не сложная. :)

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #624 depths » 01 фев 2018, 11:49

Anrie01, может у вас получится программу сделать?

Anrie01
Пользователь
Сообщения: 500
Зарегистрирован: 16 янв 2017, 23:26
Репутация: 222
Настоящее имя: Андрей
Откуда: Тольятти

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #625 Anrie01 » 01 фев 2018, 11:56

depths писал(а):Anrie01, может у вас получится программу сделать?

Я попробую по своему - вычислю все углы до каждого шара, потом обьединю их в лучи, вычислю шаг в луче

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #626 depths » 01 фев 2018, 21:47

Anrie01 писал(а):
depths писал(а):Anrie01, может у вас получится программу сделать?

Я попробую по своему - вычислю все углы до каждого шара, потом обьединю их в лучи, вычислю шаг в луче

Я же писал как это сделать.

Anrie01
Пользователь
Сообщения: 500
Зарегистрирован: 16 янв 2017, 23:26
Репутация: 222
Настоящее имя: Андрей
Откуда: Тольятти

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #627 Anrie01 » 01 фев 2018, 23:49

Ряд, Угол отклонения от вертикали, Расстояние до шара
0, 0, 0

1, -29.999, 1.999
1, 30, 2

2, -29.999, 3.999
2, 0, 3.464
2, 30, 3.999

3, -29.999, 5.999
3, -10.893, 5.291
3, 10.894, 5.291
3, 30, 5.999

4, -29.999, 7.999
4, -16.102, 7.211
4, 0, 6.928
4, 16.103, 7.211
4, 30, 7.999

5, -29.999, 9.999
5, -19.106, 9.165
5, -6.586, 8.717
5, 6.587, 8.717
5, 19.107, 9.165
5, 30, 9.999

6, -29.999, 11.999
6, -21.051, 11.135
6, -10.893, 10.583
6, 0, 10.392
6, 10.894, 10.583
6, 21.052, 11.135
6, 30, 11.999

7, -29.999, 13.999
7, -22.41, 13.114
7, -13.897, 12.489
7, -4.715, 12.165
7, 4.716, 12.165
7, 13.898, 12.489
7, 22.411, 13.114
7, 30, 13.999

8, -29.999, 15.999
8, -23.413, 15.099
8, -16.102, 14.422
8, -8.213, 13.999
8, 0, 13.856
8, 8.214, 13.999
8, 16.103, 14.422
8, 23.414, 15.099
8, 30, 15.999

9, -29.999, 17.999
9, -24.182, 17.088
9, -17.783, 16.37
9, -10.893, 15.874
9, -3.67, 15.62
9, 3.671, 15.62
9, 10.894, 15.874
9, 17.784, 16.37
9, 24.183, 17.088
9, 30, 17.999

в 1 ряду угол между лучами составляет 60 градусов и всего 2 шара в ряду
в 999 ряду угол между соседними крайними лучами составляет 0.05 градуса и 1000 шаров в ряду

999, 29.702, 1992.027
999, 29.752, 1993.018
999, 29.801, 1994.012
999, 29.851, 1995.006
999, 29.901, 1996.002
999, 29.951, 1997
999, 30, 1997.999

PS много лучей получится в итоге

depths
Пользователь
Сообщения: 1188
Зарегистрирован: 30 апр 2015, 22:17
Репутация: 70
Настоящее имя: Алексей Лебедев
Откуда: Екатеринбург
Контактная информация:

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #628 depths » 02 фев 2018, 06:56

Из общего количества лучей надо вычитать повторяющиеся.

Можно программу глянуть?

Anrie01
Пользователь
Сообщения: 500
Зарегистрирован: 16 янв 2017, 23:26
Репутация: 222
Настоящее имя: Андрей
Откуда: Тольятти

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #629 Anrie01 » 02 фев 2018, 07:23

depths писал(а):Из общего количества лучей надо вычитать повторяющиеся.

Можно программу глянуть?

Вечером прога.
Вычитать будем по позже. Это пока был расчет всех углов.

Anrie01
Пользователь
Сообщения: 500
Зарегистрирован: 16 янв 2017, 23:26
Репутация: 222
Настоящее имя: Андрей
Откуда: Тольятти

Re: Расчёт значения БГП: методы и ошибки.

Сообщение #630 Anrie01 » 04 фев 2018, 19:32

Open "c:\1.txt" For Output As 1
- открываем файл для сохранения результатов расчета

Let st = 2
- расстояние между шарами

For a = 0 To 999
- цикл от 0 до 999 рядов пирамиды(вертикальная ось Y)

Let c = -30
- угол отклонения пирамиды от вертикальной оси (левый крайний шар в ряду)

Let y = st * a * Cos(3.1415927 / 180 * c)
Let x = st * a * Sin(3.1415927 / 180 * c)
- координаты левого шара в каждом ряду пирамиды

For b = 0 To a
- цикл для каждого ряда пирамиды (горизонтальная ось X)

Let r = Sqr(x * x + y * y)
- расстояние до шара в пирамиде в данном ряду

For c = c To 30 Step 0.001
- цикл по поиску угла для каждого шара в ряду

Let d = Sin(3.1415927 / 180 * c) * r
- рассчитываем расстояние от вертикальной оси до данного шара в ряду

If d >= x Then GoTo 1
Next c
- выходом из цикла поиска угла будет либо просмотр ряда до конца, либо остановка на данном шаре в ряду

1 Print #1, Str(a), Str(Int(1000 * c) / 1000), Str(Int(1000 * r) / 1000)
- сохраняем результат расчета в файл с точность 3 знака после запятой
(a) - ряд, (c) - угол отклонения от вертикали, (r) - расстояние до шара

Let x = x + st
- увеличиваем координату X для соседнего шара в данном ряду

Next b
- и переходим к его рассмотрению

Next a
- после окончания всех шаров в данном ряду переходим к ряду следующему

Close
- закрываем файл с расчетами


Вернуться в «Рассуждения»

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и 1 гость

Вход  •  Регистрация