Precedente :: Successivo |
Autore |
Messaggio |
step Eroe in grazia degli dei

Registrato: 20/06/07 23:14 Messaggi: 126
|
Inviato: 25 Feb 2009 20:19 Oggetto: conversione da secondi a ore-min-sec su pascal |
|
|
ciao a tutti ho un programma da fare e sono arrivato ad un punto,cioè dati due orari espressi in ore minuti e secondi calcolare la differenza in secondi e in ore,minuti e secondi...io ho il totale dei secondi e li devo trasformare in ore minuti e secondi...quali istruzioni dovrei usare?
grazie mille anticipatamente |
|
Top |
|
 |
freemind Supervisor sezione Programmazione


Registrato: 04/04/07 21:28 Messaggi: 4643 Residenza: Internet
|
Inviato: 25 Feb 2009 21:30 Oggetto: |
|
|
Dato sec il numero di secondi da convertire puoi fare tramite:
Codice: |
hh:=sec div 3600;
tmp:=(sec-hh*3600);
mm:=tmp/60;
ss:=tmp-60*mm;
|
Ossia:
Il numero di ore è ovviamente la divisione intera tra i secondi di partenza e 3600 (3600 secondi fanno un'ora).
Per i minuti dobbiamo togliere dai secondi di partenza il numero di ore intere convertite in secondi il tutto diviso 60. La sottrazione serve per togliere dai secondi di partenza le ore appena calcolate, dividendo per 60 si ottengono i minuti.
Per i secondi infine dobbiamo togliere dai secondi di partenza le ore intere e i minuti interi.
La var tmp serve a non far calcolare due volte sec-hh*3600 |
|
Top |
|
 |
SverX Supervisor Macchinisti


Registrato: 25/03/02 12:16 Messaggi: 11810 Residenza: Tokelau
|
Inviato: 02 Mar 2009 18:03 Oggetto: Re: conversione da secondi a ore-min-sec su pascal |
|
|
Codice: | hh:=sec div 3600;
sec:=sec-hh*3600;
mm:=sec div 60;
sec:=sec mod 60; |
tanto non dovevi conservare la variabile sec, no?  |
|
Top |
|
 |
|