Well thanks a lot for helping me

> restart; with(plots); with(LinearAlgebra); with(Statistics);
> m0 := proc (t) options operator, arrow; 1-exp((-1)*t*.5) end proc;
> m := proc (t) options operator, arrow; (1/(1+exp(-t+5))-0.67e-2)*1.0067 end proc;
> n[max] := 10; delt := .2; n := n[max]/delt;
> T := Vector(50);
> b := vector(50); evalm(b);
> for i from 2 to n do T[i] := T[i-1]+delt end do;
> fun := proc (t) options operator, arrow; add(b[i]*m0(t-T[i]), i = 1 .. n) end proc;
> fun(t);
> fu := vector(50);
> for x to 49 do fu[x] := fun(x*delt) = m(x*delt) end do;
> s := solve({fu[1 .. 5]}, {b[1 .. 5]});