Задан одномерный массив целых чисел. Вычислить сумму значений элементов, значения которых меньше половины значения максимального элемента чисел,но больше половины минимального элемента.
Задан одномерный массив целых чисел. Вычислить сумму значений элементов, значения которых меньше половины значения максимального элемента чисел,но больше половины минимального элемента.
Гость
Ответ(ы) на вопрос:
Гостьbegin
max:=a[1]; min:=a[1];
for i:=1 to n do begin
if (a[i]>max) then max:=a[i];
if (a[i]min/2)) then writeln(a[i], " ");
end.
Не нашли ответ?
Похожие вопросы