We’ve updated our Terms of Service. A new AI Addendum clarifies how Stack Overflow utilizes AI interactions.

Return to Revisions

#APL NARS 52 bytes, 25chars

{(⍺≠⍵)∧∧/⍺⍵={(11π⍵)-⍵}⍵⍺}

The function 11π calculate the sum of divisors. test:

 h←{(⍺≠⍵)∧∧/⍺⍵={(11π⍵)-⍵}⍵⍺}
 284 h 220⋄52 h 100⋄10744 h 10856 ⋄174292 h 2345
1
0
1
0
 100 h 117⋄6 h 11⋄495 h 495⋄6 h 6
0
0
0
0