Ce programme peut facilement être créé par la modification du contenu de
INPTa. Stockez ce programme dans la variable INPT2.
Application : évaluation de la fonction de deux variables
Considérons l'équation des gaz parfaits, pV = nRT, où p = pression du gaz
3
(Pa), V = volume du gaz(m
), n = nombre de moles (gmol), R = constante de
gaz universelle = 8.31451_J/(gmol*K), et T = température absolue (K).
On peut définir la pression p en tant que fonction de deux variables, V et T,
comme p(V,T) = nRT/V pour une masse de gaz donnée dans la mesure où n
restera également constant. Supposons que n = 0.2 gmol, la fonction à
programmer est alors la suivante :
T
J
T
p
(
V
,
T
)
=
. 8
31451
⋅
0
2 .
⋅
=
. 1 (
662902
_
)
⋅
V
K
V
On peut définir cette fonction en tapant le programme suivant
V T '(1.662902_J/K)*(T/V)'
»
« →
et la stocker dans la variable @@@p@@@.
L'étape suivante consiste à ajouter la chaîne d'entrée qui invitera l'utilisateur à
indiquer les valeurs de V et T. Pour créer cette chaîne d'entrée, modifiez le
programme dans @@@p@@@ afin qu'il se présente ainsi :
"Enter V and T: " {"
:T: " {2 0} V }
«
:V:
INPUT OBJ→ → V T '(1.662902_J/K)*(T/V)'
»
Stockez le nouveau programme dans la variable @@@p@@@. Appuyez sur @@@p@@@ pour
exécuter le programme. Entrez les valeurs de V = 0.01_m^3 et T = 300_K dans
la chaîne d'entrée, puis appuyez sur `. Le résultat ainsi obtenu est
49887.06_J/m^3. Les unités de J/m^3 sont équivalentes à des Pascals (Pa),
l'unité de pression de prédilection du système S.I.
Page. 21-27