прогуливал геометрию, пасаны чеделать

[supernewbie]

задача в приклейде, наверняка это все проходили в пятом классе, и выполняется это всё по какой-нибудь обдолбаной теореме, поэтому не знаю че тут написать, нет мне оправдания
памахите

[destructor]

конечная:
х = 60 * cos(75) ;
у = 60 * sin(75);

[KOHb]

60*Sin75 = 58 = y
60*Cos75 = 15,5 = x

[supernewbie]

var
  len2:TPoint;
begin
PScene.Canvas.Pen.Color:=Line.color;
PScene.Canvas.MoveTo(Line.x,Line.y);
len2.x:=Round(Line.len * Cos(Line.angle));
len2.y:=Round(Line.len * Sin(Line.angle));
PScene.Canvas.LineTo(Line.x+len2.X,Line.y+len2.y);
end;

че-то не палучаится

Добавлено через 6 минут
55; -23 получается че-та :\

[destructor]

у тебя функции багнутые.

начерти на бумаге отрезок А(0:0) - В(15.5 , 58);
и проверь "угол наклона" транспортиром

[supernewbie]

всмысле багнутые? что не так с дельфовскими функциями? или какие ты имел ввиду?

Добавлено через 1 минуту
FloatToStr(60*Cos(75)) = 55,3
FloatToStr(60*Sin(75)) = -23,6

[destructor]

косинус и синус 75 это положительные числа, при умножении на 60 тоже будет положительное число.
я хз откуда у тебя -23 получилось, попробуй на другом калькуляторе, твой глючит, инфа 100%.

[supernewbie]

да какой канкулятор, это функции дельфы!

[destructor]

я хз, попробуй другую делфи

[mira]

ТЫ ПЕРЕВЕДИ ГРАДУСЫ В РАДИАНЫ !!121