Ребята, помогите с информатикой пожалуйста! Срочноооо. Решить в Паскаль. Даю 55 баллов.

Question

Ребята, помогите с информатикой пожалуйста! Срочноооо. Решить в Паскаль. Даю 55 баллов.

---

Answer 1

// PascalABC.NET

begin

 var n := ReadInteger('N =');

 SeqGen(n, i -> 1 / (i * i), 1).Sum.Println;

 var x := ReadReal('X =');

 SeqGen(n, i -> x / (2 * i), 1).Sum.Println;

 SeqGen(n, i -> (2 * i - 1) / i, 1).Product.Print

end.

---

Comments

Вы можете мне пожалуйста помочь решить на питоне задачи?

---

Могу, скорее всего, но не стану. Не люблю я этот язык ...

---

Но мне очень нужно. Я вас очень прошу

---

Тут достаточно змееводов и без меня)))

---

Посоветуйте кто может помочь. Пока никто не помог

---

Ну смотрите, у кого там высокий рейтинг, прыгайте в их профили и смотрите, питон они решают или нет

---

Никто не отвечает, а мне надо срочно. 1 и 3.