Соударение тел Delphi - Помощь студентам

BYTYZAD · 09.01.2018, 21:57

Помогите с заданием в Delphi. Не могу исправить соударение тел, если делаешь угол betta = 90 , то второе тело не рисуется , как исправить???

type_Oleg · 09.01.2018, 22:07

Я не разбирался, только нашел это

Код:

y2:=tan(betta)*(x2-(r1+r2))+sin(alfa+betta)*(r1+r2);

Формула точно правильная? tg(90гр) вообще-то бесконечность (или минус бесконечность) . А функция Tan возвратит просто очень большое число. И координаты влезут за пределы канвы.

09.01.2018, 22:07	#2
type_Oleg Старожил Регистрация: 02.03.2008 Сообщений: 2,499	Я не разбирался, только нашел это Код: `y2:=tan(betta)(x2-(r1+r2))+sin(alfa+betta)(r1+r2);` Формула точно правильная? tg(90гр) вообще-то бесконечность (или минус бесконечность) . А функция Tan возвратит просто очень большое число. И координаты влезут за пределы канвы.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Программа бильярд(соударение мячей) C#	Kehab	Помощь студентам	0	21.01.2012 11:26
Тел. справочник на Delphi 7	iron_cross	Помощь студентам	1	23.01.2011 20:54
Соударение shapoB	IL-93	Помощь студентам	0	13.11.2010 16:22
Столкновение тел	Лубышев	Помощь студентам	3	08.12.2008 11:07
Соударение шариков разных размеров и объемов	Стаханов_Андрей	Помощь студентам	3	09.03.2008 17:17