Program ABC125B

integer n,max
integer,allocatable::v(:),c(:)

read(*,*) n
allocate(v(n))
allocate(c(n))
read(*,*) v
read(*,*) c

max=0

do i=1,n
 if (v(i)>=c(i)) then
  max=max+v(i)-c(i)
 end if
end do

write(*,*) max

stop
end