Comment incrémenter l'heure actuelle ?

Résolu

laylana -
laylana - 7 sept. 2012 à 15:16

Bonjour,

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

Afficher la suite

3 réponses

Réponse 1 / 3
KX Messages postés 19031 Statut Modérateur 3 020
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
1. laylana
  
  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
  1. KX Messages postés 19031 Statut Modérateur 3 020 > laylana
    
    À 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
2. laylana
  
  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
3. KX Messages postés 19031 Statut Modérateur 3 020
  
  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
4. laylana
  
  D'accord :) merci bcp
  
  0
Réponse 2 / 3
[Dal] Messages postés 6122 Date d'inscription Statut Contributeur Dernière intervention 1 108

:-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
Réponse 3 / 3
Chris.C Messages postés 4 Statut Membre

Bonjour,
Je ne suis pas un expert en Pascal mais ile me semble qu'un
heure += ou
heure =heure + inc(heure) serait + adapté
-1
1. KX Messages postés 19031 Statut Modérateur 3 020
  
  "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

Comment incrémenter l'heure actuelle ?

3 réponses

Discussions similaires

Newsletters