Practica 10

Problema 9 pagina 274

Inicio

AL, a=11.7e-6 real

L=7365, to=0, tf int

Print "Temperatura final (celcius) Longitud Expandida"

for(tf=5 to tf<=40 step tf=tf+5)

{

AL=a*L*(tf-to);

Print tf, AL

Fin

Problema10  Pagina274

Inicio

a=2, t int

prob real

Print "Tiempo \t Probabilidad de la llamada"

for(t=1 to t<=10 step t=t+1)

{

prob=1-exp(-t/a)

Print t, "  ", prob

}

Fin

 

Problema 12 página 275

Inicin

 g=32 int

d=0.0,t,interval real

Print "Tiempo  Distancia en el intervalo   Distancia total"

Fo r(t=0 to t<=10 step t=t+1)

{

intervalo=(1.0/2.0)*g*pow(t,2)

d=d+intervalo

Print " ", t, "   ", interval, “   ", d

}

Fin

Problema 1a Pagina 292

Inicio

Calif int

do

{

Print "calificacion = "

Read calif

if(calif>=0 && calif<=100)

   {

   Print calif

   }

   }

while (calif>=0 && calif<=100);

Fin

Problema 1b Pagina 292

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 1c Página 292

Inicio

Calif int

do

{

Print "calificacion = "

Read calif

if(calif>=0 && calif<=100)

   {

Print calif

   }

   else

{

Print “calificacion invalida”

   }

   while (calif!=999);

Fin

 Problema 1d Página 292

Inicio

calf, 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

Problema 2 Pagina 292

Inicio

Calf int

suma=0.0, n, promedio real

do

{

Print "calificacion=”

Read calf

if (calf>=0&&calf<=100)

{

Print calf

suma=suma+calf

n=n+1

}

else

{

Print "calificacion invalida"

}

}

while (calf!=999)

promedio=suma/n

Print "el promedio es=", promedio

Fin

 Problema 3 Pagina 292

Inicio

Variable int

Print "Introduze un numero "

 Read variable

 do

 {

Print (variable%10)

 variable=variable/10

 }

 while(variable!=0)

Fin