MAC113 - Introdução à Computação

Gabarito da Lista de Exercícios 04: função

1. Questao 1:

          fat  <- function(n){
            prod <- 1
   	 i <- 1			     
            while(i <= n){
              prod <- prod * i
   	   i <- i + 1       
            }
            return(prod)
         }	
        

2. Questao 2: No RStudio logo depois da sua definição da função fat, escreva 1 programa que recebe número inteiro estritamente positivo num (1 < num <= 15) e imprime os fatoriais de 1, 2,...num.

         #definição da função fat										       
         num <- as.numeric(readline("digite num: "))
         for(i in(1:num)){
           result <-fat(i) 
           print(paste0("fat(", i, ") = ", result))
   			
       

3. Questao 3: Apenas segur a receita.

4.        classifica  <- function(nota){
               if(5 <= nota){      
                 result <- "aprov"
               }else if(3 <= nota){
                    result <- "em recup"
               }else{
                    result <- "reprov"
   	   }
            return(result)
         }	
        

5. Questao 5: faça 1 programa em R que lê n e em seguida lê as notas de n e para cada aluno imprime sua classificação usando a função classifica acima.

         n <- as.numeric(readline("digite num: "))
         for(i in(1:num)){
   	nota <- as.numeric(readline("digite nota: "))	  
           result <-classifica(nota) 
           print(paste0(nota, result))
   			
       

6. Questao 6 (não é de função mas de repetição): ver a primeira parte de aula sobre repetição dentro de repetição