Fundamentos De Programação
Trabalho Escolar: Fundamentos De Programação. Pesquise 862.000+ trabalhos acadêmicosPor: isabellerochaq • 19/11/2013 • 438 Palavras (2 Páginas) • 258 Visualizações
Estudo Dirigido II- Respostas
Questão 1
algoritmo "semnome"
// Função :
// Autor :
// Data : 18/6/2013
// Seção de Declarações
var
num_voo: vetor [1..37] de inteiro
qtd_lugares: vetor [1..37] de inteiro
i: inteiro
cliente, voo: inteiro
inicio
// Seção de Comandos
i<- 1
para i de 1 ate 37 faca
escreva("Digite o numero do voo: ")
leia(num_voo[i])
escreval("")
escreva("Digite a quantidade de lugares para o voo ",num_voo[i], " : " )
leia (qtd_lugares[i])
limpatela
fimpara
escreval("Inicio da Consulta de Lugares disponiveis e Reserva de Voos")
enquanto cliente <> 9999 faca
escreva("Digite número da carteira identidade do Cliente: ")
leia(cliente)
escreval("")
escreva("Digite o numero do Voo para pesquisa de disponibilidade: ")
leia(voo)
para i de 1 ate 37 faca
se voo = num_voo[i] entao
escreval("Numero do Voo ", num_voo[i], " possui ", qtd_lugares[i], " lugares disponíveis")
seqtd_lugares[i] <> 0 entao
escreval("Reserva efetuada com sucesso para o Cliente Nº ", cliente)
escreval("Quantidade de lugares disponíveis para o Voo ", num_voo[i], " agora é :", qtd_lugares[i] - 1)
qtd_lugares[i] <- qtd_lugares[i] - 1
senao
escreval("O Voo Nº ", num_voo[i]," não possui lugares disponíveis! Por favor escolha outro Voo.")
fimse
fimse
fimpara
fimenquanto
fimalgoritmo
inicio
// Seção de Comandos
fimalgoritmo
Questão 2
algoritmo "semnome"
// Função :
// Autor :
// Data : 18/6/2013
// Seção de Declarações
var
matriz: vetor [1..4, 1..3] de inteiro
i: inteiro
linha, coluna: inteiro
soma: vetor [1..3] de inteiro
custo_armazem: vetor [1..3] de inteiro
custo_produto: vetor [1..3] de inteiro
maior: inteiro
inicio
// Seção de Comandos
para linha de 1 ate 3 faca
para coluna de 1 ate 3 faca
escreva("Escreva o estoque o Armazem ", linha, " para o produto ", coluna, " : ")
leia (matriz[linha,coluna])
...