Cuban primes: Difference between revisions

No edit summary
Line 931:
=={{header|Maple}}==
{{language|Maple}}
<lang maple>CubanPrimes := proc(n) local i, cp;
CubanPrimes := proc(n) local i, cp;
cp := Array([]);
for i by 2 while numelems(cp) < n do
Line 940 ⟶ 939:
end do;
return cp;
end proc;</lang>
</lang>
 
=={{header|Pascal}}==
Anonymous user