Section courante

A propos

Section administrative du site

 Langage  Elément  Tutoriel  Programmation  Extension  Emulateur  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
Les remarques
Les opérateurs
Les instructions conditionnelles
Les instructions de boucle
Référence d'instructions et de fonctions
Les premiers pas
Les variables
Écrire des programmes BASIC simples
Les boucles
Une boucle dans une boucle (Minuterie)
Décisions, décisions,...
L'écran
Les couleurs
Chance aléatoire
Lecture de données
Aide à l'arithmétique
Aide avec les mots
Enregistrement de programmes
Éditer des programmes
Les questionnaires
Musique
Bonjour
Spécial
Temps
Trigonométrie
Sortie ROM
Année bissextile
ArcCos
ArcSin
Disk Extended Color Basic
VCC
Raccourci clavier (Shortcut Keys)
Emplacements de palette
Codes BASIC 128 à 255 / Écran de texte à basse définition
Codes BASIC 128 à 159 / Écran de texte à haute définition
RAM du Coco 3
Code d'erreur du Coco 3
Préface
Notes légal
Dictionnaire
Recherche

Aide à l'arithmétique

Résoudre rapidement et avec précision de longs problèmes mathématiques est une tâche que votre ordinateur accomplit facilement. Cette page montre comment utiliser certains raccourcis lors de la saisie de formules longues et difficiles.

Sous-programmes (les commandes GOSUB et RETURN)

Un moyen simple de gérer des formules mathématiques compliquées consiste à utiliser les commandes GOSUB et RETURN pour configurer une sous-routine. Vous toujours utilisez GOSUB et RETURN ensemble. Leurs syntaxes sont :

GOSUBline number

Passe au sous-programme commençant à line number.

RETURN

Retourne du sous-programme à la commande suivant immédiatement la commande GOSUB correspondante.

Tapez et exécutez ce programme :

  1. 10 PRINT "EXECUTION DU PROGRAMME PRINCIPAL"     
  2. 20 GOSUB 500
  3. 30 PRINT "MAINTENANT DE RETOUR DANS LE PROGRAMME PRINCIPAL"
  4. 40 END
  5. 500 PRINT "EXECUTION DU SOUS-PROGRAMME"
  6. 510 RETURN

GOSUB 500 indique à l'ordinateur d'aller au sous-programme commencant à la ligne 500. RETURN indique à l'ordinateur de revenir au mot BASIC suivant immédiatement GOSUB.

Étiquetage des sous-programmes (la commande REM)

Ce sous-programme multiplie n'importe quel nombre par 100 :

  1. 10 PRINT"TAPEZ UN NUMERO";N
  2. 20 GOSUB 2000
  3. 30 PRINT N"FOIS 100 EST" R
  4. 40 GOTO 10
  5. 2000 REM FORMULE POUR MULTIPLIER UN NOMBRE PAR 100
  6. 2010 R=N*100
  7. 2020 RETURN

Remarquez la commande REM à la ligne 2000. REM vous permet d'insérer un commentaire dans un programme. Sa syntaxe est :

REM comment

Insère n'importe quel commentaire dans un programme dans une ligne de programme, sans que le commentaire n'ait d'effet sur le programme.

Vous pouvez insérer des lignes REM où vous voulez dans le programme. Ils ne font aucune différence dans le fonctionnement du programme. Pour voir par vous-même, ajoutez ces lignes et exécutez le programme :

  1. 5 REM C'EST UN PROGRAMME PARTICULIER,
  2. 17 REM CETTE LIGNE CHANGERA-T-ELLE LE PROGRAMME ?
  3. 45 REM LA LIGNE SUIVANTE GARDE LE SOUS-ROUTINE SEPARE

Utilisation de plusieurs sous-programmes (la commande ON GOSUB)

La commande ON GOSUB vous permet d'inclure plus d'un sous-programme dans un programme. La syntaxe pour ON GOSUB est la suivante :

ON n GOSUB line numbers

Passe au sous-programme commençant au nième numéro de ligne.

Pour voir comment fonctionne ON GOSUB, tapez ce programme :

  1. 10 INPUT"TAPES 1, 2 OU 3";N
  2. 20 ON N GOSUB 100, 200, 300
  3. 30 GOTO 10
  4. 100 PRINT "VOUS AVEZ TAPE 1"
  5. 110 RETURN
  6. 200 PRINT "VOUS AVEZ TAPE 2"
  7. 210 RETURN
  8. 300 PRINT "VOUS AVEZ TAPE 3" 
  9. 310 RETURN

Exécuter le programme (RUN). La ligne 20 fonctionne de la même manière que ces trois commandes :

  1. 18 IF N=1 THEN GOSUB 100
  2. 20 IF N=2 THEN GOSUB 200
  3. 22 IF N=3 THEN GOSUB 300

ON GOSUB amène l'ordinateur à regarder le numéro de ligne suivant ON (dans ce cas N).

Et si N vaut 4 ? Comme la ligne 20 n'a pas de numéro de quatrième ligne, l'ordinateur passe simplement à la ligne suivante du programme.

