В такой постановке задача решается до смешного просто
// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(ReadAllText('input.txt').ToIntegers.Skip(1).Average:0:4)
end.
Пример (для приведенных в задании данных)
20.1667