Square but not cube: Difference between revisions
Content added Content deleted
Line 704: | Line 704: | ||
<lang basic>100 DIM SC(2):SC=0: REM REMEMBER SQUARE CUBES |
<lang basic>100 DIM SC(2):SC=0: REM REMEMBER SQUARE CUBES |
||
110 PRINT "SQUARES BUT NOT CUBES:" |
110 PRINT "SQUARES BUT NOT CUBES:" |
||
120 I=1: CU=1: SQ=1: RT=1: |
120 I=1: CU=1: SQ=1: RT=1: N=0 |
||
130 IF N=30 THEN 200 |
130 IF N=30 THEN 200 |
||
140 SQ=I*I |
140 SQ=I*I |