Решите в паскале. В одномерном массиве, состоящем из n вещественных элементов, вычислить:
1. Номер максимального по модулю элемента массива.
2. Сумму модулей элементов массива, расположенных после первого положительного элемента.
3. Сжать массив, удалив из него элементы, величина которых находится в интервале [a, b]. Освободившиеся в конце массива элементы заполнить нулями.
A[i]=sin(i) i[1,50]