algoritmo del cuadrado

Proceso cuadrado
escribir "entre el
lado del cuadrado"
leer LADO
area<LADO*LADO
escribir "area del
cuadrado es"
escribir area
Fin Proceso