Practicas 3.


Programa 1.
Programa para calcular el promedio de calificaciones de un estudiante, los datos disponibles para la lectura son nombre del estudiante y cuatro exámenes presentados. La informacion que se debe imprimir es el nombre, promedio y un mensaje aprobando si tiene 70 o mas, o reprobado en caso contrario.

Algoritmo:

1.-Definicion de variable

Nombre [15] char

Cal1,cal2,cal3,cal4 promedio read

2.- Lectura de los nombres alumno y 4 calificaciones

Print “nombre del alumno”

Read nombre

Print “introdusca calificación=”

Read cal1

Print “introdusca calificación=”

Read cal2

Print “introdusca calificación=”

Read cal3

Print “introdusca calificación=”

Read cal4

3.- Calcular promedio

Promedio=(cal1+cal2+cal3+cal4)/4

4.-Desplegar nombre promedio

Print ”nombre del alumnno= ”,nombre

Print “promedio= ”, promedio

5.-Verificar si el promedio es mayor >70 para desplegar apravado en caso de que no lo sea imprimir  reprobado

If(promedio>=70)

Print “aprobado”

Else

Print “reprobado”

6.-Final.

Programa 2.

Programa que lea dos numeros diferentes de tipo enteros y que imprima el numero mayor y el numero menor.

Servo codigo:

1 inicio

Num1,num2i nt

Print “introducer dos numeros diferentes”

Print “numero 1=”

Read num1

Print “numero 2=”

Read num2

If (num1>num2)

{

Print “numero mayor= ”,num1

Print”numero menor= ”, num2

}

Else

{

Print “numero mayor= ”,num2

Print”numero menor= ”, num1

}

Fin

Programa 3.

Programa que lea 3 números diferentes de tipo entero y que imprima el numero mayor y el numero menor.

Servo codigo:

1.-inicio

num1,num2,num3, menor=0,mayor=99999999 int

print "introducir 3 numeros diferesntes"

print "numero 1=”

read num1

print "numero 2="

read num2

print "numero 3="

readnum3

if(num1>num2)

{

mayor=num1

menor=num2

}

else

{

mayor=num2

menor=num1

}

if(num3>mayor)

{

mayor=num3

}

else

{

if(num3<menor)

{

menor=num3

}

}

Print “Mayor= ", mayor

Print “Menor= ", menor

Fin

Programa 4.

Programa que lea 4 números diferentes de tipo entero y que imprima el numero mayor y el numero menor.

Algoritmo del programa:
1.- Inicio
Declarar variables
x1,x2,x3,x4,mayor,mayo1,mayorf,menor,menor1,menorf int

2.- Imprimir mensaje y lectura de variables:

PRINT "Introducir cuatro numeros enteros distintos"
PRINT "Introducir el primer numero"
READ x1

PRINT "Introducir el segundo numero"
READ x2

PRINT "Introducir el tercer numero"
READ x3

PRINT "Introducir el cuarto numero"
READ x4

3.- Compara si x1>x2
if(x1>x2)
{
mayor=x1
menor=x2
}
else
mayor=x2
menor=x1
}

4.- comprar si x3>x4

if(x3>x4)
{
mayor1=x3
menor1=x4
}
else
mayor1=x4
menor1=x3
}


5.- comparar mayores
if(mayor>mayor1)
{
mayorf=mayor
}
else
{
meyorf=mayor1
}

6.- comparar menores

if(menor>menor1)
{
menorf=menor
}
else
{
menorf=menor1
}

7.- Imprimir resultados
PRINT "el numero mayor es= ",mayorf
PRINT "el numero menor es= ",menorf

8.- Fin

Programa 5.

Programa para calcular e imprimir el precio de un terreno del cual se tienen los siguientes datos introducidos por teclado, Largo, Ancho, precio por metro cuadrado, si el terreno obtiene mas de 500 metros cuadrados se le hace descuento de 5%, si es mayor a mil metros se le hace un 10%.

Servo-código del problema:
1- Inicio
largo,ancho,precio,area,x,total real

PRINT "Largo=?"
READ largo

PRINT "ancho=?"
READ ancho

PRINT "precio por metro cuadrado=?"
READ precio

area=largo*ancho
x=area*precio
PRINT "El area del terreno es de ",area," metros cuadrados"

if(area>500)
{
total=x-(x*.5)
PRINT "El costo total del terreno es de ",total," pesos"
}
else
{
If(area>1000)
{
total=x-(x*.10)
PRINT""El costo total del terreno es de ",total," pesos"
}
}

Final

Programa 6.

Programa que permita leer un ángulo en radianes o en grados y que imprima las siguientes funciones trigonométricas seno, coseno, tangente, cotangente, secante, y cosecante. Debe preguntar el valor del ángulo y dependiendo si es en grados o radianes los cálculos deben hacerse de una u otra forma.

Servo-código del problema:

1)Inicio
tipo_angulo     int
angulo,radian,Sen,Cos,Tan     long double
PRINT "Introducir el valor del angulo",endl
PRINT "Angulo: "
Read angulo
PRINT "Por favor escoja en que introdujo el angulo si en grados o radianes"
PRINT "1) Grados\n2)Radianes"
Read tipo_angulo
if(tipo_angulo==1)
{radianes=(angulo*3.1416)/180.0}
else
{radian=angulo}
PRINT "Angulo"
if(tipo_angulo==1)
{PRINT " en grados"}
else
{PRINT " en radianes"}
Sen=sin (radian)
Cos=cos (radian)
Tan=tan (radian)
PRINT "sen(",angulo,"): ",Sen,endl
PRINT "cos(",angulo,"): ",Cos,endl
PRINT "tan(",angulo,"): ",Tan,endl
PRINT "cot(",angulo,"): ",1/Tan,endl
PRINT "csc(",angulo,"): ",1/Sen,endl
PRINT "sec(",angulo,"): ",1/Cos,endl

final