Discussion :

[khmamed]

Voilà un exercice de qui demande 10 nombres entiere puis qui trie ces nombres en nombres positifs et negatifs.

Exemple

Donnez 10 nombres entiere :
2 7 8 3 -5 -8 4 -1 -9 10
nombres positifs : 2 7 8 3 4 10
nombres negatifs: -5 -8 -1 -9

J'ai essayé avec ce code source mais ça ne marche pas; la compilation donne "error 113 error in statement"

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
26
27
28
29
30
31
 
program classinegpos;
uses crt;
var
  pos, neg, nbr : array[1..10] of real;
  i, j, l     : integer;
 
begin
  clrscr;
  for i := 1 to 10 do
     begin
    writeln('entrer 10 nombre positive et negative ',i:3,':');
	readln (nbr[i]);
	 end;
  for i := 1 to 10 do
	write(nbr[i] :7);
  for i:= 1 to 10 do
     begin
	     if (nbr[i] >0) then
		  nbr[i]:= pos[j];
		  j:= j + 1;
		 else 
          nbr[i]:= neg[l];
          l:= l+1;		  
     end;
for j:= 1 to j do
writeln; write('pos[j]:7);
for l:= 1 to l do
writeln; writeln('neg[l]:7);
  readln;
end.

Ca me fais 4 jours pour arriver à ça, aidez-moi.
Et merci d'avance.

[krachik]

Bonjour

On va essayer de régler ton souci autrement que dans ton autre discussion. .

Quand tu as une erreur comme ça, souvent le compilateur va t'indiquer la ligne qui ne va pas. Mais en plus, tu as la possibilité de voir de quoi peut venir l'erreur, par exemple dans ton cas Error 113 error in statement.
Et donc en indentant un peu tu verras ce que je veux dire

[khmamed]

Oui j'ai déjà vu ce que signifie "error in statement" mais moi je n'ai oublié aucun end; il faut que tu voies mon code, je pense que tu ne l'as pas vu, seulement tu as lu le type d'erreur.

[droggo]

Lai,

Et on revient une fois de plus à la base : papier + crayon, et tu suis ligne à ligne ton programme, en notant les valeurs successives des variables ...

... généralement, pour de petits programmes comme ça, on trouve ainsi ce qui ne va pas.

oui j ai deja vu ce ke signifie error statement mais mois j ai pa oublie aucune end il faut ke tu me vois mon code je pense ke tu n l a pa vu selment tu a lu le type d error

De plus, un effort sur le français serait appréciable.

[krachik]

Si tu prends la peine d'indenter le code tu verrais aussi facilement, en plus de ce que te dis droggo.
Et pour y revenir, déjà, l et j ne sont pas initialisés + par exemple ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

nbr[i]:= pos[j];

qu'est ce que ça veut dire d'après toi? et pour savoir si tu n'as pas oublier de begin...end regardes par exemple à quoi est lié ton incrémentation de j... etc