viernes, 10 de diciembre de 2010

Proyecto Final

Proyecto Realizado Por:

Garcia Perez Eduardo Antonio
Lopez Plascencia Sergio Isaac

Temas De La Unidad I
Examen Unidad I
Temas De La Unidad II
Examen Unidad II

jueves, 2 de diciembre de 2010

Practica 11


PRACTICA 11 PROBLEMA 2:
Pseudocodigo:
Inicio
Op1=0.0 double
Op2 =o.o double
Suma=0.0 double
Resta=0.o double
Multiplicacion= 0.0 double
Division =0.0 double
Mayor=0.0 double
Menor=0.0 double
Operacion Aritmetica()
CalcularSuma()
CalcularResta()
CalcularMultiplicacion()
CalcularDivision()
CalcularMayor()
CalcularMenor()
ImprimirSuma()
ImprimirResta()
ImprimirMultiplicacion()
ImprimirDivision()
ImprimirMayor()
ImprimirMenor()
Final.

Inicio:
Operacion Aritmetica()
Print "Operando 1:"
Read Op1
Print "Operando 2:"
Read Op2
Final

Inicio
CalcularSuma()
Suma=Op1+Op2
Final

Inicio
CalcularResta()
Resta=Op1-Op2
Final

Inicio
CalcularMultiplicacion()
Multiplicacion=Op1*Op2
Final

Inicio
CalcularDivision()
Division=if (Op2 != 0)
{
Op1 / Op2;
}
else
{
return -1;
}
Final

Inicio
CalcularMayor()
Mayor=if (Op1 >= Op2)
{
Op1=Mayor;
}
else
{
Op2=Mayor;
}
Final

Inicio
CalcularMenor()
Menor=if (Op1 <= Op2)
{
Op1=Menor;
}
else
{
Op2=Menor;
}
Final

Inicio
ImprimirSuma()
Print "Operacion Aritmetica"
Print "Operando1",Op1
Print "Operando2",Op2
Print "Suma:",Suma
Final

Inicio
ImprimirResta()
Print "Operacion Aritmetica"
Print "Operando1",Op1
Print "Operando2",Op2
Print "Resta:",Resta
Final

Inicio
ImprimirMultiplicacion()
Print "Operacion Aritmetica"
Print "Operando1",Op1
Print "Operando2",Op2
Print "Multiplicacion:",Multiplicacion
Final

Inicio
ImprimirDivision()
Print "Operacion Aritmetica"
Print "Operando1",Op1
Print "Operando2",Op2
Print "Division:",Division
Final

Inicio
ImprimirMayor()
Print "Operacion Aritmetica"
Print "Operando1",Op1
Print "Operando2",Op2
Print "Mayor:",Mayor
Final

Inicio
ImprimirMenor()
Print "Operacion Aritmetica"
Print "Operando1",Op1
Print "Operando2",Op2
Print "Menor:",Menor
Final







PRACTICA 11 PROBLEMA 1:
Pseudocodigo:
Inicio
Largo=0.0 double
Ancho=0.0 double
Area=0.0 double
Perimetro =0.0 double
LeerDatoLargo()
CalcularArea()
CalcularPerimetro()
ImprimirArea()
ImprimirPerimetro()
final

Inicio
LeerDatoLargo()
Print "Largo Del Rectangulo:"
read Largo
Print "Ancho Del Rectangulo:"
read Ancho
final

Inicio
CalcularArea()
Area=Largo*Ancho
Final

Inicio
Calcular Perimetro()
Perimetro= (2*Largo)+(2*Ancho)
Final

Inicio
ImprimirArea()
print "datos Rectangulo"
print "largo=",Largo
print "ancho=", Ancho
print "Area0",Area
Final

Inicio
ImprimirPerimetro()
Print "Datos Rectangulo"
Print "largo=", Largo
Print "ancho=", Ancho
Print "Perimetro=",Perimetro
Final























sábado, 20 de noviembre de 2010

Practica 10

