home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l210 / 1.ddi / REFEXAMP.ARC / READREAL.PRO < prev    next >
Encoding:
Text File  |  1988-06-21  |  332 b   |  23 lines
  1. %====================== readreal/1            ===============================
  2. Goal: readreal(X)
  3. 123
  4. X=123
  5. 1 Solution
  6.  
  7. Goal: readreal(X)
  8. -123.456E-5
  9. X=-0.00123456
  10. 1 Solution
  11.  
  12. Goal: readreal(X)
  13. .56
  14. X=0.56
  15. 1 Solution
  16.  
  17. Goal: readreal(X)
  18. No Solution         <--- Esc was pressed
  19.  
  20. Goal: readreal(X)
  21. aaaa
  22. No Solution
  23.