Buscar

Atividae 4 - Algoritmos II

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você também pode ser Premium ajudando estudantes

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você também pode ser Premium ajudando estudantes

Prévia do material em texto

ALGORITMOS II
ATIVIDADES DA AULA 04
ALUNO: RHUAN PABLO DA SILVA
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 "potencia"
Var
n,RESPfinal: inteiro
funcao potencia (x: inteiro): inteiro
var
RESP: inteiro
inicio
RESP <- x*x*x
retorne RESP
fimfuncao
Inicio
escreva ("Digite o valor de n: ")
leia(n)
RESPfinal <- potencia(n)
escreval ("O valor de ",n," elevado a 3 é de: ",RESPfinal)
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"
Var
km,milhas: real
funcao converter (x: real): real
var
RESP: real
inicio
RESP <- x*0.62
retorne RESP
fimfuncao
Inicio
escreva ("Digite o valor em Km: ")
leia(km)
milhas <- converter(km)
escreval ("O valor de ",km," km em milhas é de: ",milhas)
Fimalgoritmo

Outros materiais