home *** CD-ROM | disk | FTP | other *** search
/ Crawly Crypt Collection 1 / crawlyvol1.bin / program / compiler / cpxbas1b / beispiel / test.bas < prev    next >
Encoding:
BASIC Source File  |  1993-08-20  |  104 b   |  6 lines
  1. 10  INPUT 'anz: ';x
  2. 20  FOR i=1 TO x
  3. 30    FPRINT 'x=';i;'x^2=',SQU i
  4. 40  NEXT
  5. 50  IF x<>0 THEN 10
  6.