aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2024-07-13 15:19:22 -07:00
commit 5c1bb7bfa9
2011 changed files with 35091 additions and 3239 deletions
Download patch file Download diff file Expand all files Collapse all files

11
Task/Square-but-not-cube/ABC/square-but-not-cube.abc Normal file
View file

@ -0,0 +1,11 @@
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