[=PascalABC]
[0]
uses PT4;

(*
  При решении задач группы LinqObj рекомендуется 
  использовать следующие вспомогательные методы:

  ReadLines - чтение данных из текстового файла 
    в строковую последовательность; 
  WriteLines - запись данных из строковой 
    последовательности в текстовый файл.
*)
[1-999]

begin
  Task('%{task}');

end.