Question

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

Answer 1

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

Первый листинг в кодировке UTF
Второй листинг в кодировке ANSI

a1a903a7638951599330f1eb9f49131d.pas

c8b192db0a0912a5ee994d7e54ce2ebe.pas

Answer 2

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

Answer 3

да

Answer 4

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

Answer 5

хорошо

Answer 6

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