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