Comment incrémenter l'heure actuelle ?

Résolu/Fermé
laylana - 7 sept. 2012 à 13:46
 laylana - 7 sept. 2012 à 15:16
Bonjour,



Comment incrémenter l'heure actuelle en pascal?
Merci :)

3 réponses

KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 3 015
7 sept. 2012 à 14:10
Ta question manque cruellement de détails !

program bidon;

var heure:integer;
begin
    heure:=14;      // heure actuelle
    inc(heure);     // incrément
    writeln(heure); // affichage
readln;
end.
1
Kx- voilà l'exercice
Ecrire un programme en Pascal permettant de simuler l'incrémentation de l'heure actuelle (HA saisie au clavier ) d'une horloge électronique d'une seule seconde.
Exemples :
- HA = 15 : 16 : 28 après une seconde c'est 15 : 16 : 29
- HA = 15 : 16 : 59 après une seconde c'est 15 : 17 : 00
- HA = 15 : 59 : 59 après une seconde c'est 16 : 00 : 00
- ....
N.B : hh est une valeur entre 00 et 23, mm une valeur entre 00 et 59 et ss une valeur entre 00 et 59. L'ordinateur affichera un message d'erreur pour tous les autres cas.
0
KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 3 015 > laylana
7 sept. 2012 à 14:54
À lire : Demander de l'aide pour vos exercices sur CCM
Au vu de ce que tu as déjà fait (rien pour l'instant) les réponse qui t'ont déjà été donné devraient suffire.
0
Voilà ce que j'ai essayé de faire sur mon brouillon
new_time.seconds;
if( new_time.seconds = 60)
Then new_time.seconds = 0;
+new_time.minutes;
if(new_time.minutes =60)
Then( new_time.minutes = 0);
+new_time.hour;
if(new_time.hour = 24)
new_time.hour = 0;
Mon problème c'est que je sais pas comment faire la déclaration dans ce programme ...
0
KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 3 015
7 sept. 2012 à 15:14
L'idée est bonne, maintenant il faut le traduire en Pascal... donc il faut apprendre la syntaxe !

Voici un bon cours (il commence à dater mais pour apprendre les bases c'est suffisant)
https://pascal.developpez.com/cours/cyberzoide/index.php3

Je te conseille de tout reprendre dès le début, ça ne peut pas faire de mal ;-)
0
D'accord :) merci bcp
0
[Dal] Messages postés 6174 Date d'inscription mercredi 15 septembre 2004 Statut Contributeur Dernière intervention 2 février 2024 1 083
Modifié par [Dal] le 7/09/2012 à 14:22
:-D

Avec Free Pascal, on se servirait certainement de IncDay, IncHour, IncMilliSecond, IncMinute, IncSecond, IncWeek, ou IncYear, disponibles dans l'Unité "dateutils", pour répondre en partie à ta question :

https://www.freepascal.org/docs-html/rtl/dateutils/index-5.html


Dal
0
Chris.C Messages postés 4 Date d'inscription jeudi 20 juin 2002 Statut Membre Dernière intervention 7 septembre 2012
7 sept. 2012 à 14:14
Bonjour,
Je ne suis pas un expert en Pascal mais ile me semble qu'un
heure += ou
heure =heure + inc(heure) serait + adapté
-1
KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 3 015
7 sept. 2012 à 14:22
"heure =heure + inc(heure) serait + adapté" !!!?

1) inc(heure) renvoie void, on ne peut donc pas l'ajouter à quoi que ce soit !
2) même s'il renvoyait un résultat, ce serait heure+1, ce que tu calculerais serait donc 2*heure+1 !!
3) en Pascal, l'opérateur = correspond à une comparaison, en aucun cas une affectation !!!

4) heure += d'accord, faudrait-il encore mettre un 1 derrière... mais inc(heure) est plus efficace.
0