miércoles, 14 de marzo de 2012

Practica 10

Practica 10 problema 1, Programa que desarrolle un modelo para calcular la poblacion mundial dada por la ecuacion p=4.88(1+e^0.02t) t=tiempo en años 1985 es t=0 1986 es t=1, calcular hasta el 2012

INICIO
 x,a  INT
p REAL
PRINT "Funcion y=(x^2*z)/(x-z)\n
PRINT "año\t  poblacion\t "
for(x=0 to 27 step x=x+1)
{
 a=1985+x                  
                   p=(1+exp(.02*x))*4.88
                   PRINT a,"\t ",p
}
FIN


#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<math.h>
int main ()
{
int x,a;
float p;
cout<<"Practica 10 problema 1, Marco Antonio villarreal Uribe,Programa que desarrolle un modelo para calcular la poblacion mundial dada por la ecuacion p=4.88(1+e^0.02t) t=tiempo en años 1985 es t=0 1986 es t=1, calcular hasta el 2012"<<endl;
cout<<"Funcion y=(x^2*z)/(x-z)\n"<<endl;
cout<<"año\t "<<"poblacion\t "<<endl;
for(x=0;x<=27;x=x+1)
{
 a=1985+x;                 
                   p=(1+exp(.02*x))*4.88;
                   cout<<a<<"\t "<<p<<endl;
}

getch();
}


Practica 10 problema 2, las funciones x,y estan dadas por las siguientes funciones, escriba un programa que calcule x,y con los siguentes datos 
 
INICIO
int v=500;
float p,a=22.8,x,y,t,r;
PRINT "Funcion y=v*t*sin(angulo)"
PRINT "Funcion x=v*t*cos(angulo)\n" 
PRINT "Datos\nAngulo=22.8 grados\nvi=500 ft/seg\nt=[0,10]seg intervalo de 0 a 10 aumentando .5 cada vez\n"
PRINT"t\t x\t         y\n0\t 0\t         0"
r=(a*3.1416)/180 
for(t=0.5 to 10 step t=t+.5)
{                
                  y=v*t*sin(r)
                  x=v*t*cos(r)
                   PRINT t,"\t ",x,"\t ",y
}
FIN

#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<math.h>
int main ()
{
int v=500;
float p,a=22.8,x,y,t,r;
cout<<"Practica 10 problema 2, Marco Antonio villarreal Uribe,las funciones x,y estan dadas por las siguientes funciones, escriba un programa que calcule x,y con los siguentes datos "<<endl;
cout<<"Funcion y=v*t*sin(angulo)"<<endl;
cout<<"Funcion x=v*t*cos(angulo)\n"<<endl;
cout<<"Datos\nAngulo=22.8 grados\nvi=500 ft/seg\nt=[0,10]seg intervalo de 0 a 10 aumentando .5 cada vez\n"<<endl;
cout<<"t\t x\t         y\n0\t 0\t         0"<<endl;
r=(a*3.1416)/180;
for(t=0.5;t<=10;t=t+.5)
{                
                  y=v*t*sin(r);
                  x=v*t*cos(r);
                   cout<<t<<"\t "<<x<<"\t "<<y<<endl;
}

getch();
}


Practica 10 problema 3,  se realizan 4 experimentos con 6 resultados cada uno, escriba un programa que calcule el promedio de cada experimento 
INICIO
 x,z INT
y,a REAL
for(x=1 to 4 step x=x+1)
{
PRINT "\nExperimento ",x
y=0
                   for(z=1 to 6 step z=z+1)
{
PRINT "Resultado ",z," = "
READ a
y=y+a
}
y=y/6
PRINT "Promedio ",y
}
FIN


#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<math.h>
int main ()
{
int x,z;
float y,a;
cout<<"Practica 10 problema 3, Marco Antonio villarreal Uribe, se realizan 4 experimentos con 6 resultados cada uno, escriba un programa que calcule el promedio de cada experimento "<<endl;

for(x=1;x<=4;x=x+1)
{
cout<<"\nExperimento "<<x<<endl;
y=0;
                   for(z=1;z<=6;z=z+1)
{
cout<<"Resultado "<<z<<" = ";
cin>>a;
y=y+a;
}
y=y/6;
cout<<"Promedio "<<y<<endl;
}
getch();
}


