===== PascalABC.NET =====
begin
var n := ReadInteger;
ReadSeqInteger(n)
.Where(p -> p.InRange(10,99))
.DefaultIfEmpty
.Average
.Println
end.
