home *** CD-ROM | disk | FTP | other *** search
/ Simtel MSDOS - Coast to Coast / simteldosarchivecoasttocoast2.iso / calculat / sm30a.zip / PROBLEM.SM < prev    next >
Text File  |  1993-11-15  |  1KB  |  93 lines
  1. #    Examples come from the Problem.TXT file.
  2.  
  3. output:=basic
  4.  
  5. # example 1
  6. inte(exp(-a*x^2), x from 0 to inf)
  7. assume(a > 0)
  8. inte(exp(-a*x^2), x from 0 to inf)
  9.  
  10. # example 2
  11. assume(1+n > 0)
  12. inte(x^n, x from 0 to 1)
  13.  
  14. # example 3
  15. subs(inte(x^n, x from eps to 1), eps=0)
  16.  
  17. # example 4
  18. assume(n > 0)
  19. 0^n, 0^m
  20. 0^0
  21.  
  22. # example 5
  23. lim(inte(x^k,x), k=-1)
  24.  
  25. # example 6
  26. lim(x^k/exp(x), x=inf)
  27. lim(x^(10^10)/exp(x), x=inf)
  28.  
  29. # example 7
  30. inte(x^n*exp(-x), x from 0 to inf)
  31.  
  32. # example 8
  33. inte(1/x, x from -1 to 1)
  34. inte(1/x, x from -1 to 2)
  35.  
  36. # example 9
  37. inte(tan(x), x from 0 to pi)
  38.  
  39. # example 10
  40. inte(sign(x), x from -2 to 2)
  41. inte(sign(x), x from -1 to 2)
  42.  
  43. # example 11
  44. expand := on
  45. inte(y'(x)*(1+1/y(x)) = -1, x)
  46. dsolve(y'(x) = -y(x)/(y(x)+1), y(x),x)
  47. expand := off
  48.  
  49. # example 12
  50. dsolve(y'(x) = sqrt(y(x)), y(x),x)
  51.  
  52. y'(x) = sqrt(y(x))
  53. last/sqrt(y(x))
  54. inte(last,x)
  55.  
  56. # example 13
  57.  
  58. assume(p > 0, q < 0)
  59. sqrt(p^2),sqrt(q^2),sqrt(x^2)
  60. last
  61.  
  62. # example 14
  63. inte(abs(x), x from -1 to 1)
  64. inte(abs(x)^5,x)
  65.  
  66. # problem 3 
  67. inte(1/x^2, x from -3 to 1) 
  68.  
  69. # problem 11
  70. inte(1/(x+1)^3, x from -2 to 2)
  71.  
  72. # problem 12
  73. inte(x^(-4/3), x from -1 to 1)
  74.  
  75. # problem 15 
  76. inte(1/x, x from -1 to 2)
  77.  
  78. # problem 16
  79. inte(1/(x^2-x-2), x from 0 to 4)
  80.  
  81. # problem 22
  82. inte(1/(x*ln(x)^2), x from 1/e to e)
  83.  
  84. # problem 23
  85. inte(1/x^2*cos(1/x), x,-1,0,2)
  86.  
  87. # problem 29
  88. inte(1/(x-4)^2, x from 0 to 4 to inf)
  89.  
  90. # problem 30
  91. inte(1/(x+2), x from -inf to 0)
  92. num(last)
  93.