Решение проблемы не найдено, но найден обходной путь решения.
|
Пау40г в яростэ! == [[
Graphics 800,600,32
SetBuffer BackBuffer()
Local x0#=GraphicsWidth()/2
Local y0#=GraphicsHeight()/2
Local a0#=90
Local b#=1
Local v#=8
For t#=0 To 1000 Step 3
Local x#=x0-v*Sin(a0+b*t)*b
Local y#=y0-v*Cos(a0+b*t)*b
Plot x,GraphicsHeight()-y
Delay 1
Flip
Next
SetFont LoadFont("Arial",20)
Text 5,5,"betta="+b
Text 5,20,"v="+v
Flip
AppTitle "ok"
WaitKey()
End
Всегда получается окружность. Угол поворота и скорость влияют на её радиус и на то, как быстро окружность замкнётся.