用定积分的定义来求解定积分，编写一个求定积分的通用函数，用它分别求以下几个积分：doubleintegral(doublea,doubleb,double(*fun)(double));