Practica 5

Problema 1
Inciso  (a)

Pseudocodigo

Inicio

i, cpar, cimpar, n, valor   int

cpar=0

cimpar=0

write "Introduzca cantidad de valores"

read n

for (i=1 to N, step i=i+1)

{

write "Introduzca un valor: "

read valor

if (valor%2==0)

then

cpar=cpar+1

else

cimpar=cimpar+1

}

write "Cantidad total de pares = ",cpar

write "Cantidad total de impares = ",cimpar

Fin

Codigo 

Inciso (b)

Pseudocodigo

Inicio

n,i,mayor, dato

i=1

write "Cuantos datos = "

read n

write "introduce un numero"

read mayor

i=i+1

while (i<=n)

{

write "Introduces un numero"

read dato

if (dato>mayor)

then 

mayor=dato

i=i+1

}

write "El dato mayor es = ", mayor

Fin

Codigo

Inciso (c)

Pseudocodigo

Inicio

n,i,menor, dato

i=1

write "Cuantos datos = "

read n

write "introduce un numero"

read menor

i=i+1

while (i<=n)

{

write "Introduces un numero"

read dato

if (dato<menor)

then 

menor=dato

i=i+1

}

write "El dato menor es = ", menor

Fin

Codigo

Inciso (d)

Pseudo codigo

Inicio

i, cant, suma, N, valor, prom   Real

cant=0

suma=0

write "Introduce cantidad de valores: "

read N

for (i=1 to N, step i=i+1)

{

write "Introduces un valor: "

read valor

cant= cant+1

suma = suma + valor

}

prom=suma/cant

write "Promedio final de valores = ", prom

Fin

Codigo

PROBLEMA 2

Diagramade flujo

Codigo

PROBLEMA 3

Pseudocodigo

Inicio

c, f1, f2, i  real

write "Introduzca valor inicial de grados farenheit "

read f1

write "Introduzca valor final de grados farenheit"

read f2

for (i=f1 to f2,  step i=i+1)

{

c=(5.0/9.0)*(i-32.0)

write "Farenheit = ", i,"  Celsius = ", c

}

Fin

Codigo

PROBLEMA 4

Pseudocodigo

Incio

f, c1, c2, i  real

write "Introduzca valor inicial de grados celsius "

read c1

write "Introduzca valor final de grados celsius"

read c2

for (i=c1 to c2,  step i=i+1)

{

f=(9.0/5.0)*i+32.0

write "Celsius = ", i,"  Farenheit = ", f

}

Fin

Codigo

PROBLEMA 5

Pseudocodigo

Inicio

a, s, n, sumaf  Real

a=1

n=0

sumaf=0

write "Serie Geometrica"

write "a + ar + a(r^2) + ... + a[r(n-1)]

while (n<10)

{

s=a * pow(0.5,n)

sumaf = sumaf + s

write "Termino ",(n-1), " = ", s

n=n+1

}

write "sumatoria  = ",sumaf

Fin

codigo

PROBLEMA 6

Diagrama de flujo

Codigo