Salut
Voilà, j'ai un petit problème avec ce programme en Turbo Pascal (un programme qui permet de calculer le max de chaque ligne et après le min de ces max). Ce qu'il y a, c'est que quand j'exécute, quand j'entre les valeurs max de chaque ligne en premier le programme ne les affiche pas mais si j'entre ces valeurs au milieu ou à la fin ils seront affichés .....
Voici mon programme.
Vous pouvez essayer de l'exécuter en entrant ces valeurs :
5 8 4
3 9 7
2 1 6
et il va s'exécuter normalement ; au contraire, si vous entrez ces valeurs :
8 5 4
9 3 7
2 1 6
vous remarquez la différence : il n'y a que le 6 qui apparaît ......
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
progiram heh;
uses crt;
var [1..10,1..10] of integer; i,i:integer;
max,min:array[1..100] of integer;
begin
clrscr;
for i:=1 to 3 do 
for j:=1 to 3 do begin
read (t[i,j]);
end;
for i :=1 to 3 do begin
max[i]:=t[i,1];
end;
for i:=1 to 3 do 
for j :=2 to 3 do begin
if t[i,j]>max[i] then begin max[i]:=t[i,j];
write('le max est', ' ',max[i]);
end; end;
min[i]:=max[1];
for i:=1 to 3 do begin
if min[i]>max[i] then min(i]:=max[i];
write(le min des max est', ' ',min [i]);
end;
readln;readln;
end.
Merci pour votre aide