home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / CMLN1285.ZIP / ZBASIC2.LTG < prev   
Encoding:
Text File  |  1986-02-27  |  256 b   |  10 lines
  1. zbasic. Listing 2ì
  2.  
  3. 1░ DEFIN╘ A-Z
  4. 2░ PRIN╘ TIME$
  5. 3░ FO╥ I=▒ T╧ 1000
  6. 4░ X#=X#+ABS(EXP(LOG(I))-SQR((I/1#)^2)+(2#/3#)*(I*3#/2#)-I)
  7. 6░ NEX╘ I
  8. 7░ PRIN╘ X#
  9. 80 PRINT TIME$
  10.