PRACTICAS NUMERO 5

INSTITUTO TECNOLÓGICO DE TIJUANA                       MATERIA PROGRAMACIÓN ESTRUCTURADA

ING. ELECTRONICA

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)

PSEUDOCODIGO

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

DIAGRAMA DE 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