Proceso AreaRectangulo
DEFINIR base, altura, area , perimetro como real
Escribir "ingresar base: "
Leer base
escribir " ingresar altura: "
LEER ALTURA
area<-base*altura
perimetro<-2*(base+altura)
Escribir "EL AREA DEL RECTANGULO ES: ", area
Escribir "El PERIMETRO DEL RECTANGULO ES: " perimetro
FinPROCESO
Proceso AreaCirculo
DEFINIR radio, area, perimetro como real
Escribir "ingresar radio: "
Leer radio
area<-PI*radio*radio
perimetro<-2*pi*radio
Escribir "EL AREA DEL CIRCULO ES: ", area
Escribir "El PERIMETRO DEL CIRCULO ES: " perimetro
FinPROCESO
Proceso ejercicio1
DEFINIR a, b, suma como real
Escribir "ingresar elementos: "
Leer a,b
suma<-a+b
Escribir "La suma de los elementos es: ", suma
FinPROCESO