
Imports System.Console
Module Module1
    Dim ans As Integer
    Sub Main()
    Dim n As Integer = ReadLine()
    If N>=30 Then
      WriteLine("Yes")
    Else
      WriteLine("No")
    End If
    End Sub
End Module
