Сжать одномерный массив состоящий из 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 
Не нашли ответ?
Ответить на вопрос
Похожие вопросы