func main()
	var N: int :: cui@inputInt()
	var flag4: bool :: false
	var flag6: bool :: false
	
	for L(1, 9)
		if(N % 10 = 4)
			do flag4 :: true
		elif(N % 10 = 6)
			do flag6 :: true
		end if
		if(N < 1)
			break L
		else
			do N :: N / 10
		end if
	end for
	
	if(flag4 = true & flag6 = true)
		do cui@print("Beautiful")
	else
		do cui@print("...")
	end if
	
end func