by Maicol Stid Ramirez
Proceso algoritmos d<-rc(b*b+h+h) p<-z*(b+h) a<-b*h Escribir d Escribir p Escribir a
Proceso algoritmos d<-rc(b*b+h+h) p<-z*(b+h) a<-b*h Escribir d Escribir p Escribir a Less
