Maple, page 2
Du code Maple permettant de résoudre un problème de chimie
Contenu : Equation, problème de chimie.
1 Enoncé ( d'après MAFPEN - P. Durand - Lycée Cuvier
- Montbéliard )
La combustion complète d'un mélange de 100 mL d'éthène
, propane , et butène a consommé 436 mL d'oxygène
.
L'analyse des produits de combustion donne des traces de liquide et
274 mL d'un corps pur gazeux. Quelle était la
composition du mélange en volume ?
2 Résolution avec Maple
Il faut écrire les équations-bilans
C2 H4 + 3 O2 -> 2 CO2 +
2 H2O
C3 H8 + 5 O2 -> 3 CO2 +
4 H2O
C4 H8 + 6 O2 -> 4 CO2 +
4 H2O
Vous trouverez plus de détails dans la page correspondante Mathematica.
3 Solutions numériques et littérales
> restart;
Vmol:=24:
systeme:={n_dioxygene=3*n_ethene+5*n_propane+6*n_butene,n_dioxyde_carbone=2*
n_ethene+3*n_propane+4*n_butene,n_eau=2*n_ethene+4*n_propane+4*n_butene,
v_ethene=Vmol*n_ethene,v_dioxygene=Vmol*n_dioxygene,v_dioxyde_carbone=Vmol*
n_dioxyde_carbone,v_propane=Vmol*n_propane,v_butene=Vmol*n_butene,v_eau=0.,
v_ethene+v_propane+v_butene=0.100,v_dioxyde_carbone=0.274,v_dioxygene=0.436}:
assign(solve(systeme,{n_ethene,n_propane,n_butene,n_dioxyde_carbone,n_eau,
n_dioxygene,v_ethene,v_dioxygene,v_dioxyde_carbone,v_propane,v_butene,
v_eau})):n_ethene;n_propane;n_butene;
> restart;
systeme:={n_dioxygene=3*n_ethene+5*n_propane+6*n_butene,n_dioxyde_carbone=2*
n_ethene+3*n_propane+4*n_butene,n_eau=2*n_ethene+4*n_propane+4*n_butene,
v_ethene=Vmol*n_ethene,v_dioxygene=Vmol*n_dioxygene,v_dioxyde_carbone=Vmol*
n_dioxyde_carbone,v_propane=Vmol*n_propane,v_butene=Vmol*n_butene,v_eau=0.,
v_ethene+v_propane+v_butene=0.100,v_dioxyde_carbone=0.274,v_dioxygene=0.436}:
assign(solve(systeme,{n_ethene,n_propane,n_butene,n_dioxyde_carbone,n_eau,
n_dioxygene,v_ethene,v_dioxygene,v_dioxyde_carbone,v_propane,v_butene,
v_eau})):n_ethene;n_propane;n_butene;
n_ethene/n_propane;
> restart;
Vmol:=24:
systeme02:={n_dioxygene=3*n_ethene+5*n_propane+6*n_butene,n_dioxyde_carbone=
2*n_ethene+3*n_propane+4*n_butene,n_eau=2*n_ethene+4*n_propane+4*n_butene,
v_ethene=Vmol*n_ethene,v_dioxygene=Vmol*n_dioxygene,v_dioxyde_carbone=Vmol*
n_dioxyde_carbone,v_propane=Vmol*n_propane,v_butene=Vmol*n_butene,v_eau=
n_eau*0.018,v_ethene+v_propane+v_butene=0.100,v_dioxyde_carbone+v_eau=0.274,
v_dioxygene=0.436}:
assign(solve(systeme02,{n_ethene,n_propane,n_butene,n_dioxyde_carbone,n_eau,
n_dioxygene,v_ethene,v_dioxygene,v_dioxyde_carbone,v_propane,v_butene,
v_eau})):n_ethene;n_propane;n_butene;
> restart;
Vmol:=24:
systeme04:={n_dioxygene=3*n_ethene+5*n_propane+6*n_butene,n_dioxyde_carbone=
2*n_ethene+3*n_propane+4*n_butene,n_eau=2*n_ethene+4*n_propane+4*n_butene,
v_ethene=Vmol*n_ethene,v_dioxygene=Vmol*n_dioxygene,v_dioxyde_carbone=Vmol*
n_dioxyde_carbone,v_propane=Vmol*n_propane,v_butene=Vmol*n_butene,v_eau=0.,
v_ethene+v_propane+v_butene+v_dioxygene=0.536,v_dioxyde_carbone=0.274}:
assign(solve(systeme04,{n_ethene,n_propane,n_butene,n_dioxyde_carbone,n_eau,
n_dioxygene,v_ethene,v_dioxyde_carbone,v_propane,v_butene,v_eau})):v_ethene;
Haut de
cette page