2nd_Sem_Bogachev/2025.04.04/01Ex/solve.c
2025-03-30 16:28:50 +03:00

14 lines
238 B
C

#include "solve.h"
#include "math.h"
#define eps 1e-6
int t1_solve(double *a, int n)
{
int i, j;
for (i = 0; i < n; i++)
for (j = i; j < n; j++)
if (i != j)
if (fabs(a[i * n + j] - a[j * n + i]) > eps) return 0;
return 1;
}