List comprehensions: Difference between revisions
m
→{{header|Mathematica}}
m (→{{header|D}}) |
|||
Line 1,459:
</lang>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang mathematica>Select[Tuples[Range[100], 3], #1[[1]]^2 + #1[[2]]^2 == #1[[3]]^2 &]</lang>
| |||