Practica 11

PRACTICA 11

TREJO AVALOS NESTOR JOAQUIN
BARRON JUAN CARLOS

Problema 11

INICIO
voltios[9] Real
i int
for( i=0 to 9 step i++)
{
print"Voltios["<<i<<"]=?"
Read voltios[i]
}
print"Lista de valores de voltios "
for(i=0 to 9 step i++)
{
print voltios[i],"\t"
}
FIN

Problema 1b

INICIO
voltios[9] Real
i int
for( i=0 to 9 step i++)
{
print"Voltios["<<i<<"]=?"
Read voltios[i]
}
print"Lista de valores de voltios "
for(i=0 to 9 step i++)
{
print voltios[i],"\t"
if((i+1)%3==0)
{
print endl;
}
}
FIN

Problema 2
INICIO
temp[8],total=0  int
for(i=0 to 8 step i++)
{
print"temp["<<i<<"]=?" 
Read temp[i]
total=total+temp[]
}
print"Listado de 8 temperaturas"
for(i=0 to 8 step i++)
{
print temp[i],"\t"
}
print"\n Promedio=",(total/8)
}
FIN

Problema 3a
INICIO
mayor=0,fmax[10],i  int
print"Listado de 10 Numeros"
for(i=0 to 10 step i++)
{
print"fmax["<<i<<"]=",fmax[i]
fmax[i]>mayor,
mayor=fmax[i]
}
FIN

Problema 3b
INICIO
fmax[9],mayor=0,pos,menor=0 Real
posm=0 Real
i int
for(i=0 to 9 step i++)
{
Print"fmax["<<i<<"]="
Read fmax[i]
if(fmax[i]>mayor)
{
mayor=fmax[i]
pos=i+1
}
}
for(i=0 to 9 step i++)
{
Print fmax[i],"\t"
}
Print"El Numero Mayor es:"mayor,
Print"Este es el Elemento Numero"pos,"En la Lista de Numeros"
}
FIN

Problema  3c


INICIO
fmax[9],mayor=0,pos,menor=0 Real
posm=0 Real
i int
for(i=0 to 9 step i++)
{
Print"fmax["<<i<<"]="
Read fmax[i]
if(fmax[i]>mayor)
{
mayor=fmax[i]
pos=i+1
}
if(fmax[i]<menor||==0)
{
menor=fmax[i]
posm=i+1
}
}
for(i=0 to 9 step i++)
{
Print fmax[i],"\t"
}
Print"El Numero Mayor es:"mayor,
Print"Este es el Elemento Numero"pos,"En la Lista de Numeros"

Print"El Numero Menor es:"menor,
Print"Este es el Elemento Numero"posm,"En la Lista de Numeros"

}
FIN

Problema 4a
INICIO
calif[14] int
i int
suma=0 int
promedio Real
desviacion[14] Real
for(i=0 to 40 step i=i+1)
{
Print"Calificaciones"(i+1),"=?"
Read calif[i]
suma=suma+calif[i]
}
promedio=suma/14.0
for(i=0 to 13 step i=i+1)
{
desviacion [i]=calif[i]-promedio
Print"Valor       Desviacion"
for(i=0 to 13 step i=i+1)
{
Print calif[i],"\t",desviacion[i]
}
FIN

Problema 4b

INICIO
calif[14] int
varianza Real
i int
suma=0 int
promedio Real
desviacion[14] Real
for(i=0 to 40 step i=i+1)
{
Print"Calificaciones"(i+1),"=?"
Read calif[i]
suma=suma+calif[i]
}
promedio=suma/14.0
for(i=0 to 13 step i=i+1)
{
desviacion [i]=calif[i]-promedio
Print"Valor       Desviacion"
for(i=0 to 13 step i=i+1)
{
Print calif[i],"\t",desviacion[i]
suma=0
for(i=0 to 13 step i=i+1)
{
suma=suma+pow(desviacion[i],2)
}
varianza= suma/14.0
Print"La varianza es =",varianza
FIN

MARTES, 6 DE NOVIEMBRE DE 2012

PRACTICA 10

BARRÓN JUAN CARLOS
TREJO AVALOS NESTOR JOAQUIN

Problema 5.4   1
Inicio
a=11.7e-6 ,al Real
l=7365 int
to=0
tf=5
Print"Temperatura final (celsius) longitud expandida"
for (tf=5 to 40 step tf=tf+5)
{
al=a*l*(tf-to)
Print tf,"\t",al
}
Fin

Problema 5.4  2
Inicio
a=2,t, int
prob Real
Print"Tiempo Probabilidad de la Llamada"
for(t=1 to 10 step t=t+1)
{
Prob=1-pow(2.718228,-t/a)
Print t,"\t",prob
}
Fin

Problema 5.4  3 
Inicio
g=32 int
d=0.0,t,intervalo, Real
Print"Tiempo \t Distancia en el intervalo actual \t Distancia total"
for(t=0 to 10 step t=t+1)
{
intervalo=(1.0/2.0)*g*pow(t,2)
d=d*intervalo
Print t,"\t",intervalo,"\t",d
}
Fin

Problema 5.7 1a
Inicio
calf int
do
{
Print"Calificacion="
Read calf
if (calf>=0&&calf<=100)
{
Print calf
}
}
while (calf>=&& calf<=100)
Fin

Problema 5.7  1b
Inicio
calf int
do
{
Print"Calificacion="
Read calf
if (calf>=0 && calf<=100)
{
Print calf
}
else
{
Print"Calificacion invalida"
}
}
while (calf>=0 && calf<=100)
Fin

Problema 5.7  1c
Inicio
calf int
do
{
Print"Calificacion="
Read calf
if (calf>=0 && calf<=100)
{
Print calf
}
else
{
Print"Calificacion Invalida"
}
}
while (calf!=999)
Fin

Problema 5.7  1d
Inicio
calf int
n=0 int
do
{
Print"Calificacion="
Read calf
if(calf>=0 && calf<=100)
{
Print calf
}
else
{
Print"Calificacion Invalida"
n=n+1
}
}
while(n!=5)
Fin

Practica 5.7 2a
Inicio
calf,n=0,total=0 int
d0
{
Print"Calificacion="
Read calf,
if (calf>=0&&calf<=100)
{
total=total+calf
n=n=1
}
else
{
Print"Calificacion Invalida"
}
}
while (calf!=999)
Print"Promedio es="
Fin

Problema 5.7    3a
Inicio
num int
Print"Introduce Un Numero"
Read num,
Print"\n El numero invertido es="
while(num!=0)
{
Print (num%10)
num=num/10
}
Fin