Baixe o app para aproveitar ainda mais
Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original
algoritmo "Pessoa mais pesada" // Função : // Autor : // Data : 30/06/2015 // Seção de Declarações var I: inteiro N, pesado: caractere P, mai: real inicio // Seção de Comandos limpatela escreval("-----------------") escreval("DETECTOR DE PESADO") escreval("Maior peso até agora: ", mai, "Kg") escreval("-----------------") para I<- 1 ate 5 faca escreva("Diite o nome: ") leia (N) escreva("Digite o peso de ",N,": ") leia (P) se(P>mai) entao mai<-P pesado<-N fimse limpatela escreval("-----------------") escreval("DETECTOR DE PESADO") escreval("Maior peso até agora: ", mai, "Kg") escreval("-----------------") fimpara limpatela escreval("-----------------") escreval("DETECOR DE PESADO") escreval("Maior peso até agora: ", mai, "Kg") escreval("-----------------") escreval("A pessoa mais pesada foi: ", pesado,", com ",mai, " quilos.") fimalgoritmo
Compartilhar