Recherche exercices en Pascal
Résolu
achref
-
Hébert -
Hébert -
bonjour
svp,je veux des exercices pascal à niveau plus élever puisque je suis un éleve en bac informatique.Merci
svp,je veux des exercices pascal à niveau plus élever puisque je suis un éleve en bac informatique.Merci
A voir également:
- Recherche exercices en Pascal
- Turbo pascal - Télécharger - Édition & Programmation
- My pascal - Télécharger - Édition & Programmation
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Dev pascal - Télécharger - Édition & Programmation
- Rechercher ou entrer l'adresse mm - recherche google - Guide
10 réponses
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....
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....
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
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.
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.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
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.
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.
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.
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.
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 !!
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 !!