Срочно 20 БАЛЛОВ! Напишите программу среде языка PascalABC.NET использовав имеющиеся...

Question

Срочно 20 БАЛЛОВ! Напишите программу среде языка PascalABC.NET использовав имеющиеся данные !

---

---

Comments

begin SeqGen(ReadInteger('n ='), 2.0, 1.0, (x1, x2)-> 0.8 * x2 + 0.15 * x1) .Println.Sum.Println;end.

Answer 1

begin

 Print('S =', SeqGen(ReadInteger('n ='), 2.0, 1.0, (x1, x2)-> 0.8 * x2 + 0.15 * x1).Sum)

end.

---

---

Comments

Большое спасибо