Primality by trial division: Difference between revisions

Content deleted Content added
Ssmitch45 (talk | contribs)
No edit summary
Ssmitch45 (talk | contribs)
Line 385: Line 385:
INTEGER P, Q;
INTEGER P, Q;
BEGIN
BEGIN
MOD := P - Q * (P /Q);
MOD := P - Q * (P / Q);
END;
END;