Page 373 No.19 Work Problem

• radius = 2m,
• height of the cylinder = 5m,
• water height =3m,
• density = 737.33 kg/cubic meter

\[\int_{0}^{3} 737.22*\pi*2^2*9.8*(5-h) dh\]

f <- function(h) {737.22*pi*2^2*9.8*(5-h)}
integrate(f, lower=0, upper=3)

## 953284.1 with absolute error < 1.1e-08

The total work performed in pumping all the gasoline to the top of the tank is 953284.1 J.