r = 25;
h = 5;
Br = 1.22;
f[t_, z0_] = -r*(x - r*Cos[t])*
Cos[t]/((x - r*Cos[t])^2 + (y - r*Sin[t])^2 + (z - z0)^2)^1.5;
g[t_, z0_] =
r*(y - r*Sin[t])*
Sin[t]/((x - r*Cos[t])^2 + (y - r*Sin[t])^2 + (z - z0)^2)^1.5;
B[x_, y_] = (Br/
（4*Pi）)*(Integrate[f[t_, z0_], {t, 0, 6.28}, {z0, 0, h}] -
Integrate[g[t_, z0_], {t, 0, 6.28}, {z0, 0, h}])
F[z_] = Integrate[
Integrate[
Sqrt[1 + D[10 + Sqrt[6.25 - x^2], x]^2 +
D[10 + Sqrt[6.25 - x^2], y]^2]*B[x_, y_]*B[x_, y_], {x, -2.5,
2.5}], {y, -25, 25}]
F[10]

我也遇到了同样的问题

没太看懂，怎么就写了四个等式上去了，函数定义不是这样写的吧。。

请问解决了吗

函数定义不是这么写的。
而且这个程序乱七八糟，看都看不懂，就直接定义了几个意义不明的函数，然后就没了。看懂这个程序的工作量，大概还不如你讲一下你要干什么我们直接给你写的工作量大。

肉眼可见的,分母不见了