http://cache.baidu.com/c?word=fp%3B%D3%EB%3Btp&url=http%3A//qfzx%2Enhedu%2Enet/Soft/programmer/Pascal/200510/134%2Ehtml&b=0&a=34&user=baidu