В одномерном массиве, состоящем из n вещественных элементов:
1. Найти количество элементов массива, меньших величины С, введенной с клавиатуры.
2. Найти сумму целых частей элементов массива, расположенных после последнего отрицательного элемента.
3. Преобразовать массив таким образом, чтобы сначала располагались все элементы, отличающиеся от максимального не более чем на 20%, а потом — все остальные.
все в одной програме

То есть русские буквы не показываются?

да

обнови страничку - я добавил рпограмму в старой кодировке

хорошо

о все отлично, спасибо

Программа написана на PascalABC.NET но должна работать во всех Паскалях.Скриншот результата работы и сама программа - в приложениях.Первый листинг в кодировке UTFВторой листинг в кодировке ANSI