Page 816 - IT2
P. 816

Tableau t[50][50] :entier
                Debut
                 écrire("entrer le nombre de lignes >=2:")
                 lire(n)
                 redim t(n,n)
               pour i <- 0 à n-1
                   pour j <- 0 à n-1
                       si(i=j) alors t[i][j] <- 1
                       sinon     t[i][j] <- 0
                       finsi
                   finpour
                 finpour
               pour i <- 0 à n-1
                   pour j <- 0 à n-1
                    écrire(t[i][j], "\t");
                    finpour
                 écrire("\n");
                finpour
               fin
               Exercice3 :
               Algorithme somme_factoriel
               var i,n,s:entire
               Debut
               écrire("entrer n:")
               lire(n)
               s <- 0
               pour i <- 1 à n-1
                 s <- s+fact(i)
               finpour
               écrire("la somme ",s);
               fin



               PARTIE 2 : PRATIQUE

               Dossier1 :


               Exercice1 :
               Le contenu du fichier « fichier2.txt »:













                       Filière                Epreuve                Session
                                                                                             3/7
                    DI(CDS de 1 à 2)    Synthèse V2(Correction)    Juillet 2016
                                        www.itlearning-settat.com

                                  Email: admission@itlearning-settat.com

                                                  Tél.:0661077812
   811   812   813   814   815   816   817   818   819   820   821