Prévia do material em texto
11/07/2023, 00:01 Avaliação Final (Discursiva) - Individual about:blank 1/2 Prova Impressa GABARITO | Avaliação Final (Discursiva) - Individual (Cod.:746634) Peso da Avaliação 4,00 Prova 50587365 Qtd. de Questões 2 Nota 8,00 Crie um algoritmo que leia como informações do usuário o valor da base e o valor da altura de um triângulo qualquer. Ao final da leitura, o algoritmo deverá calcular e imprimir o valor da área do triângulo, sabendo que esta área é dada pela fórmula: S=(b*h)/2. Observações: S = área, b = base, h = altura. Resposta esperada Algoritmo Triangulo; Var base, altura, area: inteiro; Início Escreva("Digite a base do triângulo: "); Leia(base); Escreva("Digite a altura do triângulo: "); Leia(altura); area := (base * altura) /2; Escreva("A área do triângulo é igual a: ", area); Fim. Minha resposta Definindo corretamente o nome do algoritmo, as variáveis e o cálculo, além de respeitar a endentação e uso correto dos comados de entrada e saída, possibilitando que ao final seja impressa a mensagem. Algoritimo '' Triangulo'' Var base, altura, area : Inteiro Inicio primo = verdadeiro Escreva(''Digite a altura do triangulo: ") Leia(Base) Escreva("Digite a altura do triangulo: ") Leia(Base) area = (base * altura)/2 Escreva(''A area do triangulo é igual a :'', area) fimalgoritmo Uma construtora está permitindo que os novos moradores escolham outros revestimentos para suas novas cozinhas. Para isso, ela deverá calcular individualmente quanto de azulejos será necessário para cada mudança. Para isso, solicitou ao departamento de desenvolvimento de sistemas um programa para ler as dimensões de uma cozinha retangular (comprimento, largura e altura), calcular e escrever a quantidade de caixas de azulejos para se colocar em todas as suas paredes. Não será necessário descontar a área ocupada por portas e janelas. Cada caixa de azulejos possui 1,5 m2. Desenvolva um algoritmo para atender à solicitação da construtora. Resposta esperada program cozinha; uses crt; var comp, larg, alt, area, caixas : real; begin VOLTAR A+ Alterar modo de visualização 1 2 11/07/2023, 00:01 Avaliação Final (Discursiva) - Individual about:blank 2/2 write ('Qual o comprimento da cozinha? '); readln (comp); writeln; write ('Qual a largura da cozinha? '); readln (larg); write ('Qual a altura da cozinha? '); readln (alt); writeln; area := (comp*alt*2) + (larg*alt*2); caixas := (area/1.5); writeln ('Qtd de caixas de azulejos: ', caixas); end. Minha resposta Program cozinha; uses crt; var comp, larg, alt, area, caixas, real; begin write ('qual o comprimento da cozinha? '); readln (comp); writeln; write (qual o comprimento da cozinha? '); readln (larg); writeln: readln (alt); writeln; area := (comp*alt*2) + (larg*alt*2); caixas := (area/1.5); writeln (Qtd de cx de azulejos : ' , caixas); end. Imprimir