Baixe o app para aproveitar ainda mais
Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original
algoritmo "semnome" // Função : Calculando a area do retangulo // Autor : Davi // Data : 28/02/2018 // Seção de Declarações var x,y,produto : real inicio // escreval escreval ("digite o valor da base retangulo:") leia (x) escreval ("digite o valor da altura retangulo:") leia (y) produto:=x*y se x=y entao escreval (" A figura geometrica não é um retangulo repetir procedimento") repita escreval ("digite o valor da base retangulo:") leia (x) escreval ("digite o valor da altura retangulo:") leia (y) produto:=x*y fimrepita escreval ("O resultado da área é:", produto) fimse //leia ( fimalgoritmo
Compartilhar