*FOR :
-> Variables
for i 0 to 3
for j = it 1 to 2
if (d(i)>d(j))then
temporal = D(i)
D(i)=D(j)
D(j) = temporal
end if
next j
next i


*
for i = 0 to 2
for_1 = i +1 to 3
if ( D (i)>D(j) ) then
temporal = D (i)
D(j)= temporal
end if
next j
nexti

*SELEC CASE
(haga segun el caso)
*select case variable
case valor 1..
case valor 2..
case valor 3..
end select

select case figura
case"circulo"
dibuje_circulo()
case"cuadrado":
dibuje_cuadrado()
case"triangulo":
dibuje_triangulo()
end select