[Resolvido][AJUDA]Como montar este algoritmo
2 participantes
Grupo Lógica de Programação :: Central de Ajuda (Programação) :: Seção de Ajuda :: Central de Ajuda [PORTUGOL/VISUALG]
Página 1 de 1
[Resolvido][AJUDA]Como montar este algoritmo
Leia uma sequência de números, que termina com um sinalizador (flag) igual a –999 que deve ser desprezado, seguindo os seguintes passos:
Leia um número até que seja lido o flag = -999;
Armazene a primeira leitura entre o menor e o maior;
A cada nova leitura, teste se o valor é menor que o valor da variável menor (novo menor, trocar) ou maior que a variável maior (novo maior, trocar)
Escreva o conteúdo de menor e de maior.
Leia um número até que seja lido o flag = -999;
Armazene a primeira leitura entre o menor e o maior;
A cada nova leitura, teste se o valor é menor que o valor da variável menor (novo menor, trocar) ou maior que a variável maior (novo maior, trocar)
Escreva o conteúdo de menor e de maior.
badboydasgatas- Novo no Fórum
- Mensagens : 1
Pontos : 4
Reputação : 0
Data de inscrição : 25/02/2013
Re: [Resolvido][AJUDA]Como montar este algoritmo
- Código:
algoritmo "semnome"
// Função : Leia uma sequência de números, que termina com um
//sinalizador (flag) igual a –999 que deve ser desprezado,
//seguindo os seguintes passos:
//Leia um número até que seja lido o flag = -999;
//Armazene a primeira leitura entre o menor e o maior;
//A cada nova leitura, teste se o valor é menor que o valor
//da variável menor (novo menor, trocar) ou maior que a variável
//maior (novo maior, trocar)
//Escreva o conteúdo de menor e de maior.
// Autor : Vanessa Thaisa
// Data : 05/09/2013
// Seção de Declarações
var
valor,menor,maior,novo:inteiro
inicio
// Seção de Comandos
escreva("Digite um valor: ")
leia(valor)
menor<-valor
maior<-valor
novo<-valor
enquanto (novo>-999) faca
se (novo < menor) entao
menor <- novo
fimse
se (novo > maior) entao
maior <- novo
fimse
escreva("Digite um novo valor: ")
leia(novo)
fimenquanto
escreval("Resultado")
escreval("Menor valor: ",menor)
escreval("Maior valor: ",maior)
fimalgoritmo
Vanessa Thaisa- Conselheiro
- Mensagens : 5
Pontos : 11
Reputação : 0
Data de inscrição : 03/07/2010
Idade : 37
Localização : Campo Grande - MS - Brasil
Tópicos semelhantes
» [Resolvido][Ajuda] em estruturas de dados
» [Resolvido]super Basico! Ajuda!
» [RESOLVIDO][Ajuda] 0001 - Numeros Inteiros - Soma dos Impares - Divisíveis por 3
» [RESOLVIDO][AJUDA]-0001 Soma de Valores e Media
» [Resolvido][AJUDA]solicitar a entrada de um valor numerico inteiro e apresente uma das seguintes menssagens (utilize o SE)
» [Resolvido]super Basico! Ajuda!
» [RESOLVIDO][Ajuda] 0001 - Numeros Inteiros - Soma dos Impares - Divisíveis por 3
» [RESOLVIDO][AJUDA]-0001 Soma de Valores e Media
» [Resolvido][AJUDA]solicitar a entrada de um valor numerico inteiro e apresente uma das seguintes menssagens (utilize o SE)
Grupo Lógica de Programação :: Central de Ajuda (Programação) :: Seção de Ajuda :: Central de Ajuda [PORTUGOL/VISUALG]
Página 1 de 1
Permissões neste sub-fórum
Não podes responder a tópicos
Qua 02 maio 2018, 16:32 por Kiku Maroto
» Apostila Completa de Logica de Programação com VisualG
Qua 18 Jan 2017, 07:52 por andreaniti
» Exercícios Visualg: Desafio
Ter 03 Jan 2017, 07:41 por andreaniti
» 40 Exercícíos em Visualg 3.0
Ter 03 Jan 2017, 07:34 por andreaniti
» hello world pascal!
Qui 24 Nov 2016, 07:25 por andreaniti
» “[Ajuda] encontrar o valor da incógnita”
Ter 27 Set 2016, 14:48 por sanzio_ce
» Quero Trabalhar com a Alura.
Ter 23 Ago 2016, 05:43 por Sergio Lucas
» Sobre Pascal
Sex 19 Ago 2016, 07:49 por Clayton Souza
» Apresentação Lazarus
Qui 18 Ago 2016, 03:16 por Clayton Souza
» Trabalhe conosco
Qua 17 Ago 2016, 13:19 por Sergio Lucas