Programme qui détermine si un nombre est premier
olfa_prof_info
Messages postés
1
Statut
Membre
-
Reivax962 Messages postés 3742 Statut Membre -
Reivax962 Messages postés 3742 Statut Membre -
Bonjour, la structure adéquate est (répéter ..... jusqu'à)
program premier;
uses wincrt;
var n,r,i:integer;
begin
write('Donnez un entier naturel : ');
read(n);
i:=1 ;
repeat
i:=i+1;
until(n mod i=0) or (i=n-1);
if n mod i=0 then
writeln( ' n est pas premier')
else
writeln(' premier');
end.
2 réponses
-
yg_be Messages postés 23437 Date d'inscription Statut Contributeur Dernière intervention Ambassadeur 1 588
bonjour, as-tu une question?