atividade 4

Prévia do material em texto

ALGORITMOS II 
 
ATIVIDADES DA AULA 04 
 
Para a construção dos algoritmos sugiro a utilização do programa Visualg, porém 
não é obrigatório. Todos os algoritmos desta atividade deverão ser enviados em um 
arquivo com um dos seguintes formatos: .doc, .docx ou .pdf. 
 
Atenção: Se você estiver usando o Visualg, as funções são encerradas pela palavra fimfuncao. 
Exemplo: 
funcao PORCENTAGEM_AUMENTO(salario: real) : real 
inicio 
se salario <= 1000.00 entao 
 retorne(0.1) 
 senao 
 se salario > 1000.00 E salario < 2000.00 entao 
 retorne(0.08) 
 senao 
 retorne(0.06) 
 fimse 
 fimse 
fimfuncao 
 
1. Faça um algoritmo que contenha uma função, onde passado um número inteiro n 
como parâmetro, calcula e retorna o valor de n elevado a terceira potência (n3). O 
valor n deverá ser informado pelo usuário no módulo principal, assim como o 
resultado também deverá ser mostrado no módulo principal. 
Algoritmo "Terceira Potencia" 
// Disciplina : Algoritmos 2 
// Professor : Marcos Alves Mariano 
// Descrição : Receber um numero inteiro e elevar a terceira potencia 
// Autor(a) : Fabiano Almeida de Castro 
// Data atual : 19/11/2021 
 
funcao CALCULO (numero:inteiro):inteiro 
 
retorne numero*numero*numero 
 
fimfuncao 
 
var 
 
 n, total: inteiro 
 
inicio 
 
 escreva("Informe o número inteiro: ") 
 leia(n) 
 total <- CALCULO(n) 
 escreva("O número ", n, " elevado a terceira potência é:", total) 
 
Fimalgoritmo 
2. Faça um algoritmo que contenha uma função, onde passado um valor em 
quilômetros por parâmetro, faça a conversão para milhas e retorne o resultado para 
o módulo principal para ser apresentado. Lembrando que 1 quilômetro equivale a 
aproximadamente 0,62 milhas. 
Algoritmo "Conversor KM" 
// Disciplina : Algoritmos 2 
// Professor : Marcos Alves Mariano 
// Descrição : Receber uma quilometragem e converter em milhas 
// Autor(a) : Fabiano Almeida de Castro 
// Data atual : 19/11/2021 
 
funcao CALCULO (numero:real):real 
 
retorne (numero * 62) / 100 
 
fimfuncao 
 
var 
 
 km, milhas: real 
 
inicio 
 
 escreva("Informe a quilometragem: ") 
 leia(km) 
 milhas <- CALCULO(km) 
 escreva(km, " Km convertido em milhas é:", milhas, " milhas") 
 
Fimalgoritmo