Алгоритмизация и программирование управления моментом старта и вектором скорости ракеты; перехват спутника, летящего по круговой орбите. Вычисление команды на перемещение объекта Raketa и координат объекта Sputnik; реализация контакта между объектами.
Спутник летит слева направо, начиная с левого верхнего угла экрана по круговой орбите с центром в левом нижнем углу экрана и радиусом равным высоте экрана. При контакте (определяется по расстоянию между объектами) спутник распадается на фрагменты в виде кружков. DECLARATE SUB contact (xc, yc, st, x1, y1) реализация контакта между объектами COLOR, 1 назначение синего цвета фона t = 0: dt = 1 назначение отсчета текущего времени t интервалом dt х = 0: у = 0 назначение начальной точки рисования объекта Raketa v=10: vs=0 значение скорости ракеты постоянно и интервал изменения скорости равен нулю ar=-1.5708: da=.15 начальное значение угла разворота ar объекта Raketa в радианах и интервал изменения угла da d$ = “bu20 e15 r5 f15 d20 y17 g17 u20 br5 макет рисунка объекта Raketa (строка оператора DRAW без символов закрашивания фигуры) х1 = 0: y1=600 начальные координаты спутника ar1 =-1.5708: da1 =.
Вы можете ЗАГРУЗИТЬ и ПОВЫСИТЬ уникальность своей работы