Помогитеее, пожалуйста. Найти в одномерном массиве элементы, сумма которых максимальна, затем удалите все элементы, предшествующие тому элементу, индекс которых наибольший из двух. (в паскале)

тут условие неправильно как то записано...."if max begin".. вот посмотри, пожалуйста, в 20-ой строчке с начала....м?

По ссылке из комментария посмотри, местный редактор сообщений код портит постоянно