Поменять стандарт ISO C99 на ISO C90

#include <stdio.h>
#include <stdlib.h>
#define _USE_MATH_DEFINES
#include <math.h>
#include "int4-1.h"
 
#define eps 1e-6
#define d 1e-4
 
 
int main(void)
{
    double x;
    fprintf(stdout, "Type alpha: ");
    if (fscanf(stdin, "%lf", &alpha) != 1) { fprintf(stdout, "er"); return -1; }
    if ((alpha >= 1) || (alpha <= 0))
    {
        fprintf(stdout, "No solution if alpha is out of (0,1)\n");
        return -1;
    }
    fprintf(stdout, "Type N: ");
    if (fscanf(stdin, "%d", &n) != 1) { return -1; fprintf(stdout, "er"); } 
    x = root_search(f, g, -100, 100, d2f);
    fprintf(stdout, "Solution: x = %lf f(x) = %lf\n", x, f(g,x));
    return 0;
}

#include <stdio.h>
#include <stdlib.h>
#define _USE_MATH_DEFINES
#include <math.h>
#include "int4-1.h"
 
#define eps 1e-6
#define d 1e-4
 
 
double g(double t)
// Кочкарев А.В.
// Подыинтегральная функция.
// Вход: аргумент t
// Выход: значение подинтегральной функции при данном аргументе
{
  return exp(-0.5*t*t);
}
 
 
double f(double(*g)(double t), double x)
// Кочкарев А.В.
// Функция, зависящая от x и alpha.
// Вход: аргумент x и подинтегральная функция g
// Выход: значение функции при данном x и alpha
{
  return integral(g,eps,x)-alpha*sqrt(2*M_PI)+sqrt(0.5*M_PI);
}
 
 
double integral(double (*f)(double), double a, double b)
// Кочкарев А.В.
// Функция подсчета приближенного значения интеграла на данном отрезке методом трапеций
// Вход: функция f, которую интегрируем, концы отрезка a и b
// Выход: приближенное значение интеграла на данном отрезке
{
    double h,l,s,s1,m;
    int i;
    s=0;
    h=(b-a)/n; printf("%lf",h);
    l=fabs(b-a);
    m=l/n;
    for (i=1;i<n;i++)
      s=s+f(a+i*m);
    s1=((f(a)+f(b))/2.);
    s=s+s1;
    s=s*h;
    fprintf(stdout, "%lf", s);
    return s;
}
 
 
double d2f(double t)
// Кочкарев А.В.
// Второй дифференциал подинтегральной функции
// Вход: аргумент t
// Выход: значение второго дифференциала при данном аргументе
{
    return -exp(-0.5*t*t)*t;
}
 
 
double root_search(double(*f)(double(*g)(double t),double x), double(*g)(double t), double a, double b, double (*d2f)(double x))
// Кочкарев А.В.
// Функция нахождения корня уравнения на заданно отрезке методом Ньютона (касательных)
// Вход: Функция f, корень которой ищем, ее производная g, концы отрезка a и b, ее вторая производная d2f
// Выход: корень уравнения f на данном отрезке
{
    double x0, xn;
    int kol;
    kol = 1;
    if (fabs(f(g,a)) < eps)
        return a;
    if (fabs(f(g,b)) < eps)
        return b;
    if (f(g,a)*d2f(a)>0)
        x0 = a;
    else
        x0 = b;
    xn = x0-f(g,x0)/g(x0);
    if((xn < a) || (xn > b))
        xn = (a + b)/2;
    if(fabs(f(g,xn)) < eps)
        return xn;
    while(fabs(x0-xn) > eps)
    {
        if(kol > 100)
            return -1;
        x0 = xn;
        xn = x0-f(g,x0)/g(x0);
        if((xn < a) || (xn > b))
            xn = (a + b)/2;
        if(fabs(f(g,xn)) < eps)
            return xn;
    fprintf(stdout, "%d\n", kol);
        ++kol;
    }
    return xn;
}

double g(double t);
// Кочкарев А.В.
// Подыинтегральная функция.
// Вход: аргумент t
// Выход: значение подинтегральной функции при данном аргументе
 
double f(double(*g)(double t), double x);
// Кочкарев А.В.
// Функция, зависящая от x и alpha.
// Вход: аргумент x и подинтегральная функция g
// Выход: значение функции при данном x и alpha
 
 
double integral(double (*f)(double), double a, double b);
// Кочкарев А.В.
// Функция подсчета приближенного значения интеграла на данном отрезке методом трапеций
// Вход: функция f, которую интегрируем, концы отрезка a и b
// Выход: приближенное значение интеграла на данном отрезке
 
double d2f(double t);
// Кочкарев А.В.
// Второй дифференциал подинтегральной функции
// Вход: аргумент t
// Выход: значение второго дифференциала при данном аргументе
 
double root_search(double(*f)(double(*g)(double t),double x), double(*g)(double t), double a, double b, double (*d2f)(double x));
// Кочкарев А.В.
// Функция нахождения корня уравнения на заданно отрезке методом Ньютона (касательных)
// Вход: Функция f, корень которой ищем, ее производная g, концы отрезка a и b, ее вторая производная d2f
// Выход: корень уравнения f на данном отрезке
 
int n;
// Кочкарев А.В.
// Глобальная переменная n - количество трапеций при подсчете интеграла
 
double alpha;
// Кочкарев А.В.
// Глобальная переменная alpha - параметр уравнения

extern int n;
// Глобальная переменная n - количество трапеций при подсчете интеграла
 
extern double alpha;
// Глобальная переменная alpha - параметр уравнения

int n;
double alpha;