All pastes #2052700 Raw Edit

Mine

public text v1 · immutable
#2052700 ·published 2011-05-02 02:50 UTC
rendered paste body
Bacharel Sistemas de Informação - UFSCar
Disciplina - Algorítmo e Programação I
Professor - Jander Moreira
Atividade - AA2-1 24/04/2011
Wander Silvio Bernardes - RA 435392

Algoritmo "Calculo de Concentração de Soluções"
// Função :    Calculos basicos de concentração de soluções
// Autor :     Wander S Bernardes 435392
// Data : 21/4/2011

// Seção de Declarações 

var

   massaAgua:     inteiro
   massaSoluto:   inteiro
   molSoluto:     inteiro
   porcentagem:   real
   molalidade_W:  real
   titSolucao:    real


inicio
   
// Seção de Comandos 

   // Realização da leitura dos dados
   
   escreva("Digite a massa da agua: ")
   leia(massaAgua)
   escreva("Digite a massa do soluto: ")
   leia(massaSoluto)
   escreva("Digite o mol do soluto: ")
   leia(molSoluto)
   
   // Calculos
   
   titSolucao <- massaSoluto / (massaAgua + massaSoluto)
   porcentagem <- (titSolucao * 100)
   molalidade_W <- (massaSoluto / molSoluto) / (massaAgua / 1000)
   
      // Saida dos resultados calculados
   
   escreval("Titulo da Solucao:", titSolucao)
   escreval("Porcentagem em peso:", porcentagem)
   escreval("Molalidade W:", molalidade_W)

   
fimalgoritmo