Largest prime factor: Difference between revisions

Content added Content deleted
(Added Algol 68)
Line 30: Line 30:
k +:= 2
k +:= 2
OD;
OD;
IF v = 1 THEN max factor ELSE n FI
IF v > 1 THEN v ELSE max factor FI
FI # max prime factor # ;
FI # max prime factor # ;