Discussion :

[chavernac]

salut!!!
voilà je suis étudiant et mon prof m'a demander d'écrire un programme qui nous dit si la loi interne associée à une matrice est commutative ou pas.
je vous met ce que j'ai fait

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
 
CONST NMAX=10;
TYPE matrice = ARRAY[1..NMAX,1..NMAX] OF INTEGER;
 
 
 
FUNCTION commutative(m:matrice;n:INTEGER;VAR x,y:INTEGER):BOOLEAN;
VAR i:INTEGER;
BEGIN
	FOR i:=0 TO n-1 DO
	IF (m[n-i,i+1]=m[i+1,n-i]) THEN
		BEGIN
			x:=m[n-i,i+1];
			y:=m[i+1,n-i];
			WRITELN('loi_non_commutative en');
			WRITELN(x,y);
			commutative:=FALSE;
		END
	ELSE
		BEGIN
			WRITELN('loi_commutative');
			commutative:=TRUE;
		END
END;
begin end.

dèjà, le premier bug dans mon truc, c'est qu'il faut obligatoirement que je rajoute un begin et un end à la fin avec rien entre les deux sinon il me dit "end of file unexpected"
là je comprend pas.

ensuite j'aimerai vérifer si mon programme marche bien mais j'arrive pas à écrire une matrice dans pascal et encore moins à appeler ma fonction.
je sais pas comment on fait!!!!

aider s'il vous plait


Titre modifié et balises [code] ajoutées par Hdd34
Merci de consulter les règles du forum

[Eric Sigoillot]

Il est clairement demandé dans les règles du forum de spécifier un titre correct et explicite. Celui-ci a été modifié en conséquence...

Un compilateur sert à compiler un programme. Or un programme ne peut se résumer à un simple fonction se baladant toute seule. Il est donc tout à fait logique de devoir ajouter un bloc begin...end. qui correspond au programme principal en lui-même...

Pour créer une matrice, il suffit de déclarer une variable de type matrice, de la remplir et de la passer en paramètre à la fonction. Par exemple :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
...
var
  M: Matrice;
  x, y: Integer;
  Commute: Boolean;
begin
  M[1][1] := 1;
  M[1][2] := 2;
  M[2][1] := 3;
  M[1][2] := 4;
 
  Commute := Commutative(M, 2, x, y);
end.

Le rôle de x et y est encore obscur pour le coup. Surtout que je ne vois pas trop pourquoi ils sont passés en paramètres par adresse (avec var), mais bon...

@++

[chavernac]

meric beaucoup d'avoir répondu.

mais j'ai d'autre question plus pratiques concernant pascal en général.
un foi que j'ai fais mon programme, je fais quoi?

apparement, il faut appuyer sur alt+F9 pour compiler mais après, si je veu l'utiliser je dois faire quoi?

[Eric Sigoillot]

si je veu l'utiliser je dois faire quoi?

L'exécuter par exemple ? Ca se dit Runen anglais si ça peut aider...

@++