Exercice 12 : Affichage de nombre premier

Cette méthode n'est pas la plus efficace, loin de la. Plus tard, je metterai une version plus intéressante, et plus optimisée.

debut du programme Nombres Premiers.
  pour n allant de 2 à max, max étant fixé à 1000
    i <-- 1
    repeter
      i <-- i + 1
    jusqu'a n est divisible par i
    si n = i
    alors
      ecrire(n,' est premier')
    finsi
  finpour
fin

program exo11;
const max = 1000;
var
   n,i,total:integer;
begin
  total := 1;
  n := 0;
  repeat
    n := n + 1;
    i := 1;
    repeat
      i := i + 1;
    until (n mod i) = 0;
    if n = i
    then begin
        total := total + 1;
        writeln(total,') ',n,' est un nombre premier');
    end;
  until (total = max);
end.

#include <stdio.h>
#define max 1000

void main ()
{
  int n,i,total;

  total = 1;
  n = 0;
  do {
    n += 1;
    i = 1;
    do
      i += 1;
    while ((n%i)!=0);
    if (n == i) {
      total += 1;
      printf("%d )  %d est un nombre premier\n",total,n);
    }
  }
  while (total != max);
}