hg S’enregistrer Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie

Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie  forum informatique Tunisie Index du Forum

hg Bac Tunisie Algorithmique et programmation TIC réseaux php javascript sql access activités programmation c
hg
FAQ FAQ Rechercher Rechercher Membres Membres Groupes Groupes Profil Profil Se connecter pour vérifier ses messages privés Messages Privés Connexion Connexion


 Forum de l'excellence et l'excellence en innovation 
Pour participer à notre Forum, vous devez
 
inscrire sur notre forum a partir d'ici
 
  NB :
Les membres ''zéro messages'' seront supprimés automatiquement après un nombre de jours donné !!!!
             
   
 
  
forum d'aide informatique : internet, réseau, programmation informatique ...
Pseudo-hasard
 
 
Poster un nouveau sujet   Répondre au sujet    Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie Index du Forum -> Algorithmique & programmation -> (¯`·._.·[Devoirs et séries']·._.·´¯)
hg Sujet précédent :: Sujet suivant   hd
Auteur Message
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Lun 26 Juil - 11:38 (2010)    Sujet du message: Pseudo-hasard Répondre en citant

PublicitéSupprimer les publicités ?
Dans ce programme exemple22 (programme Chance typique des calculettes), on a génération d'un nombre aléatoire compris entre 0 et une borne max définie comme constante dans la partie délarative du programme, ici, on prendra la valeur 100. Le programme saisie un nombre entré par l'utilisateur, effectue un test et donne la valeur true à une variable boolean nommée test si le nombre du joueur est correct, sinon, affiche les messages d'erreurs correspondants. Le programme fonctionne à l'aide d'une boucle conditionnelle Repeat...Until.

Syntaxe : Randomize ;
On peut générer un nombre réel aléatoire compris entre 0 et 1 grace à la fonction Random.
Syntaxe :   
X := Random ;
On peut générer un nombre entier aléatoire compris entre 0 et Y-1 grace à la fonction Random(Y).
Syntaxe :   
X := Random(Y) ;

Program exemple22;
Uses crt ;
Const max = 100 ;
Var test : Boolean ;
    x, y : Integer ;
BEGIN
ClrScr ;
Randomize ;
y := Random(max) ;
Repeat
Write('Entrez un nombre : ') ;
ReadLn(x) ;
test := (x=y) ;
If test Then WriteLn('Ok, en plein dans le mille.')
        Else If x>y Then WriteLn('Trop grand.')
                    Else writeln('Trop petit.') ;
Until test ;
ReadLn ;
END.


 
Revenir en haut
r.nsiri
recent membre
recent membre

Hors ligne

Inscrit le: 09 Jan 2009
Messages: 262
Masculin
Point(s): 304
Moyenne de points: 0

Posté le: Lun 2 Aoû - 09:23 (2010)    Sujet du message: Pseudo-hasard Répondre en citant

merci bien
_________________
Cordialement


 
Revenir en haut
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Dim 26 Déc - 20:58 (2010)    Sujet du message: Pseudo-hasard Répondre en citant

Okay

 
Revenir en haut
Contenu Sponsorisé






Posté le: Aujourd’hui à 17:33 (2016)    Sujet du message: Pseudo-hasard

 
Revenir en haut
Montrer les messages depuis:   
bg bd
Poster un nouveau sujet   Répondre au sujet    Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie Index du Forum -> Algorithmique & programmation -> (¯`·._.·[Devoirs et séries']·._.·´¯) Toutes les heures sont au format GMT + 1 Heure
 
Page 1 sur 1

 
Sauter vers:  
Index | créer forum gratuit | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation