Beatriz Dorin

Exercício proposto: Cadastrar o gabarito da prova, em seguida cadastra as respostas de três alunos e calcula a nota de cada um, exibindo o resultado final com as notas e a média da turma. Algoritmo "CorrigindoProvas" Var respaluno: vetor[1..5] de Caractere resp: vetor[1..5] de Caractere media: Real cont, cont2: Inteiro aluno: vetor[1..3] de Caractere TotNota1: Real TotNota: vetor[1..3] de Real Inicio EscrevaL (" ÁREA DO PROFESSOR ") EscrevaL ("-------------------------------") EscrevaL ("PASSO 01 - Cadastro de Gabarito") EscrevaL ("-------------------------------") Para cont <- 1 ate 5 faca Escreva ("Questão ",cont,": ") Leia (resp[cont]) FimPara LimpaTela Para cont <- 1 ate 3 faca TotNota[cont] <- 0 EscrevaL (" ÁREA DO PROFESSOR ") EscrevaL ("-------------------------------") EscrevaL ("PASSO 02 - Cadastro de Provas ") EscrevaL ("-------------------------------") EscrevaL (" ALUNO ", cont, " ") EscrevaL ("-------------------------------") Escreva ("Nome do aluno: ") Leia (aluno[cont]) Escreval ("RESPOSTAS DA PROVA DE ", aluno[cont]) TotNota1 <- 0 Para cont2 <- 1 ate 5 faca Escreva ("Questão ", cont2, ": ") Leia (respaluno[cont2]) Se (respaluno[cont2] = resp[cont2]) então TotNota1 <- TotNota1 + 2 FimSe FimPara TotNota[cont] <- TotNota1 LimpaTela FimPara Escreval (" NOTAS FINAIS ") Escreval (" ---------------- ") Para cont <- 1 ate 3 faca Escreval (aluno[cont]:15, TotNota[cont]) Escreval ("-------------------") media <- (TotNota[1] + TotNota[2] + TotNota[3]) / 3 FimPara Escreval (" MÉDIA DA TURMA: ", media) Fimalgoritmo

@Midori Eu não consegui compreender.

Olá pessoal! Estou postando mais um exercício do curso de algoritmos do Guanabara, este em especial, pois fiz em tempo recorde e sem me estressar Algoritmo "TorneioDeFutebol" Var time: vetor[1..3] de Caractere cont, cont2: Inteiro Inicio Escreval ("------------------------") Escreval (" CAMPEONATOS DE FUTEBOL ") Escreval ("------------------------") Escreval (" ") Para cont <- 1 ate 3 faca Escreva ("Nome do ", cont, "º Time: ") Leia (time[cont]) FimPara LimpaTela Escreval ("------------------------") Escreval (" CAMPEONATOS DE FUTEBOL ") Escreval ("------------------------") Escreval (" ") Para cont <- 1 ate 3 faca Para cont2 <- 1 ate 3 faca Se (time[cont] <> time[cont2]) então Escreval (time[cont]:15, " [ ] x [ ] ", time[cont2]) FimSe FimPara FimPara Fimalgoritmo

@Midori Obrigada pela dica! Muuito obrigada novamente @Simon Viegas ! Adorei as dicas, realmente alguns pontos passaram despercebido, falta de prática e atenção rsrs' Já até fiz as correções para que eu consiga analisar isso nos próximos.

