11 lines
307 B
Text
11 lines
307 B
Text
PUT 1 IN square.root
|
|
PUT 1 IN cube.root
|
|
PUT 30 IN amount
|
|
|
|
WHILE amount > 0:
|
|
WHILE square.root ** 2 > cube.root ** 3:
|
|
PUT cube.root + 1 IN cube.root
|
|
IF square.root ** 2 <> cube.root ** 3:
|
|
WRITE square.root ** 2/
|
|
PUT amount - 1 IN amount
|
|
PUT square.root + 1 IN square.root
|