c语言求信源的信息熵