nombre premier version 1

Aller en bas

nombre premier version 1

Message  Admin le Ven 11 Mar - 13:00

ÉNONCÉ
Ecrire une analyse, un algorithme et une traduction pascal d’un programme intitulé PREMIER permettant de saisir un nombre N est d’afficher s’il est premier ou non.
En déduire l’algorithme permettant d’afficher tous les nombres premiers situés entre 1 et 100 (un entier est premier s’il est divisible uniquement par 1 et par lui-même )
PASCAL
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.




Admin
Admin

Messages : 137
Date d'inscription : 29/12/2010

Voir le profil de l'utilisateur http://aidescolaire.yoo7.com

Revenir en haut Aller en bas

l'idée de cette solution

Message  Admin le Ven 11 Mar - 13:01

{l’idée ici est simple, si on trouve uniquement deux diviseurs pour cet entier, il est premier, mais si ce nombre est>2, donc il y a autres diviseurs que 1 et l’entier lui-même}

Admin
Admin

Messages : 137
Date d'inscription : 29/12/2010

Voir le profil de l'utilisateur http://aidescolaire.yoo7.com

Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum