Общение > Софт & Hard

Массивы в Delphi 7 (нужна помощь)

(1/1)

Borya71:
Вообщем такая задача:
Составить процедуру для определения минимального по модулю элемента одномерного массива длиной 20 элементов. Если минимальные по модулю элементы двух заданных массивов Х и Т отличаются менее чем на 5, просуммировать все положительные элементы обоих массивов и вывести полученные суммы. В противном случае вывести найденные минимальные элементы.

Поиск минимального элемента:
findMin(X, T);
Label3.Caption:='Минимальный элемент: ' + IntToStr(T);

Вопрос в создании массива, через какие компоненты удобнее всего, чтобы сразу было 20 элементов, в принципе можно через SpinEdit (но там придётся прописать какое кол-во элементов мы будем выставлять), а в задании конкретно 20. И пункт "Если минимальные по модулю элементы двух заданных массивов Х и Т отличаются менее чем на 5, просуммировать все положительные элементы обоих массивов и вывести полученные суммы" тут вообще для меня тёмный лес...

Hawker:
Друг,тут же тема есть ;)
Опиши проблему сюда :)

Навигация

[0] Главная страница сообщений