Pessoal aqui estão os dois algoritmos:
algoritmo "
Exercicio 7"
// Função :
// Autor :
// Data : 18/01/2012
// Seção de Declarações
var
numeros:vetor[0..49] de inteiro
i,np,p:inteiro
inicio
// Seção de Comandos
para i de 0 ate 49 faca
//numeros[i]<-i*i*3+3*i-2
leia (numeros[i])
//escreval(numeros[i])
fimpara
escreval("Digite um numero!")
leia(np)
p<-0
para i de 0 ate 49 faca
se np=numeros[i] entao
p<-i
fimse
fimpara
se p<>0 entao
escreval("O elemento ",np," encontra-se na posição: ",p)
senao
escreval("O elemento ",np," não foi encontrado no vetor.")
fimse
fimalgoritmo
algoritmo "
Exercicio 6 "
// Função :
// Autor :
// Data : 18/01/2012
// Seção de Declarações
var resposta: vetor[0..19] de literal
i,rs,rn:inteiro
inicio
// Seção de Comandos
para i de 0 ate 19 faca
leia (resposta[i])
fimpara
escreval ("A 9ª pessoa respondeu ",resposta[8])
rs<-0
rn<-0
para i de 0 ate 9 faca
se resposta[i]="sim" entao
rs<-rs+1
fimse
fimpara
para i de 10 ate 19 faca
se resposta[i]="nao" entao
rn<-rn+1
fimse
fimpara
escreval("Respostas das 10 primeiras sim= ",rs)
escreval("Respostas das 10 últimas não= ",rn)
se rs>rn entao
escreval("A quantidade de respostas sim foi maior")
senao
se rs<rn entao
escreval("A quantidade de respostas Não foi maior")
senao
escreval("A quantidade de respostas sim e não foram iguais.")
fimse
fimse
fimalgoritmo
Valeu prof.
ResponderExcluirsoooooooooo!!! rs obrigado pela visita.
Excluir