Advertisement
Guest User

first-prog

a guest
Dec 14th, 2017
76
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Octave 1.60 KB | None | 0 0
  1. format long
  2. disp("Input your values: ");
  3. a=input("a - ");
  4. b=input("b - ");
  5. n=input("n - ");
  6. disp('---------------------');
  7. format bit
  8. disp ("64 bit IEEE 754");
  9. printf("a ="); disp(a);
  10. printf("b ="); disp(b);
  11. disp('---------------------');
  12. printf("eps in bin ="); disp(eps(1));
  13. format long
  14. #{
  15. К числу a n раз прибавлять число b,
  16. а затем из полученного значения
  17. n раз вычитать число b:
  18. #}
  19. printf("eps in dec ="); disp(eps(1));
  20. disp('---------------------');
  21. disp("1. a+b n-times");
  22. f=a;
  23. for k=1:n
  24.  f=f+b; end;
  25. for k=1:n
  26.  f=f-b; end;
  27. printf("f ="); disp(f);
  28. printf("a ="); disp(a);
  29. printf("err ="); disp (f-a);
  30. disp('---------------------');
  31. #{
  32. Из числа b n раз вычитать a,
  33. а затем к полученному значению
  34. прибавлять число a n раз :
  35. #}
  36. disp("2. b-a n-times");
  37. s=b;
  38. for i=1:n
  39.  s=s-a; end;
  40. for i=1:n
  41.  s=s+a; end;
  42. printf("s ="); disp(s);
  43. printf("b ="); disp(b);
  44. printf("err ="); disp (s-b);
  45. disp('---------------------');
  46. #{
  47. К числу a прибавить число n*b,
  48. а затем из полученного значения
  49. вычесть число n*b:
  50. #}
  51. disp("3. a+n*b ");
  52. t=a+b*n; t=t-b*n;
  53. printf("t ="); disp(t);
  54. printf("a ="); disp(a);
  55. printf("err ="); disp (t-a);
  56. disp('---------------------');
  57. #{
  58. Из числа b вычесть число n*a,
  59. а затем прибавить число n*a:
  60. #}
  61. disp("4. b-n*a");
  62. fo=b-a*n; fo=fo+a*n;
  63. printf("fo ="); disp(fo);
  64. printf("b ="); disp(b);
  65. printf("err ="); disp (fo-b);
  66. format short
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement