Массивы по информатике. вопрос. в массиве d(n) записать вместо элементов с четными индексами единицу и определить количество отрицательных элементов массива d, который меньше c. нужно,
Чтобы число получилось максимальным, нужно поменять самое большое вычитаемое число и самое маленькое прибавляемое. То есть 2015 и 2.
Сначала легче посчитать исходное значение выражение.
Если разбить выражение на пары (2016-2015) + (2014-2013) ... То можно заметить, что значение каждой скобки равно 1. Таких пар будет 2016 : 2 = 1008 1008*1 = 1008
В двух парах, а именно (2016-2015) и (2-1) произойдут изменения. Уберём их из общего выражения на время. Без этих 4-х чисел значение выражения равно 1006.
2016−2015+2014−2013+…+2−1 = 1006 + (2016 - 2015) + (2 - 1) Теперь поменяем местами 2015 и 2, найдём значение выражения:
// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 begin var n:=ReadInteger('n='); var a:=MatrixRandom(n,n,10,99); var s:=0; var k:=0; for var i:=0 to n-1 do begin for var j:=0 to n-1 do Print(a[i,j]); Writeln; if a[i,i].IsEven then begin s+=a[i,i]; Inc(k) end; end; if k>0 then Writeln('S=',s/k:0:2) else Writeln('На главной диагонали нет четных элементов') end.
N=int(input("введите кол-во эл-ов из которых будет состоять массив: "))
D=[]
C=int(input("введите контрольное число С: "))
k=0
print("заполните массив\n")
for i in range(N):
D.append(int(input()))
for i in range(0,N):
if i%2==0:
D[i]=1
for i in range(0,N):
if (D[i]<0) and (D[i]<C):
k=k+1
print(D,"- массив после изменений")
print(k,"-кол-во отрицательных эл-ов массива меньших числа С")