Practica 2 Unidad 1.

Problema 1. 

Programa que muestra Menu de restaurant y el costo de la orden. 

Inicio

c1= 35.0,c2= 40.0,c3= 25.0, c4= 45.0, c5= 12.0, c6= 20.0, total= 0.0 Real

p1,p2,p3,p4,p5,p6 Int

Print ''La fonda de Chito''

Print ''1.Huevo con tocino ($35.00)''

Print ''2.Chilaquiles ($40.00)''

Print ''3.Hot cakes ($25.00)''

Print ''4.Menudo ($45.00)''

Print ''5.Cafe ($12.00)''

Print ''6.Jugo de naranja ($20.00)''

Read p1,p2,p3,p4,p5,p6

total= (c1*p1)+(c2*p2)+(c3*p3)+(c4*p4)+(c5*p5)+(c6*p6)

Print ''total= '', total

Fin

Problema 2. 

Programa para calcular distancia en millas de cierta distancia al trascurrir un tiempo determinado.

Inicio 

 velocidad_viaje= 55, tiempo_trans= 2.5, distancia= 0.0 Real

Print '' Calcula la distancia donde ''

 Print '' velocidad_viaje= 55 millas/horas

 Print ''tiempo_trans= 2.5 horas

 distancia= velocidad_viaje * tiempo_trans

Print '' distancia= '', distancia, ''millas''

 Print ''Datos introducidos por teclado''

 Print '' velocidad_viaje= ?''

Read velocidad_viaje

Print ''tiempo_trans= ?''

Read tiempo_trans

distanncia= velocidad_viaje*tiempo_trans

 Print ''distancia= '', distancia, '' millas''

 Fin

Problema 3.

Programa para calcular grados farenheint o celsius segun el caso.

Inicio

   fahren = 98.6, celsius = 0.0 Real

Print ''Para una temperatura fahrenheit de 98.6 grados''

celsius = 5.0/9.0 * ( fahren - 32.0 )

Print ''La temperatura celsius equivalente es de '', celsius, ''grados''

Print ''Datos introducidos por el usuario''

Print ''Grados fahrenheit = ?''

Read fahren

celsius = 5.0/9.0 * ( fahren - 32.0 )

Print ''Para una temperatura fahrenheit de '', fahren,''grados''

Print ''La temperatura celsius es de '', celsius, ''grados''

Fin

Problema 4.

Programa para calcular un polinomio de segundo orden

Inicio

a,b,c,x  Int.

Print ''Este programa calcula un polinomio de segundo orden ax^2+bx+c''

Print ''Introducir los siguientes valores''

Print ''a = ?''

Read a

Print ''b = ?''

Read b

Print ''c = ?''

Read c

Print ''x = ?''

Read x

Resultado = (a*x*x)+(b*x)+c

Print ''Polinomio de segundo orden,a,''*'',x,''*'',x,''+'',b,''*'',x,''+''c,''='',resultado

Fin

Problema 5

Programa para calcular pendiente de una linea unida por dos puntos

Inicio

x1= 3, y1= 7, x2= 8, y2=12 Int

Pendiente Int

Pendiente = ( y2 - y1 )/ ( x2 - x1 )

Print '' Coordenadas ( 3,7 ) y ( 8,12 )"

Print ''Pendiente = ", pendiente

Print '' Introduce valores coordenadas''

Print ''x1,y1= ''

Read x1,y1

Print ''x2,y2= ''

Read x2,y2

pendiente= ( y2 - y1 )/( x2 - x1 )

Print ''pendiente= '', pendiente

Fin

Problema 6. 

Programa para calcular distancia avanzada con velocidad y combustible dados. 

Inicio

millas, galones, mpg. Real

Print "Introduzca las millas recorridas = "

Read millas

Print "Introduzca los galones de gasolina consumidos = "

Read galones 

mpg = millas/galones

Print "millas recorridas   galones consumidos   mpg /n"

Print millas, "/t",galones,"/t",mpg,"/n"

Fin