Option Strict On

Module Module1
    Dim A, B, X As Long
    Dim ans As String


    Sub Main()
        'let'
        Dim tmp() As Long =
            Array.ConvertAll(Of String, Long) _
            (Console.ReadLine().Split(), AddressOf Long.Parse)
        A = tmp(0)
        B = tmp(1)
        X = tmp(2)

        'var'
        ans = "YES"

        If X < A OrElse A + B < X Then ans = "NO"

        Console.WriteLine(ans)

    End Sub




End Module