PRACTICA 10 PROBLEMA 1(A):
a)Escriba un programa que considere un arreglo bidimensional llamado VAL de 3 x 4. Despliegue por separado el total de cada renglón.
Pseudocodigo:
1.-Inicio
val[3,4] int
Suma=0 int
R=0 int
C=0 int
for(R=0 to 2 step R=R+1)
{
for (C = 0 to 3 step C=C+1)
{
print "Introduce Dato:"
read val[R, C]
}
}
for (R = 0 to 2 step R=R+1)
{
Suma = 0;
for (C = 0 to 3 step C=C+1)
{
Suma = Suma + Val[R, C];
}
Print "La Suma Del Renglon ",R
Print "Suma
}
fin.
PRACTICA 10 PROBLEMA 1(B):
B) Despliegue por separado el total de cada columna.
Pseudocodigo:
1.-Inicio
val[3,4] int
Suma=0 int
R=0 int
C=0 int
for(R=0 to 2 step R=R+1)
{
for (C = 0 to 3 step C=C+1)
{
print "Introduce Dato:"
read val[R, C]
}
}
for (C = 0 to 3 step C=C+1)
{
Suma = 0;
for (R = 0 to 2 step R=R+1)
{
Suma = Suma + Val[R, C];
}
Print "La Suma De La Columna Es ",C
Print "Suma
}
fin.
PRACTICA 10 PROBLEMA 1(C):
C) Imprimir la columna y renglon con mayor valor.
Pseudocodigo:
1.-Inicio
val[3,4] int
Suma=0 int
Posr=0 int
Posc=0 int
Mayor=0 int
Mayorc=0 int
R=0 int
C=0 int
for (R = 0 to 2 step R=R+1)
{
for (C = 0 to 3 step C=C+1)
{
Print "Introduce Dato:"
Read Val[R, C]
}
}
for (R = 0 to 2 step R=R+1)
{
Suma = 0;
for (C = 0 to 3 step C=C+1)
{
Suma = Suma + Val[R, C];
}
if (Suma > Mayor)
{
Mayor = Suma;
PosR = R;

}
}
for (C = 0 to 3 step C=C+1)
{
Suma = 0;
for (R = 0 to 2 step R=R+1)
{
Suma = Suma + Val[R, C];
}
if (Suma > MayorC)
{
MayorC = Suma;
PosC = R;
}
}
Print "El Renglon " , PosR , "Tiene La Mayor Suma " , Mayor
print "La Columna", posc ",tiene la mayor posicion", Mayorc
Print "Suma
}
fin.
PRACTICA 10 PROBLEMA 1(D):
D) Imprimir La columna y el renglon con menor valor.
Pseudocodigo:
1.-Inicio
val[3,4] int
Suma=0 int
Posr=0 int
Posc=0 int
Menor=0 int
Menorc=0 int
R=0 int
C=0 int
for (R = 0 to 2 step R=R+1)
{
for (C = 0 to 3 step C=C+1)
{
Print "Introduce Dato:"
Read Val[R, C]
}
}
for (R = 0 to 2 step R=R+1)
{
Suma = 0;
for (C = 0 to 3 step C=C+1)
{
Suma = Suma + Val[R, C];
}
if (Suma {
Menor = Suma;
PosR = R;

}
}
for (C = 0 to 3 step C=C+1)
{
Suma = 0;
for (R = 0 to 2 step R=R+1)
{
Suma = Suma + Val[R, C];
}
if (Suma < Menorc)
{
MenorC = Suma;
Posc = C;
}
}
Print "El Renglon " , PosR , "Tiene La Menor Suma " , Menor
print "La Columna", posc ",tiene la menor posicion", Menorc
Print "Suma
}
fin.

Practica 9

PRACTICA 9 PROBLEMA 1:
Suponga que desea leer una lista de n cantidades en punto flotante y calcular la media. Calcular la desviación de cada uno de los valores respecto a la media, usando la formula Di= Xi - media
donde X representa cada una de las cantidades, i=0,1,2...n-1 y media la media calculada
Pseudocodigo:
1.-Inicio
n=0 int
I=0 int
suma=0.0f
print "n=?"
read n
x[n] float
d[n] float
for (I=0 to n-1 step I=I+1)
{
print "dato:",(I+1)
read x[I]

suma=suma+x[I]
}
media= suma/n
print "la media es:",media
for (I=0 to n-1 step I=I+1)

{
d[I] =x[I]-media

}
print "elementos desciacion
for (I=0 to n-1 step I=I+1)

