Balanceo de Ecuaciones Quimicas Usando Matlab

D.E.S.C.A.R.G.A.R

Regresión Lineal-- Usando Lenguaje C

regresion  lineal programa
#include<stdio.h>
#include<stdlib.h>
int main(){
    int i,n;
    float x,y,sumx,sum_sqx,sumy,sumxy,a,b;
    printf("\n Numero de datos: ");
    scanf("%d",&n);
    sumx =0;
    sum_sqx =0;
    sumy=0;
    sumxy=0;
     for(i=0;i<n;i++){
   printf("X: ");
   scanf("%f",&x);
   printf("Y: ");
   scanf("%f",&y);
   sumx = sumx +x;
   sum_sqx = sum_sqx + (x*x);
   sumy= sumy + y;
   sumxy = sumxy + (x*y);
   }
    b = (sumxy-(sumx*sumy)/n)/(sum_sqx-(sumx*sumx)/n);
    a = (sumy/n)-(b*sumx/n);
    printf("\nEcuacion lineal: Y= %f + %fX\n",a,b);
    system("pause");
    return 0;
 }

Numero de datos: 5
X: 1
Y: 4.3
X: 3
Y: 4.64
X: 5
Y: 4.98
X: 7
Y: 5.32
X: 9
Y: 5.7

Ecuacion lineal: Y= 4.117999 + 0.174000X
sh: 1: pause: not found

For y While en lenguaje C

Seguimos con el pequeño curso introductorio a lenguaje C aplicado a  ing Química.

un Pequeño programa en el que se aplican estas dos estructuras, y en ambos casos se obtiene el mismo resultado de una reacción química  de orden cero de la forma A ---> B, con CAo = 15 gmol/L y una K = 0.0567.

#include <stdio.h>
#include<stdlib.h>
int main()
{
   double conc, inicon,k;
    int tiempo;
    inicon = 15.00;
    k = 0.0567;
    tiempo = 0;
     printf("\n tiempo(s) Conc(gmol/L) \n ");
while(tiempo  <= 60){
 conc = inicon - k*tiempo;
  printf("%d \t \t %1f\n",tiempo,conc);
    tiempo = tiempo +10;

  } 
system ("pause");
    return 0;
} 
// segunda estructura usando For
#include <stdio.h>
#include<stdlib.h>
int main()
{
   double conc, inicon,k;
    int tiempo;
    inicon = 15.00;
    k = 0.0567;
    
     printf("\n tiempo(s) Conc(gmol/L) \n ");
  for (tiempo=0;tiempo<=60; tiempo = tiempo +10) {
   conc = inicon - k*tiempo;
   printf(" %d\t\t %1f\n",tiempo,conc);
   }
system ("pause");
    return 0;
}

Ejecuntando el programa.

tiempo(s) Conc(gmol/L) 
 0     15.000000
10     14.433000
20     13.866000
30     13.299000
40     12.732000
50     12.165000
60     11.598000
sh: 1: pause: not found


------------------
(program exited with code: 0)
Press return to continue

if- else en C

Continuamos con estos post acerca del lenguaje C aplicado a las problemas sencillos de ingeniería (especialmente a Química). Y toca el turno a la estructura IF- ELSE.

if (condicion1)
  accion1
else (condicion2)
  accion2

Una aplicacion Sencilla seria el No de Reynolds.

#include<stdio.h>
#include<stdlib.h>
#define LIMITE 2100
int main(){
	int nre;
	float D,den,m ;
	//inicia entrada de Datos
	printf("\n Numero de Reynols \n ");
	printf("\n Valor del Diametro de la tuberia \n");
	scanf(" %f",&D);
	printf("\n Valor de la Dencidad \n ");
	scanf("%f",&den);
	printf("Viscosidad cinematica del fluido ");
	scanf("%f",&m);
	//termina entrada de Datos
	/// calculos
	nre = (D*den)/m;
	// procesando informacion 
	printf("El numero de reynols es %d",nre);
	if (nre < LIMITE)
	printf("\n  El fluido es Laminar \n\n");
	else
	printf ("\n  fluido no es Laminar \n\n ");
	system ("pause");
	return 0;
	}

Numero de Reynols 
 
 Valor del Diametro de la tuberia 
0.23

 Valor de la Dencidad 
 1.255
Viscosidad cinematica del fluido 0.000356
El numero de reynols es 810
  El fluido es Laminar 

sh: 1: pause: not found


------------------
(program exited with code: 0)
Press return to continue

Usando Arrays en C para convertir un conjunto de Temperaturas

#include<stdio.h>
#include<stdlib.h>
int main()
{
  int temp[4][4],i;
  for(i=0;i<4; i++){
   temp[i][0] = (i*50)+100;
   temp[i][1] = (temp[i][0]*1.8 )+ 32;
   temp[i][2] = temp[i][0]+273;
   temp[i][3] = temp[i][0] + 460;
   
   }
  printf("\n Tabla de Conversion de Temperaturas \n ");
  printf("°C     °F      K      R \n ");   
  for(i=0; i<4; i++){  
   printf("\n %d    %d    %d     %d \n", temp[i][0], temp[i][1],
   temp[i][2], temp[i][3]);
   }
 system ("pause");
 return 0;
  
}

Resultado

Con esta  post   iniciamos  un pequeño curso de lenguaje C   para  resolver problemas clásicos de la ingeniería desde cero. Especialmente  aplicado a  ingeniería química.