Какая будет программа (все данные на фотке)

алг нач цел таб а[1:10] цел i,y=0,z=0 нц для i от 1 до 10   ввод а[i]   если а[i]>0     то z:=z+а[i]     иначе y:=y+а[i]   все   кц вывод "y=",y,"  z=",z кон