Algoritmo lê três números e põe em ordem crescente



// Função : ler 3 numeros e por em ordem crescente!
// Seção de Declarações
var
a,b,c : numerico
inicio
// Seção de Comandos
leia (a,b,c)
se (a=b) ou (b=c) entao
escreva ("Alguns ou todos os numeros sao iguais ")
senao

se (a<b) e (a<c) entao//a é menor
se (b<c) entao
escreva (a,b,c)
senao escreva (a,c,b)
fimse;
fimse;

se (b<a) e (b<c) entao//b é menor
se (a<c) entao
escreva (b,a,c)
senao escreva (b,c,a)
fimse
fimse

se (c<a) e (c<b) entao//c é menor
se (a<b) entao
escreva (c,a,b)
senao escreva (c,b,a)
fimse
fimse

fimse
fimalgoritmo

Nenhum comentário:

Postar um comentário