Estruturas de repetição algoritmo
1) Resolva as questões abaixo usando os comandos: i) enquanto (...) faca;
ii) repita (...) até (...); iii) para (....) faca.
(Ex.: Resolva a letra (a) usando o comando enquanto (...) faca, depois
usando o comando repita (...) até (...), e, por fim, usando o comando para
(...) faca).
a) Faça um programa que leia um número inteiro N e depois imprima os N
primeiros números naturais ímpares.
Ex.: O usuário digita 4. Logo, os quatros primeiros números ímpares são:
1,3,5 e 7.
b) Faça um programa que leia as notas da prova 1, 2 e 3 de três alunos, e
imprima sua médias.
c) Faça um programa que leia um número do usuário, e retorne o fatorial
deste número (Questão vista em sala).
No programa Visualg
Soluções para a tarefa
Respondido por
1
a)algoritmo "Números ímpares"// Função :// Autor :// Data : 24/04/2016// Seção de Declaraçõesvarimp,i, N: inteiro
inicio// Seção de Comandosi <- 1imp <- 1leia(N)para i de 1 ate N passo 1 facaescreval(imp)imp <- imp+2fimpara
fimalgoritmo
b)
algoritmo "media"// Função :// Autor :// Data : 24/04/2016// Seção de Declarações varn1,n2,n3,media1,media2,media3: realcont: inteiroinicio// Seção de Comandos cont <- 0
repitaleia (n1)media1 <- media1 + n1/3cont <- cont +1ate cont = 3escreval ("Media do aluno 1: ",media1)
cont <-0repitaleia (n2)media2 <- media2 + n2/3cont <- cont +1ate cont = 3
escreval ("Media do aluno 2: ",media2)
cont <-0repitaleia (n3)media3 <- media3 + n3/3cont <- cont +1ate cont = 3
escreval ("Media di aluno 3: ",n3)
fimalgoritmo
c)
algoritmo "fatorial"// Função :// Autor :// Data : 24/04/2016// Seção de Declaraçõesvarfat,n: inteiroinicio// Seção de Comandosfat <- 1leia(n)repitafat <- fat * nn <- (n-1)ate n = 1;
escreval ("Fatorial: ",fat)
fimalgoritmo
inicio// Seção de Comandosi <- 1imp <- 1leia(N)para i de 1 ate N passo 1 facaescreval(imp)imp <- imp+2fimpara
fimalgoritmo
b)
algoritmo "media"// Função :// Autor :// Data : 24/04/2016// Seção de Declarações varn1,n2,n3,media1,media2,media3: realcont: inteiroinicio// Seção de Comandos cont <- 0
repitaleia (n1)media1 <- media1 + n1/3cont <- cont +1ate cont = 3escreval ("Media do aluno 1: ",media1)
cont <-0repitaleia (n2)media2 <- media2 + n2/3cont <- cont +1ate cont = 3
escreval ("Media do aluno 2: ",media2)
cont <-0repitaleia (n3)media3 <- media3 + n3/3cont <- cont +1ate cont = 3
escreval ("Media di aluno 3: ",n3)
fimalgoritmo
c)
algoritmo "fatorial"// Função :// Autor :// Data : 24/04/2016// Seção de Declaraçõesvarfat,n: inteiroinicio// Seção de Comandosfat <- 1leia(n)repitafat <- fat * nn <- (n-1)ate n = 1;
escreval ("Fatorial: ",fat)
fimalgoritmo
felipevictor67:
desculpe, copiei direto do compilador e acabou quebrando as linhas, por causa do tab :(
Perguntas interessantes