Option Strict On

Module Module1
    Const n As Int32 = 3
    Dim A, B, C, tmp(n - 1) As Long

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

        Console.WriteLine _
            (New String() {"Yes", "No"}(Convert.ToInt32(A + B < C)))

    End Sub
End Module