{
print x[I], " ",d[I]
}
fin
Nota: en el visual del 9.1 falto desplegar elementos.


PRACTICA 9 PROBLEMA 2:
Escriba un programa que especifique tres arreglos unidimensionales denominados corriente,resistencia y voltios. Cada arreglo debe ser capaz de almacenar 10 elementos. Introduzca valores para los arreglos corriente y resistencia. Los datos introducidos en el arreglo voltios debe ser el producto de los valores correspondientes en los arreglos corriente y resistencia( entonces voltios[i]=corriente[i]* resistencia[i]). Después de introducir todos los datos, despliegue la siguiente salida:
Corriente Resistencia Voltios

Despliegue el valor correcto debajo de cada encabezo de columna.
Pseudocodigo:
1.-Inicio
voltios[10] int
corriente[10] int
resistencia[10] int
for(I=0 to 9 step I=I+1)
{
print "corriente",(I+1),":"
read corriente[I]
print "resistencia",(I+1),":"
read resistencia[I]
voltios[I]=corriente[I]*resistencia[I]
}
print "corriente resistencia voltios"
for(I=0 to 9 step I=I+1)
{
print "corriente[I]",",resistencia[I]", ",voltios[I]"
}
fin.
PRACTICA 9 PROBLEMA 3:
Escriba un programa para inicializar los siguientes números en un arreglo llamado pendientes: 17.24, 25.63, 5.94, 33.92, 3.71, 32.84, 35.93, 18.24, 6.92. El programa debe localizar los valores máximo y mínimo en el arreglo.
Pseudocodigo:
1.-Inicio
pendientes[9]={17.24, 25.63, 5.94, 33.92, 3.71, 32.84, 35.93, 18.24, 6.92} double
I=0 int
maximo=pendientes[o] double

minimo=pendientes[o] double
for(I=0 to 8 step I=I+1)
{
if(pendientes[I] >maximo)
{
maximo=pendientes[I]
}
if(pendientes[I]<>{
minimo=pendientes[I]
}
}
print "El maximo valor es:", maximo
print "El minimo valor es:", minimo
fin.


miércoles, 17 de noviembre de 2010

Practica 8

PRACTICA 8 PROBLEMA 1:
Escriba un programa para introducir 10 números enteros en un arreglo llamado Numeros . Al introducir cada número, súmelo a un total. Después de introducir todos los números, despliegue los números y el promedio.
Pseudocodigo:
1.- Inicio:
numeros[10] int
suma=0 int
prom=0.0 double
i=0 int
for(i=0 to 9 step i=i+1)
{
print "Dato ="
Read numeros[i]
suma=suma+numeros[i]
}
prom=suma/10.0
Print "Listado de numeros"
for(i=0 to 9 step i=i+1)
{
Print numero[i]
}
Print "El promedio es: ",prom
Fin.




PRACTICA 8 PROBLEMA 2(A):
A) Escriba un programa para introducir 10 números enteros en un arreglo llamado emax y encuentre el máximo valor introducido. El programa debe contener sólo una gaza y el máximo debe determinarse al introducir los valores de los elementos del arreglo.(Sugerencia establezca el mayor número igual al primer elemento del arreglo, el cual debe ser aportado antes de la gaza que se utilizará para introducir los demás valores del arreglo).
Pseudocodigo:
1.- Inicio:
emax[10] int
mayor=0 int
i=0 int
Print "Dato 10"
Read emax[0]
mayor=emax[0]
for(i=1 to 9 step i=i+1)
{
Print "Dato "
Read emax[i]
if(emax[i]>mayor)
{
mayor=emax[i]
}
}
print "El valor maximo es:"mayor
Fin.
PRACTICA 8 PROBLEMA 2(B):
B) Repita el ejercio a pero siga el rastro del máximo elemento del arreglo y del número del índice para el máximo. Despues de desplegar los números, imprima estos dos mensajes:
El valor máximo es:
Este es el elemento numero _____ en la lista de numeros.
Pseudocodigo:
1.- Inicio:
emax[10] int
mayor=0 int
i=0 int
pos=0 int
Print "Dato 10"
Read emax[0]
mayor=emax[0]
for(i=1 to 9 step i=i+1)
{
Print "Dato "
Read emax[i]
if(emax[i]>mayor)
{
mayor=emax[i]
pos=i
}
}
print "el valor maximo es:", mayor
print "este es el elemento:",(pos+1),"en la lista de numeros"
Fin.
PRACTICA 8 PROBLEMA 2 (C):
C) Repita el ejercicio b, pero haga que el programa localice el menor de los datos introducidos.
Pseudocodigo:
1.- Inicio:
emax[10] int
menor=0 int
i=0 int
pos=0 int
Print "Dato 10"
Read emax[0]
mayor=emax[0]
for(i=1 to 9 step i=i+1)
{
Print "Dato "
Read emax[i]
if(emax[i]< menor)
{
menor=emax[i]
pos=i
}
}
print "El dato menor es:", menor
print "se encuentra en la posicion:",pos
Fin.




