Задача в pascal массив A[30] (вещ) найти: Amin-? imin-? Sum(-)(отрицательных) A14<->А30 (поменять местами)
Готово...........................