Написать программу,составить алгоритм вычисления функции Z=sin y-y(1/2)+2.73,где у меняется от 1 до 15. Вывести все значения y и z

for i:= 15 downto 1 do   begin      z:= sin(i) - i*(1/2)+2.73;      write(i,z);      z:=0;    end;