home *** CD-ROM | disk | FTP | other *** search
/ ticalc.org / ticalc_org_rev_b.iso / archives / 81 / basic / math / yx.81 < prev   
Encoding:
Text File  |  2001-07-01  |  663 b   |  29 lines
  1. This program is a great exponent program.   The differnce between
  2. this program and the regular Y^X program is that this allows you to
  3. find the answer to large exponents like, 231 ^ 320 which when you
  4. normally try finding an answer, it will give you an OVERFLOW error.
  5. This way it will give you the answer in scientific notation.
  6.  
  7.  
  8. Feel free to distribute but please dont take credit for yourself.
  9.  
  10.  
  11.         Written by David Stinemetze
  12.  
  13. NAME:YTOTHEX
  14. :ClrHome
  15. :Disp "Y^X"
  16. :Disp ""
  17. :Disp "Y"
  18. :Input Y
  19. :Disp "X"
  20. :Input X
  21. :(log Y)*X\->\E
  22. :Int E\->\B
  23. :10^(E-B)\->\B
  24. :(Int (B*100))/100\->\B
  25. :Disp B
  26. :Disp "            *10^"
  27. :Int E\->\E
  28. :Disp E
  29. :End