Пожалуйста, сделайте программу, сам не могу так как в этом не разбираюсь.

Question

Пожалуйста, сделайте программу, сам не могу так как в этом не разбираюсь.

---

Comments

Язык?

---

паскаль

Answer 1

Ответ:

PascalABC.NET 3.6.2

begin

 var l := ReadInteger();

 var A := ReadSeqInteger(l);

 a.Where(p -> (p mod 10 = 3) or (p mod 10 = 7)).Average.Println;

end.

Объяснение: