Дан файл f. подсчитать количество символов в каждой строкеи записать в файл g.

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

begin
  WriteLines('g.txt',ReadLines('f.txt').Select(x->x.Length.ToString))
end.