function Suma_de_serie_1(j)
% Se simula suma 1/k^2 con infinitos sumandos
 suma=0; i=j;
 while i~=0
    suma=suma+1/i/i;
    i=i-1;
 end 
 fprintf(' Suma = %21.17f\n',suma);
end
