Atv. Mizael

Fazer download em docx, pdf ou txt
Fazer download em docx, pdf ou txt
Você está na página 1de 3

1) Faça um programa que receba o salário de um funcionário e o

percentual de aumento, calcule e mostre o valor do aumento e o


novo salário.
Algoritimo_Salário
Var salarioAtual , aumento, salarioNovo: real
escreva ("digite seu salário atual : ")
leia (salarioAtual)
aumento <- ( salarioAtual * 20 ) / 100
salarioNovo := aumento + salarioAtual
escreva ( "salario novo = R$ ", salarioNovo)
escreva ("aumento de = R$ ", SalarioNovo - SalarioAtual)
fimalgoritimo

2) 2. Faça um programa que calcule e mostre a área de um triângulo.


Sabe-se que: Área= (base * altura)/2.

Algaritimo_Area
Var
Base, Altura: real
area : real
escreva ("digite o valor da base :")
leia (base)
escreva ("digite o valor da altura :")
leia (altura)
area := (base * altura)/2
escreva ("área do triangulo = ", area)
Fimalgoritimo

3) Faça um programa que receba o nome, o ano de nascimento de


uma pessoa e o ano atual, calcule e mostre:
a) o nome da pessoa;
b) a idade dessa pessoa;
c) quantos anos ela terá em 2050.

Algoritimo_Idade
Var
anoN, anoA, idade, idadenova: real
nome: caracter
escreva ("digite seu nome:")
leia (nome)
escreva ("digite seu ano de nascimento:")
leia (anoN)
escreva ("digite o ano atual:")
leia (anoA)
idade := (anoA - anoN)
idadenova := (2050 - anoA + idade)
escreva ("", nome,", que possui", idade, " anos,"," terá", idadenova, " anos em
2050 .")
Fimalgoritimo

4) Faça um algoritmo que leia dois números nas variáveis NumA e


NumB, nessa ordem, e imprima em ordem inversa, isto é, se os
dados lidos forem NumA = 5 e NumB = 9, por exemplo, devem ser
impressos na ordem NumA = 9 e NumB = 5.

AlgoritimoTroca
Var
numA, numB, aux: real
escreva ("digite um número:")
leia (numA)
escreva ("digite outro número:")
leia (numB)
Aux := numA
NumA := numB
NumB:= aux
escreva ("NumA = ", numA )
escreva ("NumB = ", numB)
Fimalgoritimo

5) Faça um algoritmo que leia dois números e indique se são iguais


ou se são diferentes. Mostre o maior e o menor (nesta sequência).

Algoritimo_Maiormenor
Var
numero1, numero2: real
escreva ("digite um numero:")
leia (numero1)
escreva ("digite outro numero:")
leia (numero2)
Se numero1 = numero2 então
Escreva ("Os números são iguais")
Senão
Escreva ("Os números são diferentes")
fimse
Se numero1 > numero2 então
Escreva ("O maior número é o", ""numero1)
Escreva (" e o menor número é o", "" numero2)
Senão se numero2 > numero1, então
Escreva ("O maior número é", "", numero2)
Escreva (" e o menor número é", "", numero1)
fimse
Fimalgoritmo

Você também pode gostar