PRACTICA 8 PROBLEMA 3(A):
A) Haga un programa para generar 20 números aleatorios y almacenarlos en un arreglo.Encontrar el maximo valor y del número del índice para el máximo.
Pseudocodigo:
1.- Inicio
Numero[20] int
mayor=0 int
I=0 int
Posicion=0 int
for(I=1 to 19 step I=I+1)
{
print "numero=",Numero[I]
if(Numero
[I] >mayor)
{
mayor =
Numero[I]
}
}
print "el valor mayor es:", mayor
print "la posicion es:", Posicion
fin.





PRACTICA 8 PROBLEMA 3(B):
B) Repita el ejercicio (a), pero haga que el programa localice el menor de los datos generados aleatoriamente.
Pseudocodigo:
1.-Inicio
Numero[20] int
menor=0 int
I=0 int
Posicion=0 int
for(I=1 to 19 step I=I+1)
{
print "numero=",Numero[I]
if(Numero
[I]< menor)
{
menor =
Numero[I]
}
}
print "el valor menor es:", menor
print "la posicion es:", Posicion
fin.



lunes, 1 de noviembre de 2010

Proyecto Unidad II

Proyecto Unidad II:
namespace Proyecto_Unidad_II
{
public partial class Form1 : Form
{
int libres;
int Equipo1, Equipo2, Equipo3, Equipo4;
int Nc;
int Piezas1,Piezas2,Piezas3,Piezas4;

public Form1()
{

InitializeComponent();
checkBox1.Enabled = false;
checkBox2.Enabled = false;
checkBox3.Enabled = false;
checkBox4.Enabled = false;
Equipo1 = 5;
Equipo2 = 4;
Equipo3 = 6;
Equipo4 = 5;
Nc = 0;
Piezas1 = Piezas2 = Piezas3 = Piezas4 = 0;
listBox1.Items.Add(" Lista De Equipos");
listBox1.Items.Add("Equipo 1: Osiloscopio: 5 Piezas");
listBox1.Items.Add("Equipo 2: Fuente De Poder: 4 Piezas");
listBox1.Items.Add("Equipo 3: Multimetro: 6 Piezas");
listBox1.Items.Add("Equipo 4: Generador De Señales: 5");

}

private void button1_Click(object sender, EventArgs e)
{
Nc = int.Parse(textBox1.Text);
switch (Nc)
{
case 09210920:
textBox2.Text = "Garcia Perez Eduardo Antonio";
libres = 1;

break;
case 09210908:
textBox2.Text = "Lopez Plascencia Sergio";
libres = 1;

break;

case 09210909:
textBox2.Text = "Lopez Perales Gerardo";
libres = 1;
break;
case 09210910:
textBox2.Text = "Vasquez Picasso Marco Antonio";
libres = 1;

break;
case 09210911:
textBox2.Text = "Trujillo Hernandez Carlos";
libres = 1;
break;

default:
textBox2.Text = "Error En El Numero De Control";
libres = 2;

break;
}
if (libres == 1)
{
checkBox1.Enabled = true;
checkBox2.Enabled = true;
checkBox3.Enabled = true;
checkBox4.Enabled = true;
listBox2.Items.Add("Nombre:" + textBox2.Text);
}

}

private void button2_Click(object sender, EventArgs e)
{

textBox4.Text = Equipo1.ToString();
textBox5.Text = Equipo2.ToString();
textBox6.Text = Equipo3.ToString();
textBox7.Text = Equipo4.ToString();
Piezas1 = int.Parse(textBox8.Text);
Piezas2 = int.Parse(textBox9.Text);
Piezas3 = int.Parse(textBox10.Text);
Piezas4 = int.Parse(textBox11.Text);

if (checkBox1.Checked)
{
Equipo1 = Equipo1 - Piezas1;
textBox4.Text =Equipo1.ToString();

if (Equipo1 > 0)
{

listBox2.Items.Add("Equipo1:Osiloscopio");
listBox2.Items.Add("El Usuario Retiro:" + Piezas1);



}
else
{
listBox2.Items.Add("Osiloscopios No Disponibles");
checkBox1.Enabled = false;
checkBox1.Checked = false;
}
}

if (checkBox2.Checked)
{


Equipo2 =Equipo2 - Piezas2;
textBox5.Text = Equipo2.ToString();


if (Equipo2 > 0)
{

listBox2.Items.Add("Equipo2:Fuente De Poder");
listBox2.Items.Add("El Usuario Retiro:" + Piezas2);

}

else
{
listBox2.Items.Add("Fuentes De Poder No Disponibles");
checkBox2.Enabled = false;
checkBox2.Checked = false;
}
}

if (checkBox3.Checked)
{

Equipo3 = Equipo3 - Piezas3;
textBox6.Text = Equipo3.ToString();


if (Equipo3 > 0)
{

listBox2.Items.Add("Equipo3:Multimetro");
listBox2.Items.Add("El Usuario Retiro:" + Piezas3);
Equipo3 = Equipo3 - 1;

}
else
{
listBox2.Items.Add("Multimetros No Disponibles");
checkBox3.Enabled = false;
checkBox3.Checked = false;
}
}

if (checkBox4.Checked)
{

Equipo4= Equipo4 - Piezas4;
textBox7.Text = Equipo4.ToString();

if (Equipo4 > 0)
{

listBox2.Items.Add("Equipo4:Genarador De Señal");
listBox2.Items.Add("El Usuario Retiro:" + Piezas4);

}
else
{
listBox2.Items.Add("Generadpres De Señales No Disponibles");
checkBox4.Enabled = false;
checkBox4.Checked = false;
}
}
listBox2.Items.Add("Fecha de salida: " + dateTimePicker1.Text);
listBox2.Items.Add("Hora de salida: " + textBox3.Text);
}








private void button3_Click(object sender, EventArgs e)
{
textBox1.Clear();
textBox2.Clear();
textBox4.Focus();
textBox5.Focus();
textBox6.Focus();
textBox7.Focus();
textBox8.Clear();
textBox9.Clear();
textBox10.Clear();
textBox11.Clear();
listBox2.Items.Clear();
checkBox1.Checked = false;
checkBox2.Checked= false;
checkBox3.Checked= false;
checkBox4.Checked = false;
}

private void button4_Click(object sender, EventArgs e)
{
Close();
}

private void timer1_Tick(object sender, EventArgs e)
{
textBox3.Text =DateTime.Now.Hour.ToString("D2") + ":" + DateTime.Now.Minute.ToString("D2") + ":" + DateTime.Now.Second.ToString("D2");

}



private void Form1_Load(object sender, EventArgs e)
{
timer1.Start();
}
}
}


