MAC113 - Introdução à Computação

gabarito da Lista de Exercícios 01: comando de repetição

1. Questao 0:
   1. apenas executar.
   2. 1. Resposta3b:

                   soma <- 0
                   i <-1
                   while(i <= 4){
                     valor <- as.numeric(readline("digite 1 numero:  "))
         	    soma <- soma + valor
                     i <- i + 1
         	  }		   
               

      2. programa:

          
                     n <- as.numeric(readline("digite n:  "))
                     for(i in(1:n)){
                       print(2*n - 2) #o eh positivo
         	    }		   
               

2. Questao 1:
   • apenas executa-lo.

3. Questao 2:
   • Certamente a Versão 3. A presença do par { e } e deslocamento de 2 casas de "print(i)" facilita visualmente que "print(i)" está dentro de comando de repetição for. Em outras palavras, a estrutura logica está bem mais claro visualmente.
   • Em R, se tiver apenas 1 comando dentro de comando de repetição, pode não ter { e }.
   • estilo obrigatório: Sempre deve usar { e } para comandos dentro de comando de repetição mesmo que seja 1 comando só. Este estilo vale também para comandos dentro de comando de seleção.

4. Questao 3:

   •  
                    n <- as.numeric(readline("digite n:  "))
     	       m <- as.numeric(readline("digite m:  "))
     	       prod <- 1
                    for(i in(1:m)){
     	         prod <- prod * n
     	       }              
     	       print(paste0(n, "elevado" m, "=", prod) 
          

5. Questao 4:

   •  
                    n <- as.numeric(readline("digite n:  "))
     	      prod <- 1
                    for(i in(1:n)){
     	         prod <- prod * i
     	       }              
     	       print(paste0(n, "!=", prod) 
          

6. Questao 5:

   •  
                    n <- as.numeric(readline("digite n:  "))
     	       soma <- 0
                    for(i in(1:n)){
                      num <- as.numeric(readline("digite numero:  "))
     	         soma <- soma + num
     	       }
                    media <- soma /  n
     	       print(paste0("A media=  ", media))		
           

7. Questao 6:

   •  
                    n <- as.numeric(readline("digite n:  "))
                    for(i in(1:n)){
        	         print(2*n - 1)
     	       }