practica 9

problema 1

  n = 0, f = 1, suma = 0, c1 = 0, c2 = 0 int

print"cantidad de Términos de la serie (1 +2 +3 .... n:!"

read n

print "Términos de la serie"

for(c1 = 1 to  n step c1 = c1 +1)

{f = 1;

for(c2 = c1 to 1 step c2 = c2-1)

{f= f * c2;}

print f,"   "

if (c1 == n)

{print"="

}

else

{print"+"

}

suma = suma + f}

print ,suma

fin

Problema 2


inicio
 suma=1,f=1.0,termino=0 real


 x=0,c1=0,c2=0 int
print "Suma de los valores del 1 al 20:"
print"Introducir valor de x: "
read x
print"1+"
for(c1=1 to20  stepc1=c1+1)
{f=1.0;
for(c2=c1 to0 step c2=c2-1)
{f=f*c2
}
print(pow(x,c1)/f)
suma=suma+(pow(x,c1)/f)
if(c1==20)
{print<<"="}
else
{print"+"
}}
print,suma
fin

Problema .3


inicio


 numlineas,c1=0,c2=0 int
print"numero de lineas=?"
read,numlineas
for(c1=1 to numlineas stepc1=c1+1)
{
for(c2=1;c2<=c1;c2=c2+1)
{print" * "}
print,endl
}
fin

problema 4

inicio


 qu=0,di=0,ne=0,pe=0,precio,cambio=0,total=0 int
print"\tttienda de solo un precio"
print"\t\n            pague con 1 dollar"
print"\n\t    precio del articulo"
read precio
cambio=(100-precio)
while(cambio/25)
{
qu=cambio/25
cambio=cambio-(qu*25)
}
while(cambio/10)
{
di=cambio/10
cambio=cambio-(di*10)
}
while(cambio/5)
{
ne=cambio/5
cambio=cambio-(ne*25)
}
pe=cambio
total =100-precio


print"cambio en monedas= "
print"monedas de quarter= ",qu
print"monedas de dime= ",di
print"monedas de necko= ",ne
print"monedas de pennies= ",pe
print"total= ",total
fin

problema 5






inicio

 nombre[15] char

 tipofumi=0,numbre=0,precio=0,n=0,tipo1=0,tipo2=0,tipo3=0,tipo4=0 int

 costo=0,mayor=0,mayor1=0,mayor2=0,hec=0 int

print"\t\tprecio de fumigacion por tipos"

print"\n\tTipo 1 fumigacion contra las malas hiervas $10 pesos x hec"

print"\n\tTipo 2 fumigacion contra las langostas $20 pesos por hec"

print"\n\tTipo 3 fumigacion contra gusanos $30 pesos por hec"

print"\n\tTipo 4 fumigacion todo lo anterior a $50 pesos x hec"

do

{

print"nombre "

read nombre

print"tipo de fumigacion "

read tipofumi

print"hectareas "

read hec

switch(tipofumi)

{

case 1:costo=10

tipo1=tipo1+1

break

case 2:costo=20

tipo2=tipo2+1

break

case 3:costo=30

tipo3=tipo3+1

break

case 4:costo=50

tipo4=tipo4+1

break

default:print"no existe"

if (hec>1000)

{precio=costo*hec*.05

}

if (hec<1000)

{ precio= costo*hec

}

if (hec>1500)

{precio=costo*hec*.10

print"costo ",costo

print"hectareas fumigadas ",hec

print"precio del area fumigada ",precio

print"decea introducir datos si 1 o no 2 "

read n

}

while (n==1)

if (tipo1>tipo2)

{mayor=tipo1

}

else

{mayor=tipo2

}

if (tipo3>tipo4)

{mayor1=tipo3}

else

{mayor1=tipo4

}

if (mayor>mayor1)

{mayor2=mayor

}

else

{mayor2=mayor1

}

print"tipo mas solicitado es ",mayor2