2nd_Sem_Bogachev/2025.03.21/02Ex/solve.c
2025-03-16 17:24:23 +03:00

26 lines
489 B
C

#include "solve.h"
#include <math.h>
#define eps 1e-17
int t1_solve(double *a, int m, int n)
{
int l, min_i = 0, min_j = 0, del_j;
double minimum = (m * n > 0) ? a[0] : 0;
for (int i = 0; i < m; i++)
for (int j = 0; j < n; j++)
if ((minimum - a[i*n + j]) > eps) { minimum = a[i*n + j]; min_i = i; min_j = j; }
(void)(min_i);
for (l = min_j+1, del_j = 1; l < m*n; l++)
{
if (l == ((n * del_j) + min_j))
del_j++;
else
a[l - del_j] = a[l];
}
return min_j + 1;
}