Idoneal numbers: Difference between revisions
Content added Content deleted
(→{{header|PL/0}}: Tweak) |
(→{{header|PL/0}}: unnecessary brackets) |
||
Line 702: | Line 702: | ||
ab := a * b; |
ab := a * b; |
||
aplusb := a + b; |
aplusb := a + b; |
||
c := ( n - ab ) / |
c := ( n - ab ) / aplusb; |
||
sum := ab + ( c * aplusb ); |
sum := ab + ( c * aplusb ); |
||
idoneal := 0; |
idoneal := 0; |