tau = 0.16666666666666666
T = 1
N = 10 (slider from 1 to max, step 1)
max = 10
h = If(x < tau, 1 / 2 - tau, If[tau < x < 1 - tau, -tau, 1 / 2 - tau])
g = Function(h, 0, T)
f(x) = g(x - T * floor(x / T))
a0: 1 / T * Integral[f, 0, T]
omega: 2 * 3.1415 / T
b = Sequence(2 / T * Integral[f(x) * sin(n * omega * x), 0, T], n, 1, max)
a = Sequence(2 / T * Integral[f(x) * cos(n * omega * x), 0, T], n, 1, max)
A = Sum(Sequence[Element[a, n] * cos(n * omega * x), n, 1, N])
B = Sum(Sequence[Element[b, n] * sin(n * omega * x), n, 1, N])
F(x) = a0 + A(x) + B(x)
c = Sequence(sqrt(Element[a, n]^(2) + Element[b, n]^(2)), n, 1, 10)
Par: 1 / T * Integral[f(x)^(2), 0, T]