Сжать одномерный массив состоящий из n вещественных элементов, удалив из него все элементы, модуль которых находится в интервале[a,b]. Освободившиеся в конце массива элементы заполнить нулями. На Delphi. Помогите пожалуйста.
Answers & Comments
srzontmp
Решение в прикрепленном файле. Ввод - вывод программы: число элементов массива: 5 массив: 89.67 18.56 87.21 77.68 51.00 диапазон: 10 80 новый массив: 89.67 87.21 0.00 0.00 0.00
Answers & Comments
Ввод - вывод программы:
число элементов массива: 5
массив:
89.67 18.56 87.21 77.68 51.00
диапазон: 10 80
новый массив:
89.67 87.21 0.00 0.00 0.00