Задание по информатике, дам 15 баллов за решение. Работа в программе Паскаль.

Question

Задание по информатике, дам 15 баллов за решение. Работа в программе Паскаль.

---

Answer 1

// PascalABC.NET

begin

 ReadSeqInteger(ReadInteger).Where(p -> p mod 8 = 0).Max.Print

end.

---

Comments

Это правильный ответ?

---

Странный вопрос. Запустите и убедитесь

---

Я не могу сделать это в данный момент, хотелось бы быть уверенным что это правильный ответ)

---

Если скрин Вас не убедит, я не знаю, что еще сделать можно)))

---

Вообще-то статус "Главный мозг" предполагает, что неверные ответы не даются)))

---

Спасибо, я увидел скрин

---

Другое дело, возможно, Вы работаете с иной версией паскаля, но в таких случаях надо ее писать в вопросе.