Algoritmos y Lenguaje de programación

TECNOLOGICO NACIONAL DE PUEBLA

INSTITUTO TECNOLOGICO DE PUEBLA[pic 1][pic 2]

Materia:

Algoritmos y Lenguaje de programación. 

Horario:

Martes y jueves de 17:00-19:00 Hrs.

Profesor:

José Alfonso Pérez Cordero.

Alumno:

Emmanuel Arturo López Luna.

[pic 3]

No. De Control:

16220703.

Carrera:

Ingeniería Industrial.

Puebla, Puebla a 6 de diciembre del 2018.

Algoritmo1.

Solicitar el valor de uno de los lados de un cuadrado.

Calcular el área y perímetro.

Mostrar el área y perímetro.

Proceso Algoritmo1

        // Primer Algoritmo

        // Elaboro: Emmanuel Arturo Lopez Luna

        Escribir 'Calcular área y perimetro de un cuadrado'

        Escribir 'Dame el valor de la base'

        Leer lado

        Área<-(lado*lado)

        Peri<-4*lado

        Escribir 'El área del cuadrado es ',Área

        Escribir 'Y el perimetro es ',Peri

FinProceso

Algoritmo2.

Solicitar el valor de la base y altura de un rectángulo.

Calcular su área y su perímetro.

Mostrar su área y su perímetro.

Proceso Algoritmo2

        //Elaboró: Emmanuel Arturo Lopez Luna

        Escribir "Calcular área y perímetro de un rectángulo"

        Escribir "Dame el valor de la base"

        Leer Base

        Escribir "Dame el valor de la altura"

        Leer Altura

        Área<-Base*Altura

        Perímetro<-(2*Base)+(2*Altura)

        Escribir "El área del rectángulo es ", Área

        Escribir "Y el perímetro es ", Perímetro         

FinProceso

Algoritmo3.

Solicitar el radio de un círculo.

Calcular su área y perímetro.

Mostrar su área y su perímetro calculado.

Proceso Algoritmo3

        //Elaboro: Emmanuel Arturo Lopez Luna

        Escribir "Calcular área y perímetro de un circulo"

        Escribir "Dame el valor del radio"

        Leer Radio

        Área<-PI*Radio^2

        Perímetro<-PI*(2*radio)

        Escribir "El área del circulo es ", Área

        Escribir "Y el perímetro es ", Perímetro

FinProceso

Algoritmo4.

Dado los valores de a, b y c obtener el resultado de la formula. (x1 y x2)           [pic 4]

Proceso Algoritmo4

        //Emmanuel Arturo Lopez Luna

        Escribir "Formula General"

        Escribir "Dame el valor de a "

        Leer a

        Escribir "Dame el valor de b "

        Leer b

        Escribir "Dame el valor de c "

        Leer c

        Aux <- Rc(b^2 - 4*a*c )

        x1 <- (-b + Aux) / (2*a)

        x2 <-(-b - Aux) / (2*a)

        Escribir "X1 es ", x1

        Escribir "X2 es ", x2        

FinProceso

Algoritmo5.[pic 5]

Solicitar d, D y a de un rombo.

Calcular únicamente área y perímetro.

Mostrar área y perímetro.

Proceso Algoritmo5

        //Emmanuel Arturo Lopez Luna

        Escribir "Calcular el area y el perimetro de un rombo"

        Escribir "Dame el valor de la diagonal mayor "

        Leer dmayor

        Escribir "Dame el valor de la diagonal menor "

        Leer dmenor

        Escribir "Dame el valor de un lado "

        Leer a

        area <- (dmenor * dmayor)/2

        perimetro <- 4*a

        Escribir "El area del rombo es ", area

        Escribir "El perimetro del rombo es ", perimetro        

FinProceso

Algoritmo 6.[pic 6]

Solicitar la b, h y a de un paralelogramo.

Calcular área y perímetro.

Mostrar área y perímetro.

Proceso Algoritmo6

        //Emmanuel Arturo Lopez Luna

        Escribir "Calcular el area y el perimetro de un paralelogramo"

        Escribir "Dame el valor de la base "

        Leer b

        Escribir "Dame el valor de la altura "

        Leer h

        Escribir "Dame el valor del lado menor "

        Leer a

        area <- (b * h)

        perimetro <- 2*b + 2*a

        Escribir "El area del paralelogramo es ", area

        Escribir "El perimetro del paralelogramo es ", perimetro        

FinProceso

Algoritmo7.

Resolver la siguiente fórmula para encontrar el valor de x.

...