RosettaCodeData/Task/Longest-string-challenge/MATLAB/longest-string-challenge.m
2023-07-01 13:44:08 -04:00

15 lines
295 B
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;