home *** CD-ROM | disk | FTP | other *** search
/ ticalc.org / ticalc_org_rev_b.iso / archives / 81 / basic / math / heron.81 < prev    next >
Encoding:
Text File  |  2001-07-01  |  467 b   |  24 lines
  1. This program solves for the area of a scalene triangle.  You enter
  2. the value of each side and it will use the formula
  3. sqrt(s(s-a)(s-b)(s-c)) 
  4. when a, b, & c are the value of the sides 
  5. and
  6. s is (a + b + c) / 2
  7.  
  8. Feel free to distribute but please dont take credit for yourself.
  9.  
  10.  
  11.         Written by David Stinemetze
  12.  
  13. NAME:Heron
  14. :ClrHome
  15. :Disp "A"
  16. :Input A
  17. :Disp "B"
  18. :Input B
  19. :Disp "C"
  20. :Input C
  21. :(A+B+C)/2\->\S
  22. :SQRT(S(S-A)(S-B)(S-C))\->\H
  23. :Disp H
  24. :End