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