| Exibir mensagem anterior :: Exibir próxima mensagem |
| Autor |
Mensagem |
adalbertomesquita
Experiente
Registrado: Segunda-Feira, 4 de Agosto de 2008
Mensagens: 402
Localização: Brasília
|
 Enviada: Qua Mai 04, 2011 8:56 am Assunto: [DUVIDA] Converter segundos em minutos |
 |
|
Bom dia a todos!
Procurei no Forum mas não encontrei resposta.
No meu sistema eu tenho que fazer um cálculo para mostrar quantos minutos o usuário utilizou de telefone baseado no valor de sua conta de telefone.
As informações que eu tenho são do valor do minuto e do valor da conta.
Valor Minuto = 0,20
Valor da conta = 119,15
Eu fiz da seguinte forma:
0,20 / 60 = 0,0033333 (Valor do segundo)
119,15 / 0,20 = 595,75
60 (1 min q é igual a 60 segundos) X 595,75% = 357,45
357.45 X 100 = 35.745
Ou seja, ele utilizou 35.745 segundos.
Eu cálculo é meio complicado mas foi o único que consegui fazer.
Agora eu preciso converter esse 35.745 segundos em minutos.
Se eu dividir 35.745 por 60 vai dar 595,75.
Só que isso não é o jeito certo de fazer porque 35.745 segundos dá 595 minutos e 45 segundos.
Desde já agradeço a quem puder me ajudar. |
|
| Voltar ao Topo |
|
 |
