[Resolvido] Algoritmo

[thiagolhp 0]

estou com dificuldades nessa questão

a questão ja fiz(pelos menos acho)queria ajuda pra calcular o tempo

desde ja obrigado

 

Um determinado material radioativo perde metade de sua massa a cada 50 segundos. Dada a massa inicial, em gramas, fazer um algoritmo que determine o tempo necessário para que essa massa se torne menor do que 0.5 gramas. Escreva a massa inicial, e o tempo.

Observação: o usuário deve digitar a massa inicial.

algoritmo "radiotividade"
var
 tt,contador,r,m:real
 Hora, Minuto, Segundo: real
inicio
   m<-1
   escreva("digite a massa inicial em gramas:")
   leia(m)
enquanto (m>=0.5) faca
       m<-m/2
       contador <- contador+1
       tt<-contador*50
     fimenquanto
          se tt >= 59 entao
             escreva("Segundos")
              fimse
            se tt >= 3600 entao
                   escreva("minutos")
             fimse
              se tt >= 86400 entao
                          escreva("hora")
               fimse
                se tt >=31104000 entao
                          escreva("dias")
                   fimse
 escreval(tt)
fimalgoritmo

[quitZAUMMM 18]

Acho que é algo assim:

Enquanto (massa >= 0.5) Faça
    tempo <- tempo + 50;
    massa <- massa/2;
Fim_Enquanto

Ai a resposta como no enunciado não está dizendo nd, joga td em segundos msm..

 

[]s

[thiagolhp 0]

fiz esses aki tbm

 

algoritmo "exemplo_thiago"
var
massa: real
contador, segundos, minutos: inteiro
inicio
contador<-0
escreval("Digite a massa em gramas")
leia(massa)
enquanto (massa>0.5) faca
  massa<-massa/2
  contador<-contador+50
fimenquanto
minutos<-contador div 60
segundos<-contador mod 60
escreval("O tempo total gasto foi de: ",minutos," minutos", segundos, " segundos ")
fimalgoritmo

algoritmo "contadoraa6"
// Função :Calcular o tempo para a massa atingir 0.5
// Autor :   Thaigo e Fredinho Equipe Os Sequelados
// Data : 13/10/2010
var
 tempo,contador,massainicial,massa:real  //aqui você declara suas variaveis  !!
inicio
   escreva("digite a massa inicial em gramas:") //aqui você informa o que o usuario tem que fazer !!!
   leia(massa)  // aqui vai ler a massa
   massainicial<-massa // massa inicial recebe o valor d massa pra guardar e escrever no final do algoritmo informando ao usuario
enquanto (massa>=0.5) faca //aqui ele faz o loop enquanto a massa não atingir o valor de 0.5
       massa<-massa/2
       contador <- contador+1 // ele conta o numero d vezes q a massa foi dividida
       tempo<-contador*50 // pra descobrir o tempo q foi gasto ele multiplica o contador por 50 pra achar o tempo total
     fimenquanto
 escreval ("Massa inicial: ", massainicial)
 escreval("Tempo calculado em segundos: ",tempo)
fimalgoritmo

[quitZAUMMM 18]

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif