Ejercicio en clase 19 de septiembre de 2013

1. Un sistema de ecuaciones lineales x=(ce-bf)/(ae-bd) y=(af-cd)/(ae-bd). Diseñar un programa que lea dos conjuntos de coeficientes (a,b,c,d,e,f) y mostrar los datos x,y.

Algoritmo:

1.Inicio
2.Definir variables a,b,c,d,e,f,x,y real
3.Leer variables a,b,c,d,e,f
write "Introduzca los siguientes valores:"
read a
read b
read c
read d
read e
read f
4.Calcular x,y
x=(c*e-b*f)/(a*e-b*d)
y=(a*f-c*d)/(a*e-b*d)
5.Desplegar
write "Los valores son:"
write "x:",x
write "y:",y
6.Fin

Pseudocódigo:

Inicio
Float a,b,c,d,e,f,x,y
write "Introduzca los siguientes valores:"
read a
read b
read c
read d
read e
read f
x=(c*e-b*f)/(a*e-b*d)
y=(a*f-c*d)/(a*e-b*d)
5.Desplegar
write "Los valores son:"
write "x:",x
write "y:",y
6.Fin

2. Escriba un programa que dibuje el rectángulo siguiente:
* * * * * * * * * * * * *
*                                  *
*                                  *
*                                  *
* * * * * * * * * * * * *
El programa debe leer una palabra de cinco letras y se imprima al centro del rectángulo.

Algoritmo:
1.Inicio
2. Definir variables
 m[5] char
3.Lectura de datos
write"Escriba su mensaje"
read m
write"* * * * * * * * * * * * *"
write"*                             *"
write"*      "read m"         *"
write"*                             *"
write"* * * * * * * * * * * * *"
4.Fin

Pseudocodigo
 m [5] char
write "Escriba su mensaje"
read m
write"* * * * * * * * * * * * *"
write"*                            *"
write"*      "read m"         *"
write"*                             *"
write"* * * * * * * * * * * * *"
fin

3. Calcular el área de un triángulo mediante la fórmula:
Donde p es es el semiperímetrop=(a+b+c)/2 donde a,b,c son los tres lados del triángulo.

Algoritmo:

1.Inicio
2.Declaracion de variables
area,semip,a,b,c    real
3.Lectura de datos
write"Introduce el semiperimetro"
read semip
write"Introduce el lado a"
read a
write"Introduce el lado b"
read b
write"Introduce el lado c"
read c
4. Calcular
area= (semip*(semip-a)*(semip-b)*(semip-c))^(1/2)
5. Desplegar
write"El area del triangulo es de:",area
6. Fin

Pseudocodigo:

Inicio
area,semip,a,b,c    real
write"Introduce el semiperimetro"
read semip
write"Introduce el lado a"
read a
write"Introduce el lado b"
read b
write"Introduce el lado c"
read c
area= (semip*(semip-a)*(semip-b)*(semip-c))^(1/2)
write"El area del triangulo es de:",area
Fin

4. Escriba un programa en el que se introduzcan como datos de entrada la longitud de un perímetro de un terreno, expresado con tres números enteros que representen hectómetros, decámetros y metros respectivamente. Se ha de escribir, con un rótulo representativo, la longitud en decímetros.

Algoritmo:

1.- Inicio
2.- Definir variables
hec, dec, m, deci int
3.- Lectura de variables
Write"Introduzca el perimetro del terreno en metros"
Read m
4.- Realizar calculos
hec= m/100
dec=m/10
deci=m*10
5.- Dezplegar datos
Write"El terreno mide:"
Write"Hectometros ",hec, " hec
Write"Decamatros ",dec, " dec"
Write"Metros ",m, " m"
Write"Decimetros ",deci, " dm"
5.- Fin


Pseudocódigo:

Inicio
hec, dec, m, deci int
Write"Introduzca el perimetro del terreno en metros"
Read m
hec= m/100
dec=m/10
deci=m*10
Write"El terreno mide:"
Write"Hectometros ",hec, " hec
Write"Decamatros ",dec, " dec"
Write"Metros ",m, " m"
Write"Decimetros ",deci, " dm"
Fin