Pell's equation: Difference between revisions
Content added Content deleted
Langurmonkey (talk | contribs) |
Langurmonkey (talk | contribs) |
||
| Line 1,070: | Line 1,070: | ||
=={{header|langur}}== |
=={{header|langur}}== |
||
{{trans|D}} |
{{trans|D}} |
||
<syntaxhighlight lang="langur">val .fun = fn |
<syntaxhighlight lang="langur">val .fun = fn .a, .b, .c: [.b, .b * .c + .a] |
||
val .solvePell = fn(.n) { |
val .solvePell = fn(.n) { |
||
| Line 1,099: | Line 1,099: | ||
for .n in [61, 109, 181, 277, 8941] { |
for .n in [61, 109, 181, 277, 8941] { |
||
val .x, .y = .solvePell(.n) |
val .x, .y = .solvePell(.n) |
||
writeln |
writeln "x² - {{.n}}y² = 1 for:\n\tx = {{.x:fn C}}\n\ty = {{.y:fn C}}\n" |
||
} |
} |
||
</syntaxhighlight> |
</syntaxhighlight> |
||