Advertisement
Guest User

Untitled

a guest
Apr 1st, 2020
91
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.69 KB | None | 0 0
  1. #!/bin/bash
  2.  
  3.  
  4. #nhap n va x
  5. #---------{
  6. nhapnx(){
  7. echo 'n:'; read n;
  8. echo 'x:'; read x;
  9. #1
  10. while [ $n -eq 0 ] || [ $x -eq 0 ]
  11. do
  12. echo 'Yeu cau nhap lai n hoac x khac 0';
  13. echo 'n:'; read n;
  14. echo 'x:'; read x;
  15. done
  16. #-
  17. }
  18. #---}
  19.  
  20. #tinh s(x,n) = -x+1/ x^ 2 -x^ 3 +1/x^ 4 -..... - x ^n
  21. #para: x, n
  22. #------{
  23. sxn(){
  24. s=-$x;
  25. xn=$x;
  26. i=2;
  27. #1 : tinh tong toi n
  28. while [ $i -le $n ]
  29. do
  30. xn=`expr $xn \* $x`;
  31. #1.1 : xet truong hop am hay duong
  32. case `expr $i % 2` in
  33. 0){
  34. s=$(echo "$s + 1/$xn"|bc -l);
  35. };;
  36.  
  37. 1){
  38. s=$(echo "$s - $xn"|bc -l);
  39. };;
  40. esac
  41. #--
  42. i=`expr $i + 1`;
  43. done
  44. #-
  45. echo "S(x,n):";
  46. echo "$s";
  47. }
  48. #---}
  49.  
  50.  
  51. #main
  52. {
  53. #1
  54. nhapnx;
  55. #-
  56.  
  57. #2
  58. sxn;
  59. #-
  60. }
  61. #niam
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement