Question

) Faça um programa que leia 100 valores e no final, escreva o maior e o menor valor lido

Answer 1

Var
numero, maior, menor,i : inteiro
inicio// Seção de Comandos
escreva("Entre com o 1º numero: ")leia(numero)
menor<-numeromaior<-numero
para i de 2 ate 100 faca
escreva("Entre com o ",i,"º numero: ")leia(numero)
se numero>maior entaomaior<-numerofimse
se numero<menor entaomenor<-numerofimse
fimpara
escreval("O maior numero e:",maior)escreval("O menor numero e:",menor)

fimalgoritmo