Вычислит значение суммы ряда s=sin x +(sin 3x)/3++(sin(2n1)x/2n-1,при x=пи/6 для 15-ти элементов последовательности.полученные сумму сравнить с функцией у=пи/4 паскаль

Var
    i: integer;
    x, s: real;

begin
    readln(x);
    s := 0;
    for i := 1 to 15 do
        s := s + sin((2 * i - 1) * x) / (2 * i - 1);
    writeln(pi / 4, ' ', s);
end.