function res=sommeA(p,n)

%	sommeA : calcul de somme (version A).
%
% *********************************************************
%
%	res=sommeA(p,n)
%	
%  calcul de la somme \sum_{i=1}^n  1/(i^p) en utilisant une boucle 
%   et en sommant dans l'ordre des indices croissants.
%
%	variables d'entrées :
%   * p,n : deux entiers 
%
%	variables de sortie
%   * res: résultats de la somme
% 
% 
% ************ Fonctions auxiliaires utilisées ************
%
%       aucune
%
% *********************************************************



% Contrôles d'entrée
% nombre d'arguments
if nargin~=2
   error('nombre d''arguments de la fonction incorrect');
end
% autres tests éventuels 
   

% Corps d'algorithme
s=1;
for i=2:n
    s=s+1/(i^p);
end
res=s;
