Longest string challenge: Difference between revisions
Content deleted Content added
Added Wren |
|||
Line 2,268:
{{Out}}
<pre>
ccc
ddd
ggg
</pre>
=={{header|Wren}}==
{{trans|D}}
<lang ecmascript>import "io" for Stdin
// Return a.length - b.length if positive, 0 otherwise.
var longer = Fn.new { |a, b|
while (!a.isEmpty && !b.isEmpty) {
a = a.skip(1).join()
b = b.skip(1).join()
}
return a.count
}
var longest = ""
var lines = ""
var line
while ((line = Stdin.readLine()) != "") {
if (longer.call(line, longest) != 0) {
lines = longest = line
} else if (longer.call(longest, line) == 0) {
lines = "%(lines)\n%(line)"
}
}
System.print(lines)</lang>
{{out}}
<pre>
ccc
| |||