Спояснениями, ! сколько положительных элементов будет в массиве с[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 элемент будут положительными