Exercícios de visualg resolvidos PDF

Códigos Visualg Algoritmos feito em pseudolinguagem Interpretados pelo programa Visualg. algoritmo "exercício1" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 26/01/2012 // Apresente o seguinte algoritmo // Ler 2 valores, no caso variaveis A e B. //Efetuar a soma das variaveis A e B implicando seu resultado na variavel x. //Apresentar o valor da variavel X após a soma dos dois valores indicados.*/ var A,B,X:REAL inicio escreva ("Digite o valor de A.:") leia(A) escreva ("Digite o valor de B.:") leia(B) X<- A+B escreva ("A soma de A + B é.:",X) fimalgoritmo ********************************************************************************************* algoritmo "exercicio2" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 26/01/2012 // 1)a formula pa calcular a área de um a circunferencia é A=piR^. //Sendo que o valor de PI = 3,14159 basta estabelecer. //a)Ler um valor para raio, no caso a variavel R. //b)Efetuar o cálculo da área, elevando o valor de R ao quadrado e multiplicado por PI. //c)Apresentar o valor da variavel A var r,p,a: real inicio escreva ("Escreva o raio da circunfêrencia.:") leia(r) escreva ("Digite o valor de PI(3.14159).:") leia(p) a <- (r*r)*p escreva ("A área da circunferência é.:",a) fimalgoritmo ********************************************************************************************* algoritmo "exercicio3" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 26/01/2012 // Leia duas variaves A e B. A seguir, calcule a soma, a diferença, o produto e a divisão //entre elas. A seguir mostre o resultado de cada conta com as mensagens correspondentes. var A,B,soma, diferenca,produto,divi: real inicio escreva("Digite um valor para A.:") leia (A) escreva("Digite um valor para B.:") leia (B) soma      <- A+B diferenca <- A-B produto   <- A*B divi      <- A/B escreval("Soma      .:",soma) escreval("Diferênça .:",diferenca) escreval("Produto   .:",produto) escreval("Divisão   .:",divi) fimalgoritmo ********************************************************************************************* algoritmo "exercicio4" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 26/01/2012 // Leia duas notas de um aluno. A seguir, calcule a média do aluno, sabendo que a primeira nota // tem peso 3,5 e a segunda nota tem peso 7,5. var media,n1,n2 : real inicio escreva("Digite a primeira nota do aluno.:") leia(n1) escreva("Digite a segunda nota do aluno .:") leia(n2) limpatela n1 <- n1 *3.5 n2 <- n2 *7.5 media <- (n1+n2)/10 escreval("A média ponderada foi.:",media) fimalgoritmo ********************************************************************************************* algoritmo "exercicio5" // Função :Estruturado // Autor : Adriano Cavalcante - tutoslivre@hotmail. // Data : 26/01/2012 // Escreva um algoritmo qua leia o numero de um funcionário, seu seu numero de horas trabalhadas, //o valor que recebe por hora e calcule o salário deste funcionário. //A seguir, mostre o número e o salário do funcionário. var nf, nt : inteiro vh, st : real inicio escreva("Digite o numero do funcionário................:") leia(nf) escreva("Digite o numero de horas trabalhadas...........:") leia(nt) escreva("Digite o valor que recebe por hora trabalhada..:") leia(vh) //limpatela st <- nt*vh escreva("O salário do funcionário número ",nf," é R$",st," reais") fimalgoritmo ********************************************************************************************* algoritmo "exercicio6" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 26/01/2012 // Faça um algoritmo que leia o nome de um vendedor, o seu salario fixo e o total de vendas efetuadas por ele no mês. // Sabendo que este vendedor ganha 15% de comissão sobre suas vendas efetuadas, infomar o seu saláriono final do mês. var nv       : literal   // NV. = nome do vendedor sf,tv,st : real     // SF = salario fixo   ; TV= total de vendas em reais  ; SF = salario final inicio escreva ("Digite o nome do vendedor...................:") leia(nv) escreva ("Digite o salario fixo do vendedor...........:") leia(sf) escreva ("Digite o total de vendas em dinheiro no mês.:") leia(tv) escreval //limpatela st <- (tv*0.15)+sf escreval("O salario final do vendedor ",nv," é.......:",st) fimalgoritmo ********************************************************************************************* algoritmo "exercico7" // Função :Estruturado // Autor : Adriano Cavalcante - // Desenvolva um algoritmo que leia o código de uma peça1, o numero de peças1, o valor //unitário de cada peça1, o código de uma peça2, o numero de peças2, o valor unitário de cada // peça2 e calcula e motra o valor a ser pago. var p1, np1: inteiro vu1p: real p2, np2: inteiro vu2p: real vp: real sp1, sp2: numerico inicio escreval ("1° peça") escreva ("Digite o código.:") leia(p1) escreva ("Digite a qtde.:") leia (np1) escreva ("Digite o valor unitário.:") leia (vu1p) escreval escreval("2° peça") escreva ("Digite o código.:") leia(p2) escreva ("Digite a qtde.:") leia (np2) escreva ("Digite o valor unitário.:") leia (vu2p) sp1 <- np1*vu1p sp2 <- np2*vu2p vp <- sp1+sp2 escreval escreval ("Valor total a ser pago é R$ ",vp," reais") fimalgoritmo ********************************************************************************************* algoritmo "exercico8" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 28/01/2012 // Faça um algoritmo para determinar o consumo médio de um automovél sendo //fornecidos a distancia total percorrida pelo automovel e o total de combustivel gasto. var dp,tc, cm: real inicio escreva("Digite a distância percorrida.:") leia(dp) escreva("Digite o total de combustível gasto [lt].:") leia(tc) cm <- dp/tc escreva("O consumo médio do automovél é de ",cm," Km por Lt") fimalgoritmo ********************************************************************************************* algoritmo "exercicio9" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 28/01/2012 //  Crie um algoritmo que receba do usuário o valor de uma determinada compra e // a quantidade de parcelas que se quer didvidir este valor. // O algoritmo deve calcular o valor de cada parcel. Considere que não será acrescido // nehnum juro no valor total. var nome: literal vc :real qp :inteiro mv : real inicio escreva ("Digite o nome do cliente.:") leia(nome) escreva("Digite o valor total da compra.:") leia(vc) escreva ("Digite a qtde de parcelas.:") leia(qp) mv <- vc /qp limpatela escreval("O nome do cliente é ",nome) escreval("O valor total da compra foi de ",vc," reais x ",qp,"parcelas") escreval("O valor de cada parcela é = ",mv," reais") escreval("") fimalgoritmo ********************************************************************************************* algoritmo "exercicio10" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 28/01/2012 // Faça um algoritmo que leia a idade de uma pessoa em anos, calcule e escreva quantos // dias ele(a), viveu, considerar o ano com 365,25 dias. var idade: real inicio escreval("Programa para calcúlo de idade") escreval() escreva ("Qual a sua idade ?.:") leia(idade) idade <- idade *365,25 escreva("Você já viveu ",idade," dias") escreval("") fimalgoritmo ********************************************************************************************* algoritmo "exercicio11" // Função :Estruturado // Autor : Adriano Cavalcante - // Data : 28/01/2012 //Uma instituição de ensino realizou uma pesquisa sobre os eleitores de um municipio que //participaram de última eleição. Faça um algoritmo que leia o total de votos Brancos(vb), nulos(vn) e válidos(vv).