Найти сумму отрицательных слагаемых суммы sin2+sin3+… +sinM. Паскаль

Опять похожая задача у тебя) Держи решение: const m=?; {Вместо "? " нужно вписать любое число}Var s: real; Begin s: =0; for i: =2 to m do if sin (i) <0 then s: =s+sin (i); writeln (s); End.