typedef double (*d)(double);

//---------------------------------------------------------------------------
 
#include "math.h"
#include <stdio.h>
#include <conio.h>
#include <vcl.h>
#pragma hdrstop
 
 
//---------------------------------------------------------------------------
 
#pragma argsused
typedef double (*d)(double);   // Декларация типа указателя на функцию
double funn1(double);      // Декларации прототипов функций
double funn2(double);
void Out_Rez (double(*)(double) ,double,double,double);
void main()
{
double a, b, h;
puts("Input a,b,h");        scanf("%lf%lf%lf", &a, &b, &h);
puts("\n\t Function - 2*exp(x)");  Out_Rez (funn1,a,b,h);
puts("\n\t Function - sin(x)*sin(x)");  Out_Rez (funn2,a,b,h);
puts("\n Press any key ... ");
getch();
}
//---------- Реализации функций пользователя ---------------------------------
double funn1( double r){
        return 2*exp(r*r);
}
double funn2(double r) {
        return pow(sin(r), 2);
}
void Out_Rez (d fv,double a,double b,double h) {
     for(double x=a; x<=b; x+=h)
          printf(" x = %5.2lf, y = %8.4lf\n",x,fv(x));
}

typedef double (*d)(double) funck_type; // Декларация типа указателя на функцию
 funck_type funn1; 
 funck_type funn2;

typedef double (*d)(double);

d funn1;