ajuda em programação, linguagem PASCAL
Faça um algoritmo que leia, via teclado, 200 valores do tipo inteiro e os guarde na memória.
imprima todos os números pares que você leu.
imprima o menor valor existente no vetor.
imprima o maior valor existente no vetor.
imprima quantos dos valores do vetor são maiores que a média desses valores.
💡 4 Respostas
Rafael
var
valores: vetor[200] de inteiro
numero, soma, cont, i, : inteiro
media: real
inicio
cont<- 0
soma<-0
para i de 1 até 200 faça
leia valores
soma <- soma + valores
se ( (valores-(valores/2)*2)=0) então
escreva " os numeros pares são", valores
se ( valores > numero) entao
numero<- valores
fimse
fimse
fimpara
media <- soma/200
escreva" o numero maior é", numero
para i de 1 até 200 faça
se (valores< numero)entao
numero<- valores
se (valores> media) entao
cont<- cont +1
fimse
fimse
fimpara
escreva" o numero menor é", numero," a quantidade de valores que sao maiores que a media é", cont
fim
Veja se funciona assim.
Andre Smaira
O algoritmo em questão será:
var
valores: vetor[200] de inteiro
numero, soma, cont, i: inteiro
media: real
inicio
cont<- 0
soma<-0
para i de 1 até 200 faça
leia valores
soma <- soma + valores
se ( (valores-(valores/2)*2)=0) então
escreva " os numeros pares são", valores
se ( valores > numero) entao
numero<- valores
fimse
fimse
fimpara
media <- soma/200
escreva" o numero maior é", numero
para i de 1 até 200 faça
se (valores< numero) entao
numero<- valores
se (valores> media) entao
cont<- cont +1
fimse
fimse
fimpara
escreva" o numero menor é", numero,"
fim
Andre Smaira
O algoritmo em questão será:
var
valores: vetor[200] de inteiro
numero, soma, cont, i: inteiro
media: real
inicio
cont<- 0
soma<-0
para i de 1 até 200 faça
leia valores
soma <- soma + valores
se ( (valores-(valores/2)*2)=0) então
escreva " os numeros pares são", valores
se ( valores > numero) entao
numero<- valores
fimse
fimse
fimpara
media <- soma/200
escreva" o numero maior é", numero
para i de 1 até 200 faça
se (valores< numero) entao
numero<- valores
se (valores> media) entao
cont<- cont +1
fimse
fimse
fimpara
escreva" o numero menor é", numero,"
fim
Faça como milhares de estudantes: teste grátis o Passei Direto
Esse e outros conteúdos desbloqueados
16 milhões de materiais de várias disciplinas
Impressão de materiais
Agora você pode testar o
Passei Direto grátis
✏️ Responder
Para escrever sua resposta aqui, entre ou crie uma conta
Outros materiais
Perguntas relacionadas
Materiais relacionados
3 pág.
51 pág.
Compartilhar