Data update
This commit is contained in:
parent
aec8ed51b6
commit
29a5eea0d4
128 changed files with 1298 additions and 0 deletions
21
Task/Attractive-numbers/ABC/attractive-numbers.abc
Normal file
21
Task/Attractive-numbers/ABC/attractive-numbers.abc
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
HOW TO RETURN factors n:
|
||||
PUT {} IN factors
|
||||
PUT 2 IN factor
|
||||
WHILE n >= factor:
|
||||
SELECT:
|
||||
n mod factor = 0:
|
||||
INSERT factor IN factors
|
||||
PUT n/factor IN n
|
||||
ELSE:
|
||||
PUT factor+1 IN factor
|
||||
RETURN factors
|
||||
|
||||
HOW TO REPORT attractive n:
|
||||
REPORT 1 = #factors #factors n
|
||||
|
||||
PUT 0 IN col
|
||||
FOR i IN {1..120}:
|
||||
IF attractive i:
|
||||
WRITE i>>5
|
||||
PUT col+1 IN col
|
||||
IF col mod 10=0: WRITE /
|
||||
Loading…
Add table
Add a link
Reference in a new issue