Помогите плз, заранее спасибо))) (в паскаль)

Question

Помогите плз, заранее спасибо)))
(в паскаль)

---

Answer 1

Вот кодик и там же ответы примерные 

---

---

Comments

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