Resolva os algoritmo utilizando pseu do codigo e o visual g
5. Faça um programa que calcule a conversão monetária de Real para Dólar. O usuário informa o valor da cotação do dólar (ex.: 2,12) e quanto em real deseja converter (ex. 150,00). O programa exibe quantos dólares valem os reais informados.
6. Faça um programa que calcula o novo valor do salário de um funcionário. O usuário informa o salário atual (ex. 750,00) e o percentual do reajuste (ex. 13,5 %).
7. Faça um programa que calcula o tempo (em anos) que uma pessoa irá demorar para poupar R$ 1.000.000,00 (Um Milhão de Reais). O usuário informa o salário mensal e o total de despesas mensais.
8. Faça um programa que leia um valor inteiro e mostre na tela uma sequencia incluindo os dois números que vem antes, o número digitado, e os dois números que vem depois dele. Ex.: digitou 5; o programa mostra 3 4 5 6 7.
9. Crie um programa que pergunta o nome do usuário e o ano de nascimento do usuário e calcula qual idade ele tem (ou terá, se ainda não fez aniversário neste ano) em 2014. Ex.: Nome = Carlos, Ano = 1980. O programa mostra a mensagem: “Carlos tem 34 anos”.
Soluções para a tarefa
Resposta:
algoritmo "ex05"
var
cot_dolar, valor_real, valor_dolar: Real
inicio
EscrevaL(" CONVERSOR DE MONETÁRIO")
Escreval("=========================================================")
Escreva(" Informe a cotação do dolar: ")
Leia(cot_dolar)
Escreva(" Quanto em Real deseja converter? ")
Leia(valor_real)
valor_dolar <- valor_real/cot_dolar
Escreval
Escreval(" O valor de R$",valor_real:4:2," reais equivalem a U$",valor_dolar:4:2," dolares!")
fimalgoritmo
algoritmo "ex06"
var
sal_atual, percentual, reajuste,sal_futuro: Real
inicio
Escreval(" REAJUSTE SALARIAL")
Escreval("===============================================")
Escreva(" Informe se salário atual: ")
Leia(sal_atual)
Escreva(" Qual o percentual de reajuste: ")
Leia(percentual)
reajuste <- (sal_atual * percentual)/100
sal_futuro <- sal_atual + reajuste
LimpaTela
Escreval(" REAJUSTE SALARIAL")
Escreval("===============================================")
Escreval(" Salario sem reajuste: R$ ",sal_atual:4:2)
Escreval(" valor do reajunte: R$ ",reajuste:4:2)
Escreval(" Salario atualizado: R$ ",sal_futuro:4:2)
Escreval("===============================================")
Escreval
Escreval
fimalgoritmo
algoritmo "ex07"
var
salario, despesas, poupanca_ano: Real
anos : Inteiro
inicio
Escreval("==============================================")
Escreval(" MEU PRIMEIRO MILHÃO")
Escreval("==============================================")
Escreva(" Qual o valor do salário; base do calculo: ")
Leia(salario)
Escreva(" O valor total de despesas mensais: ")
Leia(despesas)
poupanca_ano <- (salario - despesas) * 12
anos <- Int((1000000 / poupanca_ano)+ 0.5)
Escreval(" Poupando R$ ",poupanca_ano:4:2," ao ano")
Escreval(" você levara ",anos," anos para poupar R$ 1.000.000,00")
fimalgoritmo
algoritmo "ex08"
var
num : Inteiro
c, j, aux : Inteiro
inicio
Escreva(" Digite um numero inteiro: ")
Leia(num)
aux <- num-3
Para j de 1 ate 2 Faca
aux <- aux + 1
Escreva(aux)
Fimpara
Escreva(num)
Para c de 1 ate 2 Faca
num <- num+1
Escreva(num)
FimPara
fimalgoritmo
algoritmo "ex09"
var
nome : Caracter
ano_nascimento, idade_atual : Inteiro
inicio
Escreval(" QUAL A SUA IDADE?")
Escreval("==========================================")
Escreva(" Digite seu nome: ")
Leia(nome)
Escreva(" Digite o ano em que você nasceu: ")
Leia(ano_nascimento)
idade_atual <- 2020 - ano_nascimento
Escreval(" ",nome," você tem",idade_atual," anos!")
Escreval("------------------------------------------")
fimalgoritmo
algoritmo "ex10"
var
nota: Vetor[1..2] de Real
c: Inteiro
Md: Real
inicio
Md <- 0
Escreval(" *********************************************")
Escreval(" * *")
Escreval(" * Média Semestral IFRN *")
Escreval(" * *")
Escreval(" *********************************************")
Para c de 1 ate 2 Faca
Escreva(" Digite a ",c,"ª nota: ")
Leia(nota[c])
FimPara
Md <- (2 * nota[1] + 3 * nota[2])/5
Escreval(" *********************************************")
Escreval
Escreval(" A sua média foi:",Md:3:2)
Escreval
Escreval(" *********************************************")
fimalgoritmo