Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: круг? Добавлено: 22.08.09 01:23  

Автор вопроса:  UnDeAdZak
Люди, мне нужен ответ на вопрос: мне надо найти формулу для движения по кругу, т.е., чтобы я подставлял Х, а он мне выдавал Y.

Ответить

  Ответы Всего ответов: 15  

Номер ответа: 1
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #1 Добавлено: 22.08.09 01:44
Чтоб получить круг нужно на одно дабл значение получать в ответ два, Х и Y и рисовать.
Для размышления
Х=sin(n)
Y=cos(n)

Ответить

Номер ответа: 2
Автор ответа:
 Дмитрий Юпатов



Вопросов: 4
Ответов: 457
 Web-сайт: cargomaster.at.ua/
 Профиль | | #2
Добавлено: 22.08.09 01:59
Ну или X^2+Y^2=R^2. Откуда выводим формулу для получения Y(x) при заданном R: Y(x)=SQRT(R^2-X^2). Так вроде...

Ответить

Номер ответа: 3
Автор ответа:
 Skywalker



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
 Web-сайт: iSkywalker.ru
 Профиль | | #3
Добавлено: 22.08.09 02:00
y = y0 +- sqrt(R^2 - (x-x0)^2)

(x0; y0) - центр окружности, R - радиус

Ответить

Номер ответа: 4
Автор ответа:
 Дмитрий Юпатов



Вопросов: 4
Ответов: 457
 Web-сайт: cargomaster.at.ua/
 Профиль | | #4
Добавлено: 22.08.09 02:02
Да блин, добрых людей все больше :)

Ответить

Номер ответа: 5
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #5 Добавлено: 22.08.09 03:31
Все отдохнувшие довольные :-)

Ответить

Номер ответа: 6
Автор ответа:
 Илья



Вопросов: 1
Ответов: 48
 Профиль | | #6 Добавлено: 22.08.09 10:08
Взято из формулы полярноой системы координат:

  1. Const PI = 3.14159
  2. Dim r As Long
  3. Dim i As Long
  4.  
  5. Private Sub Command1_Click()
  6. r = 600
  7.  
  8. For i = 0 To 360
  9. Line (r * (1 + Sin(i * PI / 180)), r * (1 + Cos(i * PI / 180)))-(r, r)
  10. Next
  11. End Sub


Где i - градус, Pi - П, r - Радиус

Ответить

Номер ответа: 7
Автор ответа:
 AWP



ICQ: 345685652 

Вопросов: 96
Ответов: 1212
 Web-сайт: xawp.narod.ru
 Профиль | | #7
Добавлено: 23.08.09 01:32
  1.  
  2. Dim X As Single, Y As Single
  3. Dim R As Long
  4. Dim i As Single
  5. Dim Stp As Single
  6.  
  7. R = 100
  8. Stp = 1 / R ' Шаг, чтобы все точки на окружности были заполнены.
  9.  
  10. For i = 0 To 6.2831 Step Stp
  11.   X = Cos(i) * R
  12.   Y = Sin(i) * R
  13.   PSet (X + 100, Y + 100)
  14. Next

Ответить

Номер ответа: 8
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #8 Добавлено: 23.08.09 02:14
Блин! Стоило дать подсказку первым, чтоб получить такой фифект :-)

Ответить

Номер ответа: 9
Автор ответа:
 AWP



ICQ: 345685652 

Вопросов: 96
Ответов: 1212
 Web-сайт: xawp.narod.ru
 Профиль | | #9
Добавлено: 23.08.09 02:41
чтобы я подставлял Х, а он мне выдавал Y.


А разве не Y=sin(X)? Ну так, чисто спросить.
Ну точнее Y=+-sin(X).

Ответить

Номер ответа: 10
Автор ответа:
 Илья



Вопросов: 1
Ответов: 48
 Профиль | | #10 Добавлено: 23.08.09 14:44
А разве не Y=sin(X)? Ну так, чисто спросить.
Ну точнее Y=+-sin(X).

Нет, насколько я помню в 2 мерной системе координат, для единичной окружности действительно следующее:
Y=Sin(a)
X=Cos(a)
Где a - угол, x и y точки, принадлежащие окружности

Ответить

Номер ответа: 11
Автор ответа:
 Илья



Вопросов: 1
Ответов: 48
 Профиль | | #11 Добавлено: 23.08.09 14:45
блин, грёбаные смайлики

Ответить

Номер ответа: 12
Автор ответа:
 AWP



ICQ: 345685652 

Вопросов: 96
Ответов: 1212
 Web-сайт: xawp.narod.ru
 Профиль | | #12
Добавлено: 23.08.09 19:47
Ну дк, что было в скобках?
Хочу знать, потому, что задание было контретное - из X получить Y. =)

Ответить

Номер ответа: 13
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #13
Добавлено: 23.08.09 20:23
x^2 + y^2 = r^2

Выражаем y через x:

y1 = sqr(r^2 - x^2)
y2 = -sqr(r^2 + x^2)

Фича в том, что для одного аргумента X значений Y может быть 0, 1, и 2.

Ответить

Номер ответа: 14
Автор ответа:
 Илья



Вопросов: 1
Ответов: 48
 Профиль | | #14 Добавлено: 23.08.09 22:52
Хочу знать, потому, что задание было контретное - из X получить Y.

a - альфа

Ответить

Номер ответа: 15
Автор ответа:
 Илья



Вопросов: 1
Ответов: 48
 Профиль | | #15 Добавлено: 23.08.09 22:56
  1. y1 = sqr(r^2 - x^2)
  2. y2 = -sqr(r^2 + x^2)

В этом и проблема, данная функция действительна в 4 четвертях, а в программировании 2 четверти, и код нужно изменять, по этому советую использовать формулу полярной системы координат

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам