采用迭代法，使等式两边的绝对值差小于等于0.0001
已知条件：
α为角度
c为变形系数
fm曲率比
Fa为轴向力
Z钢球数量
Dw为钢球直径
未知量α'进行迭代VB中x1表示

要求:输入已知条件和代入一个α',最终求出/显示等式的两边数值和最终的α'

多谢您的回复
但
z2= Fa / (Z * Dw * Dw * Sin(x1 * PI / 180))

x1范围在1° 到91°，Sin(x1 * PI / 180)范围在sin（PI/180）和sin（91*PI/180）多事正值，Fa与Z 和Dw都是正值，没有出现负值啊

Z2有具体数值啊

菜鸟一枚
学学