Besoin d'aide svp

Besoin d'aide svp - Delphi/Pascal - Programmation

Marsh Posté le 16-03-2008 à 17:51:34    

Je dois faire un programme qui est composé ainsi :
 
Je dois entrer 3 températures (une à 2h, une à 11h et une à 23h et ainsi de suite pour les 7 jours de la semaine) (ces 3 valeurs entrent dans un tableau). Par la suite, je dois afficher ce tableau dans un ListBox.
 
Voici l'étape où j'ai de la difficulté, c'est que il faut que je choisisse parmi toutes ces températures qui sont dans ce tableau en appuyant sur un bouton la température la plus haute de la semaine et un autre bouton pour la température la plus basse de la semaine.
 
 
Comment vous vous y prendriez ??
 
merci de l'aide

Reply

Marsh Posté le 16-03-2008 à 17:51:34   

Reply

Marsh Posté le 17-03-2008 à 20:49:54    

Salut
 
t'a "juste" à faire deux boucles qui parcourent tout ton tableau (plutôt que de parcourir le listbox) et qui reprend chaque valeurs
 
en gros, pour les maximas:

Temp:=-30;
 
for i= 1 to (la longeur du tab, et -1 si y faut) do if Tab[i]>Temp then Temp:=Tab[i];


 
une fois la boucle finie, t'auras (dans Temp) la plus grande valeur trouvée dans ton tableau Tab :)
 
après faut voir ce que t'utilise comme tableau et adapter en conséquence mais ce principe doit pas être trop mauvais

Message cité 1 fois
Message édité par Flagad'aware le 17-03-2008 à 20:51:02
Reply

Marsh Posté le 18-03-2008 à 01:20:37    

Flagad'aware a écrit :

Salut
 
t'a "juste" à faire deux boucles qui parcourent tout ton tableau (plutôt que de parcourir le listbox) et qui reprend chaque valeurs
 
en gros, pour les maximas:

Temp:=-30;
 
for i= 1 to (la longeur du tab, et -1 si y faut) do if Tab[i]>Temp then Temp:=Tab[i];


 
une fois la boucle finie, t'auras (dans Temp) la plus grande valeur trouvée dans ton tableau Tab :)
 
après faut voir ce que t'utilise comme tableau et adapter en conséquence mais ce principe doit pas être trop mauvais


Reply

Marsh Posté le 18-03-2008 à 01:22:52    

ok d'accord mais mon tableau est de 2 dimension de longueur (7 pour les 7 jours de la semaines et de 3 pour les 3 différentes température pendant cette journée )

 

et ensuite je dois prendre cette température la plus basse de mon tableau et aller la mettre dans un label.

 

Donc, Est-ce que je m'y prend comme suis ???

 


procedure TForm1.TempBasseClick(Sender: TObject);
var i : integer;
  begin
    for i:= 0 to 6 do
      begin
        if Ttemp[i] < temp1 and temp2 and temp3 then
        textbasse.Caption:= StrtoInt(Ttemp[i]);

 

 end;


Message édité par Atomic41 le 18-03-2008 à 01:25:00
Reply

Marsh Posté le 18-03-2008 à 20:09:47    

:heink:  
 
if Ttemp[i] < temp1 and temp2 and temp3 c'est certainement pas bon
 
mais tu utilise quoi exactement comme tableau?, donne plus de précisions
 
si il a bien 2 dimension ça devrait donner:
 
var  
Ttemp:array [1..7,1..3] of integer;
i:integer;
temp:integer;
 
 
si c'est ça tu doit faire une boucle (de 1 à 3) dans une autre boucle (1 à 7)
 
pour faire ce qui doit donner:
if Ttemp[1,1] < (ou > ) temp then...
if Ttemp[1,2] < (ou > ) temp then...
if Ttemp[1,3] < (ou > ) temp then...
if Ttemp[2,1] < (ou > ) temp then...
if Ttemp[2,2] < (ou > ) temp then...
...etc jusqu'à Ttemp[7,3]
 
 
je t'avais donné le nom de variable temp comme "temporaire" au fait, pendant toute la boucle c'est lui qui stock (et est modifié à chaque nouveau mini ou maxi trouvé) jusqu'à la fin


Message édité par Flagad'aware le 18-03-2008 à 20:11:43
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed