Absolutly wrong done Task 5

This commit is contained in:
AZEN-SGG 2025-05-07 18:06:47 +03:00
parent 231e507ef5
commit 8e6617686b
18 changed files with 807 additions and 0 deletions

42
2025.05.02/06Ex/Makefile Normal file
View file

@ -0,0 +1,42 @@
WFLAGS = -fstack-protector-all -W -Wall -Wextra -Wunused \
-Wempty-body -Wlogical-op -Wold-style-declaration -Wmissing-parameter-type \
-Wignored-qualifiers -Winit-self -Wshadow -Wtype-limits \
-Wpointer-arith -Wformat-security -Wmissing-format-attribute -Wformat=1 \
-Wdeclaration-after-statement -Wbad-function-cast -Wnested-externs \
-Wmissing-prototypes -Wmissing-declarations -Wold-style-definition \
-Wcast-align -Werror -pedantic -pedantic-errors -Wfloat-equal \
-Wwrite-strings -Wno-long-long -std=gnu99 -Wstrict-prototypes \
-Wmissing-field-initializers -Wpointer-sign
LDFLAGS = -std=gnu99 -mfpmath=sse -O3
LDLIBS = -lm
ifeq ($(OS),Windows_NT)
EXE = exe
CLEAN = del
LDLIBS += -lssp
else
EXE = out
CLEAN = rm -f
endif
TARGET = a06.$(EXE)
OBJ = main.o solve.o init_f.o
%.o: %.c
gcc $(WFLAGS) $(LDFLAGS) -c $< -o $@
$(TARGET): $(OBJ)
gcc $^ -o $@ $(LDLIBS)
# Отладочная сборка (gdb)
gdb: LDFLAGS = -std=gnu99 -mfpmath=sse -g -O0
gdb: clean $(TARGET)
# Профилировочная сборка (gprof)
prof: LDFLAGS += -pg
prof: LDLIBS += -pg
prof: clean $(TARGET)
clean:
$(CLEAN) *.o *$(EXE)

61
2025.05.02/06Ex/init_f.c Normal file
View file

@ -0,0 +1,61 @@
#include "init_f.h"
#include <math.h>
static int cl = 0;
int get_call_count (void)
{
return cl;
}
double f0 (double x)
{
cl++;
(void)x;
return 1;
}
double f1 (double x)
{
cl++;
return (x * 1e-100) - 1.0;
}
double f2 (double x)
{
cl++;
return 4 - x * x;
}
double f3 (double x)
{
double x_2 = x * x;
cl++;
return x * x_2 + 3 * x_2 + 16;
}
double f4 (double x)
{
double x_2 = x * x;
cl++;
return 3 - 2 * x_2 - x_2 * x_2;
}
double f5 (double x)
{
cl++;
return sqrt(fabs(x) + 1) - 2;
}
double f6 (double x)
{
cl++;
return sqrt(sqrt(fabs(x) + 1) + 1) - 2;
}

13
2025.05.02/06Ex/init_f.h Normal file
View file

@ -0,0 +1,13 @@
#ifndef INIT_F_H
#define INIT_F_H
int get_call_count (void);
double f0 (double x);
double f1 (double x);
double f2 (double x);
double f3 (double x);
double f4 (double x);
double f5 (double x);
double f6 (double x);
#endif

49
2025.05.02/06Ex/main.c Normal file
View file

@ -0,0 +1,49 @@
#include <stdio.h>
#include <time.h>
#include <math.h>
#include "init_f.h"
#include "solve.h"
/* ./a.out a b eps M k */
int main(int argc, char *argv[])
{
double t, a, b, eps, x = 0;
int m, k, cl, it, task = 1;
double (*f) (double);
double (*f_lst[]) (double) = {f0, f1, f2, f3, f4, f5, f6};
int len_f = sizeof(f_lst) / sizeof(f_lst[0]);
if (
!((argc == 6) &&
sscanf(argv[1], "%lf", &a) == 1 &&
sscanf(argv[2], "%lf", &b) == 1 &&
(a <= b) &&
(sscanf(argv[3], "%lf", &eps) == 1 && (eps >= 0)) &&
((sscanf(argv[4], "%d", &m) == 1) && m > 0) &&
((sscanf(argv[5], "%d", &k) == 1) && ((0 <= k) && (k <= len_f))))
) {
fprintf(stderr, "Usage: %s a b eps M k\n", argv[0]);
return -1;
}
f = f_lst[k];
t = clock();
it = t1_solve(f, a, b, eps, m, &x);
t = (clock() - t) / CLOCKS_PER_SEC;
cl = get_call_count();
if (it < 0)
{
fprintf(stdout, "%s : Task = %d NOT FOUND Count = %d T = %.2f\n", argv[0], task, cl, t);
return -2;
} else
{
printf("%s : Task = %d X = %e Res = %e Its = %d Count = %d T = %.2f\n", argv[0], task, x, f(x), it, cl, t);
return 0;
}
}

103
2025.05.02/06Ex/solve.c Normal file
View file

@ -0,0 +1,103 @@
#include "solve.h"
#include <math.h>
#include <float.h>
#include <stdbool.h>
#include <stdint.h>
#include <string.h>
int t1_solve (
double (*f) (double),
double a, double b,
double eps, int m, double *x
) {
int it = 0;
uint64_t bits;
double c = DBL_MAX, y, y_a = f(a), y_b = f(b);
bool sgn_a, sgn_b, sgn_c;
memcpy(&bits, &y_a, sizeof(bits));
sgn_a = (bits >> 63) & 1;
memcpy(&bits, &y_b, sizeof(bits));
sgn_b = (bits >> 63) & 1;
if (fabs(y_a) - eps < DBL_EPSILON)
{
*x = a;
return 1;
} if (fabs(y_b) - eps < DBL_EPSILON)
{
*x = b;
return 1;
}
if (sgn_a == sgn_b)
{
*x = DBL_MAX;
return -1;
}
for (it = 1; it <= m; ++it)
{
c = (a + b) * 0.5;
y = f(c);
memcpy(&bits, &y, sizeof(bits));
sgn_c = (bits >> 63) & 1;
if (fabs(y) - eps < DBL_EPSILON)
break;
else if ((fabs(c - a) < DBL_EPSILON) || (fabs(c - b) < DBL_EPSILON))
it = m+1;
else if (sgn_c == sgn_a)
{
a = c;
y_a = y;
} else if (sgn_c == sgn_b)
{
b = c;
y_b = y;
}
}
if (it > m)
it = -1;
*x = c;
return it;
}
int t6_solve (
double (*f) (double),
const int m, double *d
double a, double b,
const double eps, const int M, double *x
) {
const int len = m + 1;
double *y_lst = d;
double *x_lst = d + len;
double *t_lst = d + (len << 1);
double last_x = a;
double last_y = f(a);
const int h = (b - a) / m;
y_lst[0] = last_y;
x_lst[0] = last_x;
t_lst[0] = last_x;
for (int i = 1, double t_x = a ; i < len ; i++, t_x += h)
{
double t_y = f(t_x);
y_lst[i] = t_y;
x_lst[i] = t_x;
}
}

10
2025.05.02/06Ex/solve.h Normal file
View file

@ -0,0 +1,10 @@
#ifndef SOLVE_H
#define SOLVE_H
int t1_solve (
double (*f) (double),
double a, double b,
double eps, int m, double *x
);
#endif