Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Координаты точки   Найти похожие ветки 

 
roman2   (2010-04-10 11:41) [0]

Здравствуйте.
Скажите как узнать координаты 2 точки,
если известна координата 1 точки, угол наклона от 1 точки до 2, длина от 1 до 2 точки.
Спасибо.

function GetCoor(One:TPOINT; Angle:double; Len:double):TPOINT
var x:TPOINT;
begin
   *************
   Result:=x;
end;


 
oldman ©   (2010-04-10 12:51) [1]

Теорему Пифагора напомнить?


 
oldman ©   (2010-04-10 12:54) [2]

Вернее:

Прилежащий катет (разница по х) равен гипотенузы умножить на синус угла.
Противолежащий катет (разница по у) равен гипотенуза умножить на косинус угла.

Геометрия, средняя школа.


 
oldman ©   (2010-04-10 13:37) [3]

Блин, наоборот.
синус - противолежащий катет, косинус - прилежащий.

Из исходных данных a-угол, l-длина имеем

x2=x1+l*cos(a)
y2=y1+l*sin(a)


 
Правильный$Вася   (2010-04-10 15:13) [4]

сколькимерное пространство у тебя?


 
Toombaa Yoombaa   (2010-04-10 15:25) [5]

сколькимерное пространство у тебя?

Что за глупые вопросы? Неужели сразу не видно, что человек оперирует понятиями из Риманова пространства?


 
xdragon   (2010-04-10 15:59) [6]

Надеюсь пространство Евклидово, и с введённым на нём скалярным произведением? Иначе никак не решишь...


 
Харакири   (2010-04-10 16:07) [7]

Надеюсь пространство Евклидово

Я более чем уверен, что координаты - декартовы; реализация - TCanvas; и пространство - экранное.


 
анонимус   (2010-04-10 16:49) [8]

Я думаю что сдесь пространство Менковского с метрикой Бервольда Мора.


 
Харакири   (2010-04-10 21:37) [9]

сдесь

Ya, ya! Anreißzirkel!


 
Омлет ©   (2010-04-12 12:08) [10]

function GetCoor(One:TPOINT; Angle: double; Len:double):TPOINT;
var
 ASin, ACos: Extended;
begin
 sincos(Angle * (PI / 180), ASin, ACos);
 with Result do
 begin
   x := One.x + Round(len * ASin);
   y := One.y + Round(len * ACos);
 end;
end;


 
oldman ©   (2010-04-12 12:42) [11]


> Правильный$Вася   (10.04.10 15:13) [4]
> сколькимерное пространство у тебя?


А яка разница, если имеем длину и угол.
Все в одной плоскости.
:)


 
Dennis I. Komarov ©   (2010-04-12 13:15) [12]


> А яка разница, если имеем длину и угол.
> Все в одной плоскости.
> :)

Дык, совсем не обязательно при этом, что координаты точки заданы в этой плоскости...


 
Кукусики   (2010-04-12 14:32) [13]

>Дык, совсем не обязательно при этом, что координаты точки заданы в этой плоскости...

В 3-х мерном пространстве плоскость задается 3-мя точками, а 2-мя точками можно задать бесконечное количество плоскостей. Поэтому комментарий лишен всякого смысла. Не в тему, то есть.


 
Dennis I. Komarov ©   (2010-04-12 14:55) [14]


> В 3-х мерном пространстве плоскость задается 3-мя точками

Не факт...

> а 2-мя точками можно задать бесконечное количество плоскостей.


> если известна координата 1 точки, угол наклона от 1 точки до 2, длина от 1 до 2 точки.

Вот оно - слабое звено...



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.048 c
3-1242275833
petvv
2009-05-14 08:37
2010.08.27
SQLConnection1+LoadParamsFromIniFile


15-1266101457
Германн
2010-02-14 01:50
2010.08.27
Delphi - "рулез форева"!


2-1269192324
Невилл
2010-03-21 20:25
2010.08.27
Delphi2009 и StringGrid


15-1270198375
Девелопер
2010-04-02 12:52
2010.08.27
WMware WorkStation - невозможно работать по сети с хост-машиной.


2-1274192491
Student :)
2010-05-18 18:21
2010.08.27
HTTP component is busy