program atcoder
    implicit none
    integer :: i
    integer, dimension(3) :: a
    character :: s*3

    read *, s
    do i = 1, 3
        read(s(i:i), *) a(i)
    end do
    print '(i0)', sum(a)

end program atcoder
