Trabalho Algoritmo

1) Permita ao usuário a digitação de um número inteiro, calcule e mostre o dobro deste número.

algoritmo "Dobro de um valor" var x, p: inteiro inicio escreva ("Digite um número inteiro:") leia (x) p <- x*2 escreval ("Produto:",p) fimalgoritmo 2) Permita ao usuário a digitação de um número real, calcule e mostre o seu triplo.

algoritmo "Triplo de um valor" var x, p: real inicio escreva ("Digite um número:") leia (x) p <- x*3 escreval ("Produto:",p) fimalgoritmo 3) Permita ao usuário a digitação do ano de nascimento, mostre a idade que ele completou em 2014.

algoritmo "Idade em 2014" var d, x: natural inicio escreva ("Digite o ano do seu nascimento:") leia (x) d <- 2014-x escreval ("Idade:",d) fimalgoritmo 4) Permita ao usuário a digitação do valor da aresta de um cubo, mostre o volume e a área da superfície.

algoritmo "Volume e área da superfície de um cubo" var x, v, a: real inicio escreva ("Digite o valor da aresta:") leia (x) v <- x^3 a <- x^2 escreval ("Volume:",v) escreval ("Área da superficie:",a) fimalgoritmo 5) Permita ao usuário a digitação da base e altura de um triângulo, calcule e mostre a área do mesmo.

algoritmo "Área do Triângulo" var x, y, at: real inicio escreva ("Digite o valor da base do triângulo:") leia (x) escreva ("Digite o valor da altura do triângulo:") leia (y) at <- (x*y)/2 escreval ("Área:",at) fimalgoritmo 6) Permita ao usuário a digitação de nome e salário atual, calcule e mostre o novo salário (15% de acréscimo do salário atual).

algoritmo "Acréscimo salarial" var n: caractere s, a, sa: real inicio escreva ("Digite o nome do funcionário:") leia (n) escreva ("Digite o salário do funcionário:") leia (s) a <- s*0.15 sa <- s+a escreval ("Nome: ",n, " - Salário atual:",sa) fimalgoritmo 7) Permita ao usuário a digitação do raio e da altura de uma caixa d'água cilíndrica, calcule e mostre o volume e a área de superfície do mesmo.

algoritmo "Volume e área do cilindro" var r, h, v, a: real inicio escreva ("Digite o valor