Значения элементов двух массивов A и B размером 1×100 задаются с следующего фрагмента программы: for i:=1 to 100 do
A[i] := 50-i;
for i:=1 to 100 do
B[i] := A[i] +49;
Сколько элементов массива B будут иметь отрицательные значения?
1) 10
2) 1
3) 100
4) 50​

2) 1

Объяснение:

for i := 1 to 100 do  A[i] := 50 - i;

A[1] = 50 - 1 = 49

A[2] = 50 - 2 = 48

A[49] = 50 - 49 = 1

A[50] = 50 - 50 = 0

A[51] = 50 - 51 = -1

A[99] = 50 - 99 = -49

A[100] = 50 - 100 = -50

В массиве А будет 50 элементов с отрицательными значениями (100 - 51 + 1 = 50)

for i := 1 to 100 do  B[i] := A[i] + 49;

В[1] = 49 + 49 = 98

В[2] = 48 + 49 = 97

В[49] = 1 + 49 = 50

В[50] = 0 + 49 = 49

В[51] = -1 + 49 = 48

В[99] = -49 + 49 = 0

В[100] = -50 + 49 = -1

В массиве В будет 1 элемент с отрицательным значением