program main
    use,intrinsic :: iso_fortran_env
    implicit none
    integer(int32):: ans=700,i
    character(3):: s

    read*, s

    do i=1,3
        if (s(i:i) == 'o') ans=ans+100
    end do
    print'(i0)', ans
end program main