Primality by trial division: Difference between revisions
m
→{{header|Modula-2}}: beginning
Not a robot (talk | contribs) (Add Modula-2) |
Not a robot (talk | contribs) m (→{{header|Modula-2}}: beginning) |
||
Line 3,113:
=={{header|Modula-2}}==
<syntaxhighlight lang="modula2">
FROM InOut IMPORT WriteCard, WriteLn;
CONST
Max = 100;
VAR
i: CARDINAL;
PROCEDURE prime(n: CARDINAL): BOOLEAN;
VAR
factor: CARDINAL;
|