Algoritmo "analisadordevalores" Var Cont, N, TOTNUL, TOTN, TOTDIV, TOTPAR: Inteiro TOTMED: Real Inicio TOTNUL <- 0 TOTN <- 0 TOTDIV <- 0 TOTPAR <- 0 Para Cont <- 1 ate 5 faca Escreva ("Digite o", Cont, "º valor desejado: ") Leia (N) TOTN <- TOTN + N TOTMED <- TOTN/5 Se (N%5=0) então TOTDIV <- TOTDIV + 1 Se (N=0) então TOTNUL <- TOTNUL + 1 FimSe FimSe Se (N%2=0) então TOTPAR <- TOTPAR + N FimSe FimPara Escreval (" ") Escreval (" ") Escreval (" ANALISADOR DE VALORES ") Escreval (" ") Escreval (" -------------------------------------") Escreval (" A soma entre os valores é : ", TOTN) Escreval (" -------------------------------------") Escreval (" A média entre os valores é: ", TOTMED) Escreval (" -------------------------------------") Escreval (" Valores divisíveis por cinco: ", TOTDIV) Escreval (" -------------------------------------") EscrevaL (" Valores nulos: ", TOTNUL) Escreval (" -------------------------------------") EscrevaL (" A soma dos valores pares é: ", TOTPAR) Escreval (" -------------------------------------") Escreval (" ") FimAlgoritmo

Obrigada pelo feedback @Simon Viegas!! Bom pra me atentar das próximas!

Algoritmo "sequenciafibonacci" Var anterior, atual, proximo, N: Inteiro Inicio anterior <- 0 atual <- 0 proximo <- 1 Escreval (" Sequencia de Fibonacci: 15 primeiros números ") Escreval (" ") Escreva (atual) Para N <- 1 ate 14 faca Escreva (proximo) anterior <- atual atual <- proximo proximo <- atual + anterior FimPara Escreval (" ") Fimalgoritmo

Muuuito obrigada @André Ferreira1301

Algoritmo "SELETORDEPESSOAS" Var S, Y, Resp: Caractere C, I, MTOTAL, FTOTAL: Inteiro Inicio MTOTAL <- 0 FTOTAL <- 0 Repita Escreval (" ") Escreval (" --------------------------------------") Escreval (" SELETOR DE PESSOAS ") Escreval (" --------------------------------------") Escreva (" Qual sexo? [M/F] ") Leia (S) Escreva (" Qual idade? ") Leia (I) Escreval (" Qual a cor do cabelo?") Escreval (" [1] Preto ") Escreval (" [2] Castanho") Escreval (" [3] Loiro") Escreval (" [4] Ruivo") Leia (C) Se (S = "m") e (I >= 18) e (C = 2) então MTOTAL <- MTOTAL + 1 FimSe Se (S = "f") e ((I >= 25) e (I <= 30)) e (C = 3) então FTOTAL <- FTOTAL + 1 FimSe MTOTAL <- MTOTAL + 0 FTOTAL <- FTOTAL + 0 Escreva (" DESEJA CONTINUAR? [Y/N] ") Leia (Resp) Ate (Resp = "n") Escreval (" ------------------------------------------------------------") Escreval (" RESULTADO FINAL ") Escreval (" ------------------------------------------------------------") Escreval (" ") Escreval ("Total de homens, maiores de 18 anos, com cabelo castranho: ", MTOTAL) Escreval ("Total de mulheres, com idade entre 25 e 30 anos, loiras: ", FTOTAL) Fimalgoritmo

Vou postar só porque fiquei felizinha de finalmente ter conseguido fazer! Algoritmo "SUPERCONTADOR" Var N, Cont: Inteiro Inicio Repita Escreval (" ") Escreval ("___________________________") Escreval (" ") Escreval (" MENU: ") Escreval (" ") Escreval (" [ 01 ] Contar de 1 até 10 ") Escreval (" [ 10 ] Contar de 10 até 1") Escreval (" [ 03 ] SAIR") Escreval ("__________________________") Leia (N) Escolha N CASO 1,10 Se (N=1) então Cont <- 1 Repita Escreva (Cont) Cont <- Cont + 1 Ate (Cont > 10) FimSe Se (N=10) então Cont <- 10 Repita Escreva (Cont) Cont <- Cont - 1 Ate (Cont < 1) FimSe FimEscolha Ate (N=3) Fimalgoritmo

Placa de vídeo x8 em uma entrada x16

Gente eu tenho uma placa-mãe x16 e gostaria de saber se haveria algum problema se colocasse uma x8, não acho a x16 que eu queria. obs: Ambas 3.0