program main
    implicit none
    character(1000)::str
    read*,str
    print*,abs(len_trim(str)-10)
end program