Nombre premier pascal

nadal1991 Messages postés 280 Statut Membre -  
 mido -
Bonjour,
a tous j'ai un petit probleme dans un algorithme que je dois faire , alors je dois trouver un algorithme qui :quand on entre une valeur 'n' il nous donne les n premier "nombre premier " , ,, je connais deja tres bien l'algo pour determiner si un nombre est premier ou pas mais je sais pas comment faire pour celui ci

merci de m'aider
Configuration: Windows XP
Opera 9.51

2 réponses

  1. nadal1991 Messages postés 280 Statut Membre 11
     
    une reponse silvouplait
    2
  2. nadal1991 Messages postés 280 Statut Membre 11
     
    une aide silvouplait
    1
    1. mido
       
      program premier;
      uses wincrt;
      var
      n,r,i:integer;
      begin
      write('Donnez un entier naturel : ');
      read(n);
      r:=0;
      for i:=1 to n do
      if n mod i = 0
      then r:=r+1;
      if r=2
      then write('le nombre est premier')
      else
      write('le nombre n'est pas premier');
      end.
      0