AMBIENTE ASA
decl
a
integer
decl
b
integer
decl
c
integer
-------------------------------------
leit
Insira uma número
a
leit
Insira uma número
b
leit
Insira uma número
c
se
(aa)e(c>a)e(c>b)
impr
a
1
impr
b
1
impr
c
1
end
senao
se
(aa)e(b>c)e(c>a)e(cb)e(aa)e(c>b)
impr
b
1
impr
a
1
impr
c
1
end
senao
se
(b>a)e(b>c)e(a>c)e(ab)e(a>c)e(bb)
impr
b
1
impr
c
1
impr
a
1
end
senao
se
(a>b)e(a>c)e(bc)e(c

    Source: geocities.com/br/jnejunior

               ( geocities.com/br)