DarkDevourer

14 лаба

Dec 4th, 2019
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.38 KB | None | 0 0
  1. #define _CRT_SECURE_NO_WARNINGS
  2. #include <stdio.h>
  3. #include <math.h>
  4. #include <errno.h>
  5. #include <stdlib.h>
  6.  
  7. double f(double x); //Подпрограмма, вычисляющая значение функции x^2*exp(-x)
  8. void draw_chart(double a, double b); //Подпрограмма, рисующая график функции x^2*exp(-x)
  9. void save_chart(char* file_name); //Подпрограмма, рисующая и сохраняющая гистограмму функции x^2*exp(-x)
  10.  
  11. int main()
  12. {
  13. double x, y, a = -1, b = 2, step = 0.1;
  14. int cnt = b - a, i;
  15. cnt = cnt / step + 1;
  16. x = a;
  17. for (i = 0; i < cnt; i++, x+=step)
  18. {
  19. y = f(x);
  20. if (errno == ERANGE)
  21. {
  22. printf("ERROR ");
  23. }
  24. errno = 0;
  25. printf("x = %f\n", x);
  26. }
  27. system("pause");
  28. }
  29.  
  30. double f(double x) //Подпрограмма, вычисляющая значение функции x^2*exp(-x)
  31. {
  32. double ctrl, result;
  33. result = x * x;
  34. if (fabs(ctrl = result / x - x)>=0.00001)
  35. {
  36. //TODO: посмотреть, нужно ли errno
  37. errno = ERANGE;
  38. return -1;
  39. }
  40. return (result);
  41. }
  42. void draw_chart(double a, double b) //Подпрограмма, рисующая график функции x^2*exp(-x)
  43. {
  44.  
  45. }
  46. void save_chart(char* file_name) //Подпрограмма, рисующая и сохраняющая гистограмму функции x^2*exp(-x)
  47. {
  48.  
  49. }
Add Comment
Please, Sign In to add comment