funzioni per titolazione mediante dati in vettore
esci esechimica.htm
"soluzione problemi di tipo
ripetitivo:stessa formula applicabile"
"fornendo i dati dello stesso tipo, con valori
variabili"
"esempio di titolazione inserendo dati in vettore"
;Semplificazione(Utente)
"dalla relazione Na*Va = Nb*Vb : noti tre valori, calcolare
il quarto"
"inserire in un vettore (es.q) i tre
valori noti"
;Semplificazione(Utente)
"come ultimo il valore collegato a quello da calcolare"
"es. noti Na 2 ,Va 6,Vb 12 :calcolare Nb "
"vettore : q:=[2,6,12]"
"formula risolutiva "
"***************************************+"
nb:=q SUB 1*q SUB 2/q SUB 3
"************************************"
"riporto valori noti in vettore"
;Semplificazione(Utente)
"seleziono formula,semplifica-approssima-approssima"
"nota:unica o doppia approssimazione con risultato
intero,decimale"
q:=[2,6,12]
;Semplificazione(Utente)
"seleziono formula,semplifica-approssima-OK-"
;Approssimazione(#11)
1
;Semplificazione(Utente)
"seleziono
formula,semplifica-approssima-OK-semplifica-approssima"
APPROX(nb:=q SUB 1*q SUB 2/q SUB 3,6)
;Approssimazione(#20)
1
"riporto altri valori di Na,Va,Vb in vettore q"
q:=[3,6,2]
"seleziono formula-semplifica-approssima-OK"
;Approssimazione(#11)
9
"..........................................."
q:=[0.2,10,5]
APPROX(nb:=q SUB 1*q SUB 2/q SUB 3,6)
;Approssimazione(#11)
0.25
q:=[0.6,30,60]
;Approssimazione(#11)
0.3
"-----------------------------------------"
"generalizzando :indico con x la incognita da
calcolare"
"scrivo la formula"
;Semplificazione(#37)
"***************************"
x:=q SUB 1*q SUB 2/q SUB 3
"***************************"
"noti Na 3,Va 20 ,Nb 1 : calcolare Vb=x"
q:=[3,20,1]
APPROX(x:=q SUB 1*q SUB 2/q SUB 3,6)
;Approssimazione(#40)
60
"noti Nb 0.2 ,Vb 30, Va 60 : calcolare Na=x"
q:=[0.2,30,60]
APPROX(x:=q SUB 1*q SUB 2/q SUB 3,6)
;Approssimazione(#44)
0.1
"---------------------------------------------"