Описать функцию, которая возвращает максимальную длину строки в массиве строк. (Паскаль)

Question

Описать функцию, которая возвращает максимальную длину строки в массиве строк. (Паскаль)

Answer 1

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

function MaxLen(a:array of string):=a.Select(t->t.Length).Max;

begin
  var s:=Arr('первая','вторая','третья','четвертая','пятая');
  s.Println;
  Writeln('Макс. длина: ',MaxLen(s))
end.

Пример
первая вторая третья четвертая пятая
Макс. длина: 9

Comments

А если минимальную длину строки, то как можно это сделать?