Practica 10 problema 4 a , se realizan 4 experimentos con resultados distintos, escriba un programa que calcule el promedio de cada experimento preguntando cuantos resultados se obtuvieron, realizar el programa con una gaza anidada

INICIO
x,z INT
 y,a,n REAL
for(x=1 to 4 step x=x+1)
{
PRINT "\nExperimento ",x
PRINT"Cuantos resultados hay? "
READ n
y=0;
                   for(z=1 to n step z=z+1)
{
PRINT"Resultado ",z," = "
READ a
y=y+a
}
y=y/n
PRINT"Promedio ",y
}
FIN


#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<math.h>
int main ()
{
int x,z;
float y,a,n;
cout<<"Practica 10 problema 4 a, Marco Antonio villarreal Uribe,se realizan 4 experimentos con resultados distintos, escriba un programa que calcule el promedio de cada experimento preguntando cuantos resultados se obtuvieron, realizar el programa con una gaza anidada"<<endl;

for(x=1;x<=4;x=x+1)
{
cout<<"\nExperimento "<<x<<endl;
cout<<"Cuantos resultados hay? ";
cin>>n;
y=0;
                   for(z=1;z<=n;z=z+1)
{
cout<<"Resultado "<<z<<" = ";
cin>>a;
y=y+a;
}
y=y/n;
cout<<"Promedio "<<y<<endl;
}
getch();
}


Practica 10 problema 4 b,  se realizan 4 experimentos con 6 resultados cada uno, escriba un programa que calcule el promedio de cada experimento, realizar el programa sin una gaza anidada

INICIO
x,z INT
y,a,a1,a2,a3,a4,a5 REAL
for(x=1 to 4 step x=x+1)
{
PRINT "\nExperimento ",x
y=0                  
PRINT "Resultado 1 = "
READ a
y=y+a
PRINT "Resultado 2 = "
READ a1
y=y+a1
PRINT "Resultado 3 = "
READ a2
y=y+a2
PRINT "Resultado 4 = "
READ a3
y=y+a3
PRINT "Resultado 5 = "
READ a4
y=y+a4
PRINT "Resultado 6 = "
READ a5
y=y+a5
y=y/6
PRINT "Promedio ",y
}
FIn

#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<math.h>
int main ()
{
int x,z;
float y,a,a1,a2,a3,a4,a5;
cout<<"Practica 10 problema 4, Marco Antonio villarreal Uribe, Marco Antonio villarreal Uribe,se realizan 4 experimentos con 6 resultados cada uno, escriba un programa que calcule el promedio de cada experimento, realizar el programa sin una gaza anidada"<<endl;

for(x=1;x<=4;x=x+1)
{
cout<<"\nExperimento "<<x<<endl;
y=0;                  
cout<<"Resultado 1 = ";
cin>>a;
y=y+a;
cout<<"Resultado 2 = ";
cin>>a1;
y=y+a1;
cout<<"Resultado 3 = ";
cin>>a2;
y=y+a2;
cout<<"Resultado 4 = ";
cin>>a3;
y=y+a3;
cout<<"Resultado 5 = ";
cin>>a4;
y=y+a4;
cout<<"Resultado 6 = ";
cin>>a5;
y=y+a5;
y=y/6;
cout<<"Promedio "<<y<<endl;
}
getch();
}




Practica 10 problema 5, Produzca una tabla de valores X y Y para lo siguiente a)y=x+x^2+x^3/6+x^4/24+x^5/120. x=[5,10] subiendo .2
b)y=24e^0.04t. t=[1,10] subiendo .2
c)y=5x^5-2x^3+x. x=[5,10] subiendo .5 "

INICO
 y,x  REAL
 r CHAR
