7 lines
182 B
Text
7 lines
182 B
Text
program trial_division;
|
|
print({n : n in {1..100} | prime n});
|
|
|
|
op prime(n);
|
|
return n>=2 and not exists d in {2..floor sqrt n} | n mod d = 0;
|
|
end op;
|
|
end program;
|