Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- myIntegral[x_] := NIntegrate[Sqrt[(a - b)^2 + (c - d)^2]/ (a - b), {a, 0, x}, {b, x, 1}, {c, 0, 1}, {d, 0, 1}]
- Plot[myIntegral[x], {x, 0, 1}]
- Integrate[Sqrt[t + (c - d)^2], {c, 0, 1}, {d, 0, 1}]
- myIntegral[x_] :=
- NIntegrate[(Sqrt[1 + (a - b)^2] - 2 (Sqrt[1 + (a - b)^2] - Sqrt[(a - b)^2]) (a - b)^2 + 3 (a - b)^2 ArcSinh[1/Sqrt[(a - b)^2]])/( 3 (a - b)), {a, 0, x}, {b, x, 1}]
- Plot[myIntegral[x], {x, 0, 1}]
Add Comment
Please, Sign In to add comment