Perfect numbers: Difference between revisions
m
→{{header|ALGOL 60}}: minor variable rename
m (→{{header|ALGOL 60}}: minor variable rename) |
|||
Line 521:
begin
comment - return
integer procedure mod(
value
begin
mod :=
end;
Line 559:
outstring(1,"\n");
outinteger(1,found);
outstring(1,"
end
Line 567:
Searching up to 10000 for perfect numbers
6 28 496 8128
4
</pre>
| |||