Дан одномерный целочисленный массив. Найти: сумму элементов массива, расположенных между первым и последним нулевыми элементами. Помогите написать код на Delphi.