[=PascalABC]
[0]
uses PT4;

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

  ReadSeqInteger - ввод числовой последовательности;
  ReadSeqString - ввод строковой последовательности;
  WriteAll (метод расширения) - вывод размера и всех
    элементов последовательности;
  Show (метод расширения) - отладочная печать 
    последовательности.

  Метод Show возвращает исходную последовательность,
    поэтому его можно использовать в середине цепочек запросов.
*)
[1-999]

begin
  Task('%{task}');

end.