给出三个非常实用和高速的内存分配函数。读者可以直接拷贝这三个函数到程序中去，使用Allocate()和My_Free()代替系统提供的alloc()和free()函数。调试环境为TC2.0或者TC3.0
