Algoritmos Pascal: Cálculos, Dados e Raiz Quadrada - Exemplos e Códigos

9 Faça um algoritmo em Pascal que receba o nome de uma pessoa e a idade dela Depois mostre os dados recebidos 10 Faça um algoritmo que receba quatro números faça a soma deles e mostre o resultado PROGRAMA CALCULO VAR N1 N2 N3 N4 SOMA RESULTADO INTEIRO ESCREVA DIGITE N1 LEIA N1 ESCREVA DIGITE N2 LEIA N2 ESCREVA DIGITE N3 LEIA N3 ESCREVA DIGITE N4 LEIA N4 SOMA N1 N2 N3 N4 RESUTADO N1 N2 N3 N4 ESCREVA O RESULTADO E RESUTADO LEIA FIM 11 Faça um algoritmo que receba um número qualquer e o calcule da seguinte maneira some o número recebido mais ele mesmo e com o resultado da soma faça a potenciação dele com a potência de 2 Em seguida com o resultado da potenciação faça a raiz quadrada e depois mostre o resultado 7 Faça um algoritmo em Pascal que receba um número qualquer e calcule a raiz quadrada desse número mostrandoa CALCULAR RAIZ VARIAVEIS NUMERO N1 RAIZ QUADRADA INICIO ESCREVA DIGITE UM NUMERO LEIA NUMERO FAÇA A RAIZ QUADRADA DO NUMERO N1 ESCREVA RESULTADO RAIZ QUADRADA N1 FIM 8 Faça um algoritmo em Pascal que receba um número qualquer Calcule esse número elevado a potência de 3 e mostre o resultado Utilize a função Round para arredondar o resultado Questão 6 program MediaIdades var Idade1 Idade2 Idade3 integer Media real begin writelnDigite a idade da primeira pessoa readlnIdade1 writelnDigite a idade da segunda pessoa readlnIdade2 writelnDigite a idade da terceira pessoa readlnIdade3 Media Idade1 Idade2 Idade3 3 writelnA média das idades é Media02 end Questão 7 program CalculadoraRaizQuadrada var numero resultado real begin writeDigite um número readnumero resultado sqrtnumero writelnA raiz quadrada de numero02 é resultado02 readln end Questão 8 program PotenciaCubica var numero resultado real begin writelnDigite um número readlnnumero resultado exp3lnnumero resultado roundresultado writelnO resultado é resultado end Questão 9 program ExibirDadosPessoa var nome string idade integer begin writelnDigite o nome da pessoa readlnnome writelnDigite a idade da pessoa readlnidade writelnNome nome writelnIdade idade readln end Questão 10 program SomaQuatroNumeros var num1 num2 num3 num4 soma real begin writelnDigite o primeiro número readlnnum1 writelnDigite o segundo número readlnnum2 writelnDigite o terceiro número readlnnum3 writelnDigite o quarto número readlnnum4 soma num1 num2 num3 num4 writelnA soma dos quatro números é soma readln end Questão 11 program CalculoPotenciaRaiz var numero resultado real begin writelnDigite um número readlnnumero resultado numero numero numero numero resultado sqrtresultado writelnO resultado é resultado02 readln end Questão 6 program MediaIdades var Idade1 Idade2 Idade3 integer Media real begin writelnDigite a idade da primeira pessoa readlnIdade1 writelnDigite a idade da segunda pessoa readlnIdade2 writelnDigite a idade da terceira pessoa readlnIdade3 Media Idade1 Idade2 Idade3 3 writelnA média das idades é Media02 end Questão 7 program CalculadoraRaizQuadrada var numero resultado real begin writeDigite um número readnumero resultado sqrtnumero writelnA raiz quadrada de numero02 é resultado02 readln end Questão 8 program PotenciaCubica var numero resultado real begin writelnDigite um número readlnnumero resultado exp3lnnumero resultado roundresultado writelnO resultado é resultado end Questão 9 program ExibirDadosPessoa var nome string idade integer begin writelnDigite o nome da pessoa readlnnome writelnDigite a idade da pessoa readlnidade writelnNome nome writelnIdade idade readln end Questão 10 program SomaQuatroNumeros var num1 num2 num3 num4 soma real begin writelnDigite o primeiro número readlnnum1 writelnDigite o segundo número readlnnum2 writelnDigite o terceiro número readlnnum3 writelnDigite o quarto número readlnnum4 soma num1 num2 num3 num4 writelnA soma dos quatro números é soma readln end Questão 11 program CalculoPotenciaRaiz var numero resultado real begin writelnDigite um número readlnnumero resultado numero numero numero numero resultado sqrtresultado writelnO resultado é resultado02 readln end