Find squares n where n+1 is prime: Difference between revisions
Find squares n where n+1 is prime (view source)
Revision as of 04:30, 17 December 2021
, 2 years ago→{{header|Julia}}
Line 105:
isintegersquarebeforeprime(n) = isqrt(n)^2 == n && isprime(n + 1)
foreach(p -> print(lpad(last(p), 5)), filter(isintegersquarebeforeprime, 1:
</lang>{{out}}<pre> 1 4 16 36 100 196 256 400 576 676
=={{header|PARI/GP}}==
| |||