Amicable pairs: Difference between revisions
m
→{{header|ALGOL 60}}: corrected minor typo
(add RPL) |
m (→{{header|ALGOL 60}}: corrected minor typo) |
||
Line 538:
comment - return n mod m;
integer procedure mod(n, m);
value n,
begin
mod := n - m * entier(n / m);
|