Значения элементов двух массивов 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 элемент с отрицательным значением