algoritmo "Elaborar algortmo"
var
a,b,c :numerico
inicio
escreval("Informe valor a:")
leia (a)
escreval("Informe valor b:")
leia (b)
escreval("Informe valor c:")
leia (c)
se (a>b) entao
se (a>c) entao
escreva ("a e o maior")
senao
escreva ("c é o maior")
fimse
se (b>c) entao
escreva (" b e o maior")
senao
escreva("c e o maior")
fimse
fimse
fimalgoritmo
Nenhum comentário:
Postar um comentário