Farey sequence: Difference between revisions
m
→{{header|Maple}}
m (→{{header|Phix}}: added syntax colouring, marked p2js compatible) |
|||
Line 1,816:
<lang Maple>#Displays terms in Farey_sequence of order n
farey_sequence := proc(n)
end proc
#Returns the length of a Farey sequence
farey_len := proc(n)
end proc;
for i to 11 do
end do;
printf("\n");
for j from 100 to 1000 by 100 do
end do;</lang>
{{Out|Output}}
<pre>
0/1, 1/1
| |||