Водномерном массиве, состоящем из n вещественных элементов, вычислить: 1. номер минимального по модулю элемента массива. 2. сумму модулей элементов массива, расположенных после первого отрицательного элемента. 3. сжать массив, удалив из него элементы, величина которых находится в интервале [a, b]. освободившиеся в конце массива элементы заполнить нулями.

203

335

Посмотреть ответы 2

Ответы на вопрос:

nikakim03

Информатика

4,6(33 оценок)

// pascalabc.net 3.3, сборка 1625 от 17.01.2018 // внимание! если программа не работает, обновите версию! begin var n: =readinteger('n='); var v: =seqrandom(n,-99,99).select(t-> 0.1*t).toarray; v.println; var imin: =v.select(t-> abs(.indexmin; writeln('номер минимального по модулю элемента- ',imin+1); var fn: =v.select((x,i)-> (x,(t-> t[0]< 0).first[1]; writeln('сумма модулей элементов после первого отрицательного равна ', v[fn+1: ].sum(t-> abs(; var (a,b): =readreal2('введите границы интервала значений для удаления: '); v: =v.where(t-> not t.between(a,; var m: =n-v.length; if n> 0 then begin setlength(v,n); for var i: =v.length to n-1 do v[i]: =0.0 end; v.println end. пример n= 15 -9.4 3.9 6.2 -2.5 -5.2 9 4.9 -9.5 4.4 2.4 -8.8 3.1 -7.7 5.6 8.9 номер минимального по модулю элемента- 10 сумма модулей элементов после первого отрицательного равна 82.1 введите границы интервала значений для удаления: -20 2 3.9 6.2 9 4.9 4.4 2.4 3.1 5.6 8.9 0 0 0 0 0 0