rvercesi
Mestre
Registrado: Segunda-Feira, 29 de Novembro de 2010
Mensagens: 912
Localização: Curitiba / PR
|
| Enviada: Qua Mai 04, 2011 9:15 am Assunto: |
|
|
| Citação: | | Só que isso não é o jeito certo de fazer porque 35.745 segundos dá 595 minutos e 45 segundos. |
Pegue 60 e divida pela parte fracionária dos minutos que você achou!!
595.75 -> 60 / 0,75 = 45 segundos! |
|
| Voltar ao Topo |
|
|
adalbertomesquita
Experiente
Registrado: Segunda-Feira, 4 de Agosto de 2008
Mensagens: 402
Localização: Brasília
|
| Enviada: Qua Mai 04, 2011 9:32 am Assunto: |
|
|
| rvercesi escreveu: | | Citação: | | Só que isso não é o jeito certo de fazer porque 35.745 segundos dá 595 minutos e 45 segundos. |
Pegue 60 e divida pela parte fracionária dos minutos que você achou!!
595.75 -> 60 / 0,75 = 45 segundos! |
Mas como fazer isso no Delphi?
Como pegar só a sobra dividir e somar com o valor inteiro? |
|
| Voltar ao Topo |
|
|
rvercesi
Mestre
Registrado: Segunda-Feira, 29 de Novembro de 2010
Mensagens: 912
Localização: Curitiba / PR
|
| Enviada: Qua Mai 04, 2011 9:45 am Assunto: |
|
|
| Dá uma olhada na função FRAC() |
|
| Voltar ao Topo |
|
|
adalbertomesquita
Experiente
Registrado: Segunda-Feira, 4 de Agosto de 2008
Mensagens: 402
Localização: Brasília
|
| Enviada: Qua Mai 04, 2011 10:29 am Assunto: |
|
|
| rvercesi escreveu: | | Dá uma olhada na função FRAC() |
Onde eu encontro essa função? |
|
| Voltar ao Topo |
|
|
rvercesi
Mestre
Registrado: Segunda-Feira, 29 de Novembro de 2010
Mensagens: 912
Localização: Curitiba / PR
|
| Enviada: Qua Mai 04, 2011 10:34 am Assunto: |
|
|
Putz, vai no teu programa escreve FRAC() e aperta F1
Help do Delphi |
|
| Voltar ao Topo |
|
|
gilsonnrodrigues
Moderador
Registrado: Quinta-Feira, 14 de Abril de 2005
Mensagens: 9009
Localização: Governador Valadares-MG
|
| Enviada: Qua Mai 04, 2011 11:06 am Assunto: |
|
|
| Código: | Minutos := qddeSegundos div 60;
Segundos := qddeSegundos mod 60;
|
só isso!! |
|
| Voltar ao Topo |
|
|
adalbertomesquita
Experiente
Registrado: Segunda-Feira, 4 de Agosto de 2008
Mensagens: 402
Localização: Brasília
|
| Enviada: Qua Mai 04, 2011 2:19 pm Assunto: |
|
|
| rvercesi escreveu: | Putz, vai no teu programa escreve FRAC() e aperta F1
Help do Delphi |
Eu vi a sintaxe da função mas não consegui usá-la. Não sou muito bom em funções.
function Frac(X: Extended): Extended |
|
| Voltar ao Topo |
|
|
adalbertomesquita
Experiente
Registrado: Segunda-Feira, 4 de Agosto de 2008
Mensagens: 402
Localização: Brasília
|
| Enviada: Qua Mai 04, 2011 2:30 pm Assunto: |
|
|
| gilsonnrodrigues escreveu: | | Código: | Minutos := qddeSegundos div 60;
Segundos := qddeSegundos mod 60;
|
só isso!! |
Grande Gilson!
Amigão eu não consegui entender. |
|
| Voltar ao Topo |
|
|
gilsonnrodrigues
Moderador
Registrado: Quinta-Feira, 14 de Abril de 2005
Mensagens: 9009
Localização: Governador Valadares-MG
|
| Enviada: Qua Mai 04, 2011 3:17 pm Assunto: |
|
|
| Código: | var
Minutos, Segundos : Integer;
begin
Minutos := qddeSegundos div 60;
Segundos := qddeSegundos mod 60;
ShowMessage(IntToStr(Minutos) + ' minutos e '+IntToStr(Segundos)+' segundos');
|
|
|
| Voltar ao Topo |
|
|
adalbertomesquita
Experiente
Registrado: Segunda-Feira, 4 de Agosto de 2008
Mensagens: 402
Localização: Brasília
|
| Enviada: Qua Mai 04, 2011 3:51 pm Assunto: |
|
|
| gilsonnrodrigues escreveu: | | Código: | var
Minutos, Segundos : Integer;
begin
Minutos := qddeSegundos div 60;
Segundos := qddeSegundos mod 60;
ShowMessage(IntToStr(Minutos) + ' minutos e '+IntToStr(Segundos)+' segundos');
|
|
O que não estou entendendo é porque o valor que eu tenho é 595,75.
Como é que nesse código eu vou identificar que 595 é minuto e 0,75 é segundo? |
|
| Voltar ao Topo |
|
|
gilsonnrodrigues
Moderador
Registrado: Quinta-Feira, 14 de Abril de 2005
Mensagens: 9009
Localização: Governador Valadares-MG
|
| Enviada: Qua Mai 04, 2011 5:05 pm Assunto: |
|
|
| qtos segundos eram ao todo? |
|
| Voltar ao Topo |
|
|
adalbertomesquita
Experiente
Registrado: Segunda-Feira, 4 de Agosto de 2008
Mensagens: 402
Localização: Brasília
|
| Enviada: Qua Mai 04, 2011 5:10 pm Assunto: |
|
|
| gilsonnrodrigues escreveu: | | qtos segundos eram ao todo? |
No total são 595,75 minutos.
Editado pela última vez por adalbertomesquita em Qui Mai 05, 2011 8:10 am, num total de 1 vez |
|
| Voltar ao Topo |
|
|
marcosalles
Moderador
Registrado: Quarta-Feira, 26 de Março de 2008
Mensagens: 1695
Localização: Muriaé Mg
|
| Enviada: Qua Mai 04, 2011 6:25 pm Assunto: Re: [DUVIDA] Converter segundos em minutos |
|
|
| adalbertomesquita escreveu: | Bom dia a todos!
Procurei no Forum mas não encontrei resposta.
No meu sistema eu tenho que fazer um cálculo para mostrar quantos minutos o usuário utilizou de telefone baseado no valor de sua conta de telefone.
As informações que eu tenho são do valor do minuto e do valor da conta.
Valor Minuto = 0,20
Valor da conta = 119,15
Eu fiz da seguinte forma:
0,20 / 60 = 0,0033333 (Valor do segundo)
119,15 / 0,20 = 595,75 Minutos Utilizados
|
esta meio confuso sua dúvida..
vc resolve e diz que tem 595,75 Minutos Utilizados
no post anteiror vc diz que tem 595,75 segundos Utilizados
Afinal quem é quem ??????????
_________________
http://marcosalles.wordpress.com
Desenvolvo FreeLancer e presto Consultoria
Orientação Online DataSnap DbX ClientDataSet
POO , Padrões de Projeto e dúvidas de Delphi em
Geral |
|
| Voltar ao Topo |
|
|
adalbertomesquita
Experiente
Registrado: Segunda-Feira, 4 de Agosto de 2008
Mensagens: 402
Localização: Brasília
|
| Enviada: Qua Mai 04, 2011 6:50 pm Assunto: Re: [DUVIDA] Converter segundos em minutos |
|
|
| marcosalles escreveu: | | adalbertomesquita escreveu: | Bom dia a todos!
Procurei no Forum mas não encontrei resposta.
No meu sistema eu tenho que fazer um cálculo para mostrar quantos minutos o usuário utilizou de telefone baseado no valor de sua conta de telefone.
As informações que eu tenho são do valor do minuto e do valor da conta.
Valor Minuto = 0,20
Valor da conta = 119,15
Eu fiz da seguinte forma:
0,20 / 60 = 0,0033333 (Valor do segundo)
119,15 / 0,20 = 595,75 Minutos Utilizados
|
esta meio confuso sua dúvida..
vc resolve e diz que tem 595,75 Minutos Utilizados
no post anteiror vc diz que tem 595,75 segundos Utilizados
Afinal quem é quem ?????????? |
Tem razão amigo, me confundi na outra msg.
Na verdade o resultado que tenho é em minutos, ou seja, 595,75 minutos. |
|
| Voltar ao Topo |
|
|
|
FAQ
Pesquisar
Membros
Grupos
Registrar
Perfil
Entrar e ver Mensagens Particulares
Entrar
