Application
Fermé
marwa z
-
10 juil. 2010 à 23:46
trafiquois Messages postés 34 Date d'inscription samedi 1 mai 2010 Statut Membre Dernière intervention 30 mai 2013 - 12 juil. 2010 à 02:48
trafiquois Messages postés 34 Date d'inscription samedi 1 mai 2010 Statut Membre Dernière intervention 30 mai 2013 - 12 juil. 2010 à 02:48
A voir également:
- Application
- Application mobile - Guide
- Application gps sans internet - Guide
- Desinstaller application windows - Guide
- Application miroir - Guide
- Nommez une application d'appel vidéo ou de visioconférence - Guide
2 réponses
Utilisateur anonyme
Modifié par homer S le 10/07/2010 à 23:50
Modifié par homer S le 10/07/2010 à 23:50
comment écrire un message sur CCM ?
pourquoi être poli ?
si je comprend bien, faut faire le boulot a ta place et t'apprendre la politesse ?
pourquoi être poli ?
si je comprend bien, faut faire le boulot a ta place et t'apprendre la politesse ?
trafiquois
Messages postés
34
Date d'inscription
samedi 1 mai 2010
Statut
Membre
Dernière intervention
30 mai 2013
5
12 juil. 2010 à 02:48
12 juil. 2010 à 02:48
Avant de commencer, c'est pas grave pour la politesse ...
bon, pour l'algo voilà le code:
Algoritme: PGE
% Il est mieux de commencer par une fonction permettant de retourner le%
%plus grand élément du tableau de type Entier%
Fonction PlusGrdElement (ParamArray T() : Entier) : Entier
Variable i, max : Entier
Début
max=T(0)
%Boucle pour la comparaison%
Pour i=1 A T.Longueur - 1
Si T(i)>T(i-1) Alors
max=T(i)
FinSi
FinPour
Retourner max
Fin
FinFonction
%Procédure de dialogue avec l'utilisateur%
Variable j, m, EMax: Entier
Tableau Tab(): Entier
Début
Ecrire "Donner la taille du Tab():"
Lire m
Redim T(m)
Pour j=0 A m-1
Ecrire "Donner T(" , j , ")"
Lire T(j)
FinPour
%On fait un appel à la fonction PlusGrdElement%
EMax = PlusGrdElement(Tab)
Ecrire "Le plus grand élément c'est: ", EMax
Fin
Pour le code pascal, c'est à vous de jouer ;) bon courage!
bon, pour l'algo voilà le code:
Algoritme: PGE
% Il est mieux de commencer par une fonction permettant de retourner le%
%plus grand élément du tableau de type Entier%
Fonction PlusGrdElement (ParamArray T() : Entier) : Entier
Variable i, max : Entier
Début
max=T(0)
%Boucle pour la comparaison%
Pour i=1 A T.Longueur - 1
Si T(i)>T(i-1) Alors
max=T(i)
FinSi
FinPour
Retourner max
Fin
FinFonction
%Procédure de dialogue avec l'utilisateur%
Variable j, m, EMax: Entier
Tableau Tab(): Entier
Début
Ecrire "Donner la taille du Tab():"
Lire m
Redim T(m)
Pour j=0 A m-1
Ecrire "Donner T(" , j , ")"
Lire T(j)
FinPour
%On fait un appel à la fonction PlusGrdElement%
EMax = PlusGrdElement(Tab)
Ecrire "Le plus grand élément c'est: ", EMax
Fin
Pour le code pascal, c'est à vous de jouer ;) bon courage!
