Rosettacode tasks in Perl 6
Search...
Ctrl + K
Programming tasks
F
Find square difference
Copy
say
first { $_² - ($_-1)² > 1000 }, ^Inf;
Output:
Copy
501
Previous
Find prime numbers of the form nnn 2
Next
Find squares n where n 1 is prime
Last updated
2 years ago