Discussion :

[Sid ali]

Je recherche des examples d'algorithmes d'etude
Du genres :
Moyenne avec coef / Diviseur / Nombre parfait / Nombre premier / Division / Calculatrice / Pair et Impair

Et meme d'autre example du genre programme d'aide d'etudiant

[trattos]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
VAR nb1 : REEL
DEBUT
    SAISIR nb1
    SI nb1 = Nomnre premier
    ALORS
        AFFICHER "nb1 est un nombre premier!"
    SINON
        AFFICHER "nb1 n'est pas un nombre premier!"
    FINSI
FIN

Des exemples comme ça?

[Sid ali]

Addition

Debut
Var : A.B.C : Réel
Ecrire ('Entrez A et B')
Lire (A.B)
C <- A + B
Ecrire ('Le résultat est :'C)
Fin

===================================================

Soustraction

Debut
Var : A.B.C : Réel
Ecrire ('Entrez A et B')
Lire (A.B)
C <- A - B
Ecrire ('Le résultat est :'C)
Fin

===================================================

Multiplication

Debut
Var : A.B.C : Réel
Ecrire ('Entrez A et B')
Lire (A.B)
C <- A * B
Ecrire ('Le résultat est :'C)
Fin

===================================================

Division

Debut
Var : A.B.C : Réel
Ecrire ('Entrez A et B')
Lire (A.B)
Tant que B = 0
Faire
Ecrire ('Division par 0 impossible')
Fin Faire
C <- A / B
Ecrire ('Le résultat est :'C)
Fin

[méphistopheles]

partie entière:

variables a,
ecrire ('entrer a)
lire a
écrire ('le resultat est [a/2= partie entière a/2]')
(faire le calcul entre les crochets)


Diviseur
variables a,b,c (où b une liste,c un integer)
ecrire ('entrer a')
lire a

boucle for (variable c) à pas 1 jusqu'a racine de a
si a/c= partie entère(a/c) alors ajouter c à la liste
fin de boucle

écrire ('les diviseurs sont : c')
(c vas afficher une suite de termes.

faire une suite d'affichege si impossible

salut