Voici un programme utilisant ON GOSUB :

  1. 5 FOR P=1 TO 600:NEXT P
  2. 10 CLS:X=RND(100):Y=RND(100)
  3. 20 PRINT"(1) ADDITION"
  4. 30 PRINT"(2) SOUSTRACTION"
  5. 40 PRINT"(3) MULTIPLICATION"
  6. 50 PRINT"(4) DIVISION"
  7. 60 INPUT"QUEL EXERCICE (1-4)";R
  8. 70 CLS
  9. 80 ON R GOSUB 1000,2000,3000,4000
  10. 90 GOTO 5
  11. 1000 PRINT "QUEL EST " X "+" Y
  12. 1010 INPUT A
  13. 1020 IF A=X+Y THEN PRINT"CORRECTE" ELSE PRINT "MAUVAIS"
  14. 1030 RETURN
  15. 2000 PRINT "QUEL EST " X "-" Y
  16. 2010 INPUT A
  17. 2020 IF A=X-Y THEN PRINT"CORRECTE" ELSE PRINT "MAUVAIS"
  18. 2030 RETURN
  19. 3000 PRINT "QUEL EST " X "*" Y
  20. 3010 INPUT A
  21. 3020 IF A=X*Y THEN PRINT"CORRECTE" ELSE PRINT "MAUVAIS"
  22. 3030 RETURN
  23. 4000 PRINT "QUEL EST " X "/" Y
  24. 4010 INPUT A
  25. 4020 IF A=X/Y THEN PRINT"CORRECTE" ELSE PRINT "MAUVAIS"
  26. 4030 RETURN

Aller à plus d'un endroit (la commande ON GOTO)

La commande ON GOTO est similaire à la commande ON GOSUB que vous venez d'apprendre. Sa syntaxe est :

ON n GOTO line numbers

effectue un branchement en commençant au nième numéro de ligne.

Il fonctionne de la même manière que ON GOSUB, sauf qu'il effectue un GOTO sur la ligne sélectionnée, au lieu d'un GOSUB. Dans l'exemple de programme suivant, ON GOTO détermine ce que l'ordinateur affiche lorsque vous appuyez sur les touches 1 à 3 :

  1. 10 A$=INKEY$:IF A$=""THEN 10
  2. 20 IF A$<"1" OR A$>"3" THEN 10
  3. 30 B=VAL(A$)
  4. 40 ON B GOTO 100,200,300
  5. 50 GOTO 10
  6. 100 PRINT "VOUS AVEZ ENFONCE 1":GOTO 10
  7. 200 PRINT "VOUS AVEZ ENFONCE 2":GOTO 10
  8. 300 PRINT "VOUS AVEZ ENFONCE 3":GOTO 10

Exécutez le programme (RUN) et voyez ce qui se passe.

Aidez un peu l'ordinateur (entre parenthèses)

À mesure que les formules mathématiques deviennent plus complexes, votre ordinateur a besoin d'aide pour les comprendre. Par exemple, que se passe-t-il si vous voulez que l'ordinateur résolve ce problème :

Diviser la somme de 13 + 3 par 8

Vous voudrez peut-être que l'ordinateur arrive à la réponse de cette façon :

13 + 3/8 = 16/8 = 2

Au lieu de cela, l'ordinateur arrive à une autre réponse. Tapez cette ligne de commande et voyez :

PRINT 13+3/8ENTER

L'ordinateur résout les problèmes en utilisant ces règles :

L'ordinateur résout le problème ci-dessus en utilisant ses règles :

Si vous voulez que l'ordinateur résolve le problème différemment, vous devez utiliser des parenthèses. Tapez cette ligne :

PRINT (13+3)/8ENTER

Chaque fois que l'ordinateur voit une opération entre parenthèses, il résout cette opération avant de résoudre les autres.

Que pensez-vous que l'ordinateur affichera comme réponses à chacun de ces problèmes ?

Code Résultat
PRINT 10-(5-1)/2 8
PRINT 10-5-1/2 4.5
PRINT (10-5-1)/2 2.0
PRINT (10-5)-1/2 4.5
PRINT 10-(5-1/2) 5.5

Et si vous voulez que l'ordinateur résolve ce problème ?

Diviser 10 moins la différence de 5 moins 1 par 2

Vous demandez en fait à l'ordinateur de faire ceci :

(10-(5-1))/2

Lorsque l'ordinateur détecte un problème avec plusieurs ensembles de parenthèses, il résout les parenthèses intérieures, puis passe aux parenthèses extérieures. En d'autres termes, il fait ceci :

5-1=4
10-4=6
6/2=3

Insérez des parenthèses dans le problème ci-dessous afin que l'ordinateur affiche 28 comme réponse :

  1. PRINT 30-9-8-7-6

La réponse est la suivante :

  1. PRINT 30-(9-8)-(7-6)

Afficher de grands nombres (notation E)

Tapez et exécutez ce programme pour voir comment l'ordinateur affiche les grands nombres :

  1. 10 X=1
  2. 20 PRINT X;
  3. 30 X=X*10
  4. 40 GOTO 20

L'ordinateur affiche les grands et les petits nombres en utilisant la notation exponentielle (E). L'ordinateur affiche un milliard (1 000 000 000), par exemple, sous la forme 1E+09, ce qui signifie le chiffre un suivi de neuf zéros.

Si l'ordinateur affiche un nombre sous la forme 5E-06, vous devez décaler la virgule décimale, venant après le 5, de six places vers la gauche, en insérant des zéros si nécessaire. Techniquement, cela signifie 5*10-6, ou 5 millionièmes (.000005).

Notez que lorsque vous exécutez le programme ci-dessus, l'ordinateur affiche une «?OV ERROR» (erreur de débordement) à la fin du programme. L'ordinateur ne peut pas gérer les nombres supérieurs à 1E+38 ou inférieurs à -1E+38.

La notation E est simplement une fois que vous vous y êtes habitué. Vous trouverez que c'est un moyen facile de garder une trace de très grands ou de très petits nombres sans perdre la virgule décimale.

COMMANDES

GOSUB
GOTO
ON GOSUB
ON GOTO
RETURN
REM
SYMBOLES

( )
CONCEPTS

Ordre des opérations
Notation E


PARTAGER CETTE PAGE SUR
Dernière mise à jour : Samedi, le 11 mars 2023