Définir des fonctions

GW-Basic, utilisé par PC-Basic

Programme avec Texte Seulement

PC-BASIC

Des fonctions mathématiques simples mappent les ordonnées (les valeurs y) aux abscisses (les valeurs x) d'une manière très spécifique : chaque valeur x, lorsqu'elle est connectée à une fonction, donne une - et une seule - valeur y.

Par exemple, considérons la fonction suivante :

f(x) = 3x + 1

Si nous insérons 4 pour x, nous obtenons une valeur unique pour y, 13, comme indiqué ci-dessous.

f(4) = 3*4 + 1 = 12 + 1 = 13

GW-BASIC permet des fonctions définies par l'utilisateur, avec un nombre variable d'entrées. Examinez le code de FUNC.BAS, puis exécutez le programme : vous fournissez les entrées et les sorties sont imprimées à l'écran.

La magie réside dans l'instruction DEF FN : les lignes 25 et 60 définissent deux fonctions différentes, tandis que les lignes 35 et 90 les évaluent à des valeurs saisies par l'utilisateur.

10 KEY OFF:SCREEN 9:COLOR 15,0:CLS
20 PRINT "NOUS DÉFINIRONS UNE FONCTION F(X) = 3X+1"
25 DEF FNFUN(X)=3*X+1
30 INPUT "ÉVALUER F(X) POUR X= ";X
35 P=FNFUN(X)
40 PRINT "F(";X;")= ";P
50 PRINT:PRINT "NOUS ALLONS MAINTENANT DEFINIR UNE FONCTION G(X,Y) = 2X+3Y"
60 DEF FNFC(X,Y)=2*X+3*Y
70 INPUT "X= ";X
80 INPUT "Y= ";Y
90 Q=FNFC(X,Y)
100 PRINT "G(";;X;",";Y;")=";Q
110 PRINT:END

L'instruction DEF FN, lorsqu'elle est utilisée de manière appropriée, peut être un allié puissant pour aider à simplifier le code d'un programme. Le hic ? Le nom de chaque fonction doit commencer par les lettres FN.