Question

这个分段函数用auto lisp语言怎么写。

Answer 1

　　Lisp语言程序如下：
　　(setq y (cond ((<= x -1) (+ x 1))
　　 ((<= x 3) (* x x))
　　 (t (/ (sin x) (cos x)))
　　))

追问

中间那个x定义域还有一个x>-1啊

追答

x>-1不需要写了，因为第一个x定义域是 x-1 了。