tarea area y perimetro

Proceso calcularareayperimetro

Escribir "largo"

Leer l;

Escribir "ancho"

Leer a;

p<-(l*2)+(a*2);

a<-(l*a);

Escribir "area=",a;

Escribir "perimetro=",p;

FinProceso