мне нужна программа которая находит среднее арифметическое чисел вводимых в консоль.

Тут лучше ReadSeqInteger - зачем Вам создавать массив?

А ReadSeqInteger будет просто на выход передавать очередное введенное значение

на python

"Здрасьти, я проснулся" ?

Поздно! После того, как ответ дан, Ваши комментарии уже никого не интересуют.

Разве так трудно переписать это на питон?

Нет, не трудно. Но такой вопрос может задать только человек, которому на чужой труд НАПЛЕВАТЬ. Т.е. он "не подумал" упомянуть язык, мало ли, все равно бесплатно, перепишут, чужой труд ведь бесплатен.

(то писал автор решения человеку, которому нужно решение на питоне)

Тогда извините за "наезд". Достали реально уже эти "забыл, что надо на ... "

varn, t: integer;a, s: realbeginreadln(n);for t := 1 to n dobeginreadln(a);s := s + a;end;writeln(s / n);end.

//PascalABC.NET//Версия 3.3, сборка 1627beginwrite(ReadSeqInteger(ReadInteger).Average);end.