求助

zhangdai

如何编写lisp求解多个不规则封闭图形的总面积，总周长，个数？

 先谢谢拉

ZZXXQQ

编程思路：

1、用带过滤表达式的SSGET函数取得要计算的封闭图形；

2、用SSLENGTH可求得上述选择集的个数；

3、设总面积和总周长变量为零；

4、循环用AREA分别计算各封闭图形，并从系统变量AREA中读出面积累加，从系统变量PERIMETER中读出周长累加。