[<AutoOpen>]
module Program

open System

let read f = stdin.ReadLine() |> f
let reads f = stdin.ReadLine().Split() |> Array.map f

[<EntryPoint>]
let main argv =
    let s = read id
    let t = "2019/04/30"
    if s <= t
    then printfn "Heisei"
    else printfn "TBD"
    0