Section courante

A propos

Section administrative du site

 Langage  Elément  Tutoriel  Annexe  Aide 
ABAP/4
Ada
Assembleur
Assembly & bytecode
ASP (Active Server Pages)
Basic
C
C++
C# (C Sharp)
Cobol
ColdFusion
Fortran
HTML
Java
JavaScript
LISP
Logo
LotusScript
Oberon
Pascal
Perl
PHP
PL/1
Prolog
Python
Rebol
REXX
Ruby
Rust
SAS
NoSQL
SQL
Swift
X++ (Axapta)
GNAT
SMALLAda
VHDL
Assembleur 370
Assembleur 1802
Assembleur 4004
Assembleur 6502
Assembleur 6800
Assembleur 68000
Assembleur 8080 et 8085
Assembleur 8089
Assembleur 80x86
Assembleur AGC4
Assembleur ARM
Assembleur DPS 8000
Assembleur i860
Assembleur Itanium
Assembleur MIPS
Assembleur PDP-11
Assembleur PowerPC
Assembleur RISC-V
Assembleur SPARC
Assembleur SuperH
Assembleur UNIVAC I
Assembleur VAX
Assembleur Z80
Assembleur Z8000
Assembleur z/Architecture
ASSEMBLER/MONITOR 64
Micol Assembler
GFA Assembler
A86
MASM (Macro Assembler)
TASM (Turbo Assembler)
CIL
Jasmin
LLVM
MSIL
Parrot
P-Code (PCode)
SWEET16
G-Pascal
ASP 1.0
ASP 2.0
ASP 3.0
ASP.NET
ASP.NET Core
ABasiC (Amiga)
Adam SmartBASIC
Altair BASIC
AmigaBASIC (Amiga)
AMOS Basic (Amiga)
Atari Basic (Atari 400, 600 XL, 800, 800XL)
Basic Apple II (Integer BASIC/APPLESOFT)
Basic Commodore 64 (CBM-BASIC)
Basic Commodore 128 (BASIC 7.0)
Basic Commodore VIC-20 (CBM-BASIC 2.0)
Basic Coco 1 (Color Basic)
Basic Coco 2 (Extended Color Basic)
Basic Coco 3 (Extended Color Basic 2.0)
BASICA (PC DOS)
Basic Pro
BBC BASIC
Blitz BASIC (Amiga)
DarkBASIC
Dartmouth BASIC
GFA-Basic (Atari ST/Amiga)
GWBASIC (MS-DOS)
Liberty BASIC
Locomotive BASIC (Amstrad CPC)
MSX-Basic
Omikron Basic (Atari ST)
Oric Extended Basic
Power Basic
Quick Basic/QBasic (MS-DOS)
Sinclair BASIC (ZX80, ZX81, ZX Spectrum)
ST BASIC (Atari ST)
Turbo Basic
Vintage BASIC
VBScript
Visual Basic (VB)
Visual Basic .NET (VB .NET)
Visual Basic pour DOS
Yabasic
BeckerBASIC
SIMONS' BASIC
Basic09 d'OS-9
Disk Extended Color Basic
Basic09 d'OS-9
Disk Extended Color Basic
Access
Excel
Visual Basic pour Windows
Visual Basic .NET pour Windows
C Shell Unix (csh)
C pour Amiga
C pour Atari ST
C pour DOS
C pour Falcon030
C pour GEMDOS (Atari ST)
C pour Linux
C pour PowerTV OS
C pour OS/2
C pour Unix
C pour Windows
Aztec C
CoCo-C
GNU C
HiSoft C
IBM C/2
Introl-C
Lattice C
Microsoft C
MinGW C
MSX-C
Open Watcom C
OS-9 C Compiler
Pure C
Quick C
Turbo C
HiSoft C for Atari ST
HiSoft C for CP/M (Amstrad CPC)
C++ pour OS/2
C++ pour Windows
Borland C++
C++Builder
IBM VisualAge C++
Intel C++
MinGW C++
Open Watcom C++
Symantec C++
Turbo C++
Visual C++
Visual C++ .NET
Watcom C++
Zortech C++
C# (C Sharp) pour Windows
Apple III Cobol
Microsoft Cobol
BlueDragon
Lucee
OpenBD
Railo
Smith Project
Microsoft Fortran
WATFOR-77
CSS
FBML
Open Graph
SVG
XML
XSL/XSLT
LESS
SASS
GCJ (GNU)
JSP
Jython
Visual J++
Node.js
TypeScript
AutoLISP
ACSLogo
LotusScript pour Windows
Amiga Oberon
Oberon .NET
Apple Pascal
Delphi/Kylix/Lazarus
Free Pascal
GNU Pascal
HighSpeed Pascal
IBM Personal Computer Pascal
Lisa Pascal
Maxon Pascal
MPW Pascal
OS-9 Pascal
OSS Personal Pascal
Pascal-86
Pascal du Cray Research
Pascal/VS
Pascal-XT
PURE Pascal
QuickPascal
RemObjets Chrome
Sun Pascal
THINK Pascal
Tiny Pascal (TRS-80)
Turbo Pascal
UCSD Pascal
VAX Pascal
Virtual Pascal
Turbo Pascal for CP/M-80
Turbo Pascal for DOS
Turbo Pascal for Macintosh
Turbo Pascal for Windows
CodeIgniter (Cadre d'application)
Drupal (Projet)
Joomla! (Projet)
Phalanger (PHP .NET)
phpBB (Projet)
Smarty (balise)
Twig (balise)
Symfony (Cadre d'application)
WordPress (Projet)
Zend (Cadre d'application)
PL360
PL/M-80
PL/M-86
Turbo Prolog
CPython
IronPython
Jython
PyPy
AREXX
Regina REXX
JMP
Btrieve
Cassandra
Clipper
CouchDB
dBASE
Hbase
Hypertable
MongoDB
Redis
Access
BigQuery
DB2
H2
Interbase
MySQL
Oracle
PostgreSQL
SAP HANA
SQL Server
Sybase
U-SQL
Introduction
Référence de commandes et fonctions
Concept de programmation de base
Les décisions
Faire des boucles
Les sous-programmes
Lecture de données
Les expressions
Les chaînes de caractères
Les fonctions
Fonctions mathématiques
Les nombres aléatoires
Les tableaux
Les conditions
L'ensemble de caractères
Les effets sonores
Entreposage sur bande magnétique
Les imprimantes ZX
Les autres équipements
Rapport (Référence des codes d'erreur)
Préface
Notes légal
Dictionnaire
Recherche

Nombres aléatoires

Cette page traite de la fonction RND et du mot clef RANDOMIZE. Ils sont tous deux utilisés en relation avec des nombres aléatoires, vous devez donc faire attention à ne pas les confondre. Ils sont tous les deux sur la même touche T ; RANDOMIZE a dû être abrégé en RAND.

À certains égards, RND est comme une fonction : il effectue des calculs et produit un résultat. Il est inhabituel en ce qu'il n'a pas besoin de paramètre.

Chaque fois que vous l'utilisez, son résultat est un nouveau nombre aléatoire entre 0 et 1. (Parfois, il peut prendre la valeur 0, mais jamais 1.)

Essayer :

  1. 10 PRINT RND
  2. 20 GO TO 10

pour voir comment la réponse varie. Pouvez-vous détecter n'importe quel modèle ? Vous ne devriez pas pouvoir ; "aléatoire" signifie qu'il n'y a pas de modèle.

En fait, RND n'est pas vraiment aléatoire, car il suit une séquence fixe de 65536 nombres. Cependant, ceux-ci sont si complètement mélangés qu'il n'y a au moins pas de modèles évidents et nous disons que RND est pseudo-aléatoire.

RND donne un nombre aléatoire entre 0 et 1, mais vous pouvez facilement obtenir des nombres aléatoires dans d'autres intervalles. Par exemple, 5*RND est compris entre 0 et 5, et 1,3+0,7*RND est compris entre 1,3 et 2. Pour obtenir des nombres entiers, utilisez INT (en vous rappelant que INT arrondit toujours à l'inférieur) comme dans 1+INT(RND*6), que nous utiliserons dans un programme pour simuler des dés. RND*6 est compris entre 0 et 6, mais comme il n'atteint jamais 6, INT(RND*6) vaut 0, 1, 2, 3, 4 ou 5.

Voici le programme :

  1. 10 REM Programme pour lancer de dés
  2. 20 CLS
  3. 30 FOR n=1 TO 2
  4. 40 PRINT 1+INT(RND*6);" ",
  5. 50 NEXT n
  6. 60 INPUT a$: GO TO 20

Appuyez sur ENTER chaque fois que vous voulez lancer les dés.

L'instruction RANDOMIZE est utilisée pour faire démarrer RND à un endroit précis dans sa séquence de nombres, comme vous pouvez le voir avec ce programme :

  1. 10 RANDOMIZE 1
  2. 20 FOR n=1 TO 5: PRINT RND: NEXT n
  3. 30 PRINT : GO TO 10

Après chaque exécution de RANDOMIZE 1, la séquence RND repart à 0.0022735596. Vous pouvez utiliser d'autres nombres entre 1 et 65535 dans l'instruction RANDOMIZE pour démarrer la séquence RND à différents endroits.

Si vous aviez un programme avec RND et qu'il contenait également des erreurs que vous n'aviez pas trouvées, il serait utile d'utiliser RANDOMIZE comme ceci pour que le programme se comporte de la même manière à chaque fois que vous l'exécutez.

RANDOMIZE seul (et RANDOMIZE 0 a le même effet) est différent, car il randomise vraiment RND - vous pouvez le voir dans le programme suivant :

  1. 10 RANDOMIZE
  2. 20 PRINT RND : GO TO 10

La séquence que vous obtenez ici n'est pas très aléatoire, car RANDOMIZE utilise le temps depuis que l'ordinateur a été allumé. Comme cela a augmenté du même montant à chaque fois que RANDOMIZE est exécuté, le prochain RND fait plus ou moins la même chose. Vous obtiendrez un meilleur aléa en remplaçant GO TO 10 par GO TO 20.

Remarque : La plupart des dialectes de BASIC utilisent RND et RANDOMIZE pour produire des nombres aléatoires, mais tous ne les utilisent pas de la même manière.

Voici un programme pour lancer des pièces et compter le nombre de pile et face :

  1. 10 LET heads=0: LET tails=0
  2. 20 LET coin=INT(RND*2)
  3. 30 IF coin=0 THEN LET heads=heads+1
  4. 40 IF coin=1 THEN LET tails=tails+1
  5. 50 PRINT heads;",";tails,
  6. 60 IF tails<>0 THEN PRINT heads/tails;
  7. 70 PRINT : GO TO 20

Le rapport pile/face devrait devenir environ 1 si vous continuez assez longtemps, car à long terme, vous vous attendez à un nombre approximativement égal de pile et face.



PARTAGER CETTE PAGE SUR
Dernière mise à jour : Mercredi, le 19 avril 2023