Abundant, deficient and perfect number classifications: Difference between revisions
Abundant, deficient and perfect number classifications (view source)
Revision as of 16:37, 20 September 2016
, 7 years ago→{{header|FreeBASIC}}
Line 786:
Function SumProperDivisors(number As Integer) As Integer
If
Dim sum As Integer = 0
For i As Integer = 1 To
If
Next
Return sum
|