PRINT"Que opcion desea?\na)y=x+x^2+x^3/6+x^4/24+x^5/120. x=[5,10] subiendo .2"
PRINT"b)y=24e^0.04t. t=[1,10] subiendo .2\nc)y=5x^5-2x^3+x. x=[5,10] subiendo .5 "
READ r
switch(r)
{
case 'a'
:PRINT "x\t y"
     for(x=5 to 10 step x=x+.2)
{                
                   y=x+pow(x,2)+(pow(x,3)/6)+(pow(x,4)/24)+(pow(x,5)/120)
                   PRINT, x,"\t ",y
}
break
case 'b':
PRINT"t\t y"
     for(x=1 to 10 step x=x+.2)
{                
                   y=24*(exp(0.04*x))
                   PRINT x,"\t",y
}
break
case 'c':
PRINT"x\t y"
     for(x=5 to 10 step x=x+.5)
{                
                   y=5*pow(x,5)-2*pow(x,3)+x
                   PRINT ,x,"\t",y
}
break
default: PRINT"no tenemos la opcion deseada"
}
FIN


#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<math.h>
int main ()
{

float y,x;
char r;
cout<<"Practica 10 problema 5, Marco Antonio villarreal Uribe, Produzca una tabla de valores X y Y para lo siguiente "<<endl;
cout<<"Que opcion desea?\na)y=x+x^2+x^3/6+x^4/24+x^5/120. x=[5,10] subiendo .2"<<endl;
cout<<"b)y=24e^0.04t. t=[1,10] subiendo .2\nc)y=5x^5-2x^3+x. x=[5,10] subiendo .5 "<<endl;
cin>>r;
switch(r)
{
case 'a':cout<<"x\t y"<<endl;
     for(x=5;x<=10;x=x+.2)
{                
                   y=x+pow(x,2)+(pow(x,3)/6)+(pow(x,4)/24)+(pow(x,5)/120);
                   cout<<x<<"\t "<<y<<endl;
}
break;
case 'b':cout<<"t\t y"<<endl;
     for(x=1;x<=10;x=x+.2)
{                
                   y=24*(exp(0.04*x));
                   cout<<x<<"\t"<<y<<endl;
}
break;
case 'c':cout<<"x\t y"<<endl;
     for(x=5;x<=10;x=x+.5)
{                
                   y=5*pow(x,5)-2*pow(x,3)+x;
                   cout<<x<<"\t"<<y<<endl;
}
break;
default:cout<<"no tenemos la opcion deseada";
}
getch();
}




Practica 10 problema 6, Programa que calcule y despliegue los valores de X,Y,Z cundo Y=x^2*z/x-z x=[2,6] amientando 1 z=[2,6] aumentando 1, cuando x==z despliegue Funcion indefinida

INICIO
x,z INT
y REAL
PRINT "Funcion y=(x^2*z)/(x-z)\n"
PRINT "x\t "<<"z\t y\n"
for(x=2;x<=6;x=x+1)
{
                   for(z=2 to 6 step z=z+1)
{
                   y=(pow(x,2)*z)/(x-z)
                   if(z==x)
                   {
                           PRINT x<<"\t "<<z<<"\t Funcion indeterminada"
                           }
                           else
                           {
                           PRINT x,"\t ",z,"\t ",y
                           }
}
PRINT endl;
}
FIN



#include<iostream.h>
#include<conio.h>
#include<stdio.h>
#include<math.h>
int main ()
{
int x,z;
float y;
cout<<"Practica 10 problema 6, Marco Antonio villarreal Uribe, Programa que calcule y despliegue los valores de X,Y,Z cundo Y=x^2*z/x-z x=[2,6] amientando 1 z=[2,6] aumentando 1, cuando x==z despliegue Funcion indefinida"<<endl;
cout<<"Funcion y=(x^2*z)/(x-z)\n"<<endl;
cout<<"x\t "<<"z\t y\n"<<endl;
for(x=2;x<=6;x=x+1)
{
                   for(z=2;z<=6;z=z+1)
{
                   y=(pow(x,2)*z)/(x-z);
                   if(z==x)
                   {
                           cout<<x<<"\t "<<z<<"\t Funcion indeterminada"<<endl;
                           }
                           else
                           {
                           cout<<x<<"\t "<<z<<"\t "<<y<<endl;
                           }
}
cout<<endl;
}
getch();
}


No hay comentarios:

Publicar un comentario