Anonymous user
Longest string challenge: Difference between revisions
→{{header|MATLAB}} / {{header|Octave}}: Display Longest string
(→{{header|MATLAB}} / {{header|Octave}}: Display Longest string) |
|||
Line 498:
ddd
ggg</lang>
=={{header|MATLAB}} / {{header|Octave}}==
<lang MATLAB>function longestString(file);
fid = fopen(file);
maxlen = 0; L = {};
while ~feof(fid)
line = fgetl(fid);
if (length(line)>maxlen)
maxlen = length(line);
L = {line};
elseif (length(line)==maxlen)
L{end+1} = line;
end;
end;
fclose(fid);
disp(L);
end;
</lang>
Output:
<pre> L = {
[1,1] = ccc
[1,2] = ddd
[1,3] = ggg
} </pre>
=={{header|OCaml}}==
| |||