Recherche exercices en Pascal

Résolu
bonjour
svp,je veux des exercices pascal à niveau plus élever puisque je suis un éleve en bac informatique.Merci

10 réponses

  1. 2
    1. Bonjour, j'ai un probleme tres difficile , il m'enerve , et en plus aucun de mes colegues possede une solution
      svp aidez moi pour resoudre le probleme suivant:

      On veut ecrire un programme qui permet de remplir un tablea T par n enties positifs triés dans l'ordre crissant,
      puis d'afficher les entiers manquant entre le premier et le dernier element de ce tablea.

      example: si n=7 et si T est le tableau suivant:
      5 6 8 9 10 12 15
      le programme affichera: les entiers manquants sont 7,11,13,14

      et MERCI d'avance....
      1
      1. il est clair qu'il est un ex trés dif et qu'on doit y penser bcp de temps.mais la 1ere phrase d'ennoncer n'est pas clair est ce que je doit faire dans mon algo une condition pour cela ou non.merci
        1
        1. bonjour,je fait cet exercice et j'obtenir la solution et voilà:
          program tableau;
          uses wincrt;
          type tab=array[1..100]of integer;
          var t:tab ;n,i,j:integer;
          procedure s(vart:tab;var n:integer);
          begin
          writeln('donner la taille du tab');
          readln(n);
          writeln('remplir votre tableau');
          for i:=1 to n do
          begin
          readln(t[i]);
          end;
          end;
          procedure tad(t:tab;n:integer);
          begin
          for i:=2 to n do
          begin
          if t[i]-t[i-1]>1
          then
          begin
          j:= t[i-1];
          repeat
          j:=j+1;
          write( '|',j,'|');
          until(j=t[i]-1);

          end;
          end;
          end;
          begin
          s(t,n);
          tad(t,n);
          end.
          0
          1. bonjour,
            voila un autre probleme:
            on veut ecrire un algorithme qui permet de transposer une matrice carré.
            l'operation de transposition consiste à inverser les lignes et les colonnes
            en effectuant une symétrie par rapport à la diagonale principale de la matrice.

            exemple:
            1 2 3
            4 5 6
            7 8 9
            devient
            1 4 7
            2 5 8
            3 6 9

            merci.
            0
            1. Voici l'algorithme:

              Algorithme ex;

              Type:n=1..100
              Variables A,B:tableau[1..100,1..100] de réels;
              i,j:entier;
              dim:n;

              Début
              ecrire('donnez la dimension du tableau');
              lire(dim);
              Pour i de 1 à dim faire
              Début
              Pour j de 1 à dim faire
              Début
              lire(T[i]);
              B <= A;
              A[i,j] <= B[j,i];
              ecrire(A[i,j]);
              fin;
              fin;
              fin.
              0
              1. salut ..
                j'ai un petit problem .. je veux ecrire un programme qui transforme une matrice en sa transposée par rapport à la deuxième diagonale .. pouvez-vous m'aider !!
                0