Data update

2024-04-19 16:56:29 -07:00 · 2024-04-19 16:56:29 -07:00 · aec8ed51b6
commit aec8ed51b6
parent 0df55f9f24
1045 changed files with 18889 additions and 2777 deletions
--- a/Task/Erd-s-Nicolas-numbers/EasyLang/erd-s-nicolas-numbers.easy
+++ b/Task/Erd-s-Nicolas-numbers/EasyLang/erd-s-nicolas-numbers.easy
@ -0,0 +1,16 @@
+limit = 2000000
+for i to limit
+   dsum[] &= 1
+   dcnt[] &= 1
+.
+for i = 2 to limit
+   j = i + i
+   while j <= limit
+      if dsum[j] = j
+         print j & " equals the sum of its first " & dcnt[j] & " divisors"
+      .
+      dsum[j] += i
+      dcnt[j] += 1
+      j += i
+   .
+.