lunes, 22 de octubre de 2012

Practica 8

Practica 8 problema 1

seudocodigo:

N int
P int
C int
Print " Cantidad de Potencia de 2 = "
read N
for (C=1 to N step C++)
{
Print " 2 ^ ",C,"=",pow(2,C)
P= pow (2,C) 
Print "P"
}


Practica 8 problema 2


Pseudocodigo:

x, F, fact int
L=5 float
P float
Print "cliente Probabilidad de Poisson"
for(x=1 to 20 step x=x+1)
{
fact=1
for(F=x to 1 step F=F-1)
{
fact=fact*F
}
P=pow(L,x)*exp(-1)/fact
Print x, " " , P
}


Practica 8 problema 3

Pseudocodigo:


serie=0, n, conta,termino int
Print "Numeros de terminos de la serie"
read n
for(conta=1 to n step conta++)
{
termino=2*conta
Print termino
if(conta==n)
{
Print "="
}
else {
Print "+"
}
serie=serie + termino
}
Print serie


Practica 8 problema 4

Pseudocodigo:


X, Y ,T float
Print " X "
for (X=2to 8 step X=X+0.2)
{
Y=4 * pow (X,3)-3* pow(X,2)-5
Print X ," \t " ,Y
}
Print "\nX Y "
for(X=1 to 5 step X=X+0.5)
{
Y=X+pow(X,2)/6+pow(X,4)/24 
Print X ," \t " , Y
}
Print "\n T Y"
for (T=2 to 4 step T=T+0.1)
{
Y=4*exp(0.2*T)
Print T ,"\t " , Y
}

Practica 8 problema 5

Pseudocodigo:


x, y, v, t float 
ang=((33.5*3.1416)/180.0) float 
Print "x \t y"
for(t=1.0;t<=20.0;t=t+0.5)
{
x=v*t*cos(ang)
y=v*t*sin(ang)
Print x , "\t" , y
}

Practica 8 problema 6

Pseudocodigo:


x int
Print "x \t x^2 \t x^3"
for(x=1to 15 step x=x+2)
{
Print x , "\t" , (x*x) , "\t" , (x*x*x)
}

Practica 8 problema 7

Pseudocodigo:



vi,vf,fah,celsius,kelvin float 
Print "valor inicial temperatura celsius: "
read vi
Print "valor final temperatura celsius: "
read vf
Print "celsius fahrenheit kelvin"
for(celsius=vi to vf spet celsius=celsius+1)
{
fah=(9.0/5.0)*(celsius+32.0)
kelvin=celsius+273.15
Print celsius , " \t " , fah , "\t\t" , kelvin 
}

No hay comentarios:

Publicar un comentario