Proyecto Elaborado Por:
Garcia Perez Eduardo Antonio.
Lopez Plascencia Sergio.

sábado, 30 de octubre de 2010

Practica 7

Problema 6:
Una serie geometrica esta determinada por la siguiente formula:
a+ar+ar^2+ar^3+...+ar^n-1
donde:
a=es el promer termino
r=es la proposicion comùn
n=es el numero de terminos de la serie.
utilizando esta informacion escriba un programa que utilize una gaza while para desplegar cada elemento y calcule la suma de la serie geometrica donde:
a=1
r=0.5
n=10
Asegurese que el programa despliege el valor del calculo.

Pseudocodigo 7.6:
Inicio
termino=0.0 double
suma=0.0 double
N?i int
a=i int
r=0.5 double
while(N<=10)
{
termino=a*math.pow(r,(n+1))
print termino, " "
suma= suma+termino
N=N+1
}
print "La Suma De La Serie Geometrica Es:",suma
final .

Problema 5:
Escriba un programa que invierta los dígitos de un número positivo entero. Por ejemplo, si se intruce 8735, debe mostrar el número 5378. (Sugerencia: utilice una instrucción do que elimine y despliegue continuamente el dígito de unidades del número. Si la variable num contiene inicialmente el número introducido, el dígito de unidades se obtiene como (num % 10). Después de que se muestra el dígito de unidades, se divide el numero entre 10 para establecer el número de la siguiente interacción. De tal manera, (8735 % 10) es 5 y (8735/10) es 873. La instrucción do debe continuar siempre que el número restante no sea cero.

Pseudocodigo 7.5:
Inicio
num=0 int dig=0 int
Print " numero=?"
read Num
do
{
dig=num%10
num=num/10
print dig
}
while(num!=0);
fin.
Problema 4:
La cantidad de clientes que llegan a un concurrido banco de Nueva York se puede calcular utilizando la función de probabilidad de Poisson
P(x)=ʎ^x e^-ʎ/ x!

donde x=cantidad de clientes que llegan por minuto;ʎ = promedio de clientes que llegan por minuto, y e=número de Euler (2.71828). Por ejemplo, si el promedio de clientes que llegan al banco es de tres por minuto, ʎ es igual a tres.tanto. Por tanto, la probabilidad de que un cliente llegue en cualquier minuto es
P(x=1)=3^1 e^-3/1! =0.149561

y la probabilidad de que dos clientes lleguen en cualquier minuto es
P(x=2)=3^2e^-3/2!=0.224454

Utilizando la función de probabilidad de Poisson, escriba un programa que calcule y despliegue la probabilidad de que un número variable de uno a diez clientes lleguen en cualquier minuto, cuando el promedio de llegada es de 3 clientes por minuto.

Pseudocodigo 7.4:
Inicio
P= 0double
x=0 int
fact=0 int
j=0 int
Print " cantidad de clientes P(x)
for(x=1 to 10 step x=x+1)
{
p=math.pow(3,x)*math.exp(-3)
fact=1
for(j=1 to x step j=j+1)
{
fact=fact*j
}
Px=p/fact
print "x," ",Px
}
fin
Problema 3:
Escribir un programa que lea un entero y un carácter. La salida debe ser un rombo dibujado con el carácter dado y de anchura máxima dada por el entero leído. El programa debe repetir el proceso hasta que la anchura sea cero.

Pseudocodigo 7.3:
Inicio
anchura=0 int
caracter=0 string
linea =" "; int
I=0 int
pasada =0 int
print "introduzca un caracter"
read caracter
print "introduzca anchura"
read anchura
for (pasada=1 to anchura step pasada=pasada+1)
{
linea =" ";
for(I=1 to pasada step I=I+1)
{
linea =linea+caracter
print " ", linea
}
}
for(pasada=anchura-1 to 0 step pasada=pasada-1)
{
linea= linea +caracter
{
for(I=pasada to 0 step I=I-1)
{
print " ", linea
}
}
fin.

Problema 2:
Modificar el problema 2 de la practica 7 para que el usuario introduzca la cantidad de resultados de los ensayes en cada experimento. Escriba el programa de tal forma que se pueda introducir un número diferente de resultados de ensayes en cada experimento.

Pseudocodigo 7.2:
Inicio
suma=0.0 double
E=0, P=0, N=0 int
Prom =0 double
Ensaye =0 double
for (E=1 to 4 step E=E+1)
{
suma=0
print "Experimanto Numero:", E
print "cantidad de ensaye"
read N
for (P=1 to N step P=P+1)
{
print "ensaye",P,"=?"
read Ensaye
suma=suma+Ensaye
}
prom=Suma/N
print "El experimento ",E,"su Promedio es:",Prom
}
fin.
Problema 1:
Suponga que se realizaron cuatro experimentos, cada uno de los cuales tiene seis resultados de ensaye. Los resultados de cada experimento se muestra abajo. Escriba un programa que utilice una gaza anidada para calcular y desplegar el promedio de los resultados del ensaye para cada experimento.
Resultados del primer experimento: 23.2 31 16.9 27 25.4 28.6
Resultados del segundo experimento: 34.8 45.2 27.9 36.8 33.4 39.4
Resultados del tercer experimento: 19.4 16.8 10.2 20.8 18.9 13.4
Resultados del cuarto experimento: 36.9 39 49.2 45.1 42.7 50.6

Pseudocodigo 7.1:
Inicio
suma=0.0 double
E=0, P=0 int
Prom =0 double
Ensaye =0 double
for (E=1 to 4 step E=E+1)
{
suma=0
print "Experimanto Numero:", E
for (P=1 to 6 step P=P+1)
{
print "ensaye",P,"=?"
read Ensaye
suma=suma+Ensaye
}
prom=Suma/6
print "El experimento ",E,"su Promedio es:",Prom
}
fin.

Practica 6

problema 5:
Un modelo para calcular la población mundial, en miles de millones de personas, está dado por la siguiente ecuación
población = 4.88(1 + e^0.02t) donde t es el tiempo en años(i=0 representa a enero de 1985 y t=1 representa a enero de 1986). Utilizando está formula, escriba un programa que muestre una tabla anual de población de enero de 1994 hasta enero de 2005.

Pseudocodigo 6.5:
t=9 int
Año =1994 int
poblacion =0.0 double
print "Tabla Anual De Poblacion"
print "Año Poblacion"
for(t=9 to 20 step t=t+1)
{
poblacion =4.88(1+exp(0.02*T))
print "Enero de" Año," ",Poblacion
Año=Año+1
}
fin.
Problema 4:
Escriba un programa que seleccione y despliegue el valor máximo como la ubicación de éste de 10 números introducidos cuando se ejecute el programa.

Pseudocodigo 6.4:
Inicio
Maximo=0 int I=0 int Numero =0 int pos=0 int
for(I=1 to 8 step I=I+1)
{
print "numero=?"
read numero
if(numero>maximo)
{
maximo=numero
pos =I
}
}
print " el numero mayor es:",maximo
print "La Posicion es:",pos
fin.

Problema 3:
Escriba un programa que seleccione y despliegue el valor máximo de 10 números que serán introducidos cuando se ejecute el programa.(Sugerencia: utilice una gaza for con una instrucción de entrada y un if dentro de la gaza.)
Pseudocodigo 6.3:
Inicio
Maximo=0 int I=0 int Numero =0 int
for(I=1 to 8 step I=I+1)
{
print "numero=?"
read numero
if(numero>maximo)
{
maximo=numero
}
}
print " el numero mayor es:",maximo
fin.

Problema 2:
La secuencia de Fibonacci es 0,1,1,2,3,5,8,13,... donde los primeros dos elementos son el 0 y 1, y cada elemento posterior es la suma de los dos elementos anteriores; es decir Fib(n)= Fib[n-1] + fib[n-2] . Utilizando está información, escriba un programa que calcule el número enésimo en una secuencia de Fibonacci, donde el usuario introduzca n al programa , interactivamente.Por ejemplo, si n=6, el programa debe desplegar el valor 5.

Pseudocodigo 6.2:
Inicio
N1=0,N2=1 int
nuevo=0 int
N=0 int
contador=2 int
print "Numero de terminos=?"
read N
contar =2
print "terminos de la serie Fibonacci"
print n1," ",N2
while(contador <=N)
{
nuevo =N1+N2
print "nuevo"
N1=N2
N2=Nuevo
contador = contador +1
}
fin.

Problema 1:
Una serie aritmética está determinada por la siguiente fórmula
a + (a + d) + (a + 2d) + (a + 3d)+.......+ ((a + (n -1)d))
donde a es el primer término, d es la difrencia común y n es el número de términos que han de sumarse. Utilizando esta información escriba un programa que utilice una gaza while para desplegar cada elemento y determinar la suma de la serie aritmética donde a=1, d= 3 y n=100. Asegúrese de que el programa despliegue el valor que calculó.

Pseudocodigo 6.1:
Inicio:
a=1 int
d=3 int
n=100 int
suma=0 int
termino=0 int
Print "Terminos de la serie geometrica"
while(contador<=n)
{
termino=(a+(contador-1)*d)
Print termino,"+"
suma=suma+termino
contador=contador +1
}
Print "La suma de la serie geometrica es"´suma
Fin.