Показать сообщение отдельно
Старый 18.03.2011, 21:19   #27
Местный
 
Аватар для supernewbie
 
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
supernewbie пока неопределено
По умолчанию

x1=180
y1=450

x2=300
y2=450

dx=120
dy=0

path=120

angle=0

dx:=x2-x1;
dy:=y2-y2;
path:=Sqrt(sqr(dx)+sqr(dy));
tan:=dy/dx;
angle:=Round((ArcTan(tan)*180)/pi);
__________________
Начало.
supernewbie вне форума   Ответить с цитированием