Рисование математических функций

[PackegerX]

Вот сделал за 20 минут, потестьте, не понял только, как сделать ввод функции из программы, меняйте из исходника)

y=	;Функция задается тут

просто напишите после "y" любую мат. функцию , или раскоментируйте одну из строк из списка функций.

p.s. выкладывайте примеры интересных мат. функций на базе проекта, будем тестить

[Reks888]

А зачем закоментил блоки? Чтоб мы мучались их откоментируя?
Забавная формула... Она оптимизированная? Что-то не похоже чтобы столько кода нужно было для рисования кривой линии

[ABTOMAT]

А так слабо?

Graphics (800,600)
While Not KeyHit(1)
t#=Rnd(-400,400)
    R# = (1+Sin(t))*(1-.9*Abs(Sin(4*t)))*(.9+.05*Cos(200*t))    
    x# = Sin(t-90) * r*(220-(steps*4))+400
    y# = Cos(t-90) * r*(230-(steps*4))*0.8-400
Color 0,255,0 
Plot x#,-y
Wend
End

Баян, но всё же...

[PackegerX]

Reks888, ну там примеры мат. функций просто. В основном код там для рисования координатной системы, да примеры функций
ABTOMAT, да, слабо)), я не силен в математике особенно в тригонометрии) просто захотелось проверить как будет выглядеть.