С пояснениями, пожалуйста!!!
Сколько положительных элементов будет в массиве С[1..100] после выполнения фрагмента программы?

for i:=1 to 100 do

C[101-i]:=-i-98;

for j:=1 to 100 do

C[j]:=C[j]+150;

после этого цикла все элементы массива будут отрицательными от-198 до -99во втором цикле к каждому элементу полученного массива прибавляется 150, т.е. 0 получится в 49-м элементе (198-150+1=49), значит остальные 51 элемент будут положительными