n=0;S=0;
while S <=2500
    S=0
    n=n+1
    for k=1:n
        S=S+k*(n-k)
    end
    afficher(S);
end
afficher(n)