c quoi le fuck

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : c quoi le fuck

os2

je sais pas si je suis sou mais j'arrive pas a trouver l'erreur
c'est marqué...

Code :

unit produit;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls;
type
matrice1=array[1..2,1..3]of integer;
matrice2=array[1..3,1..2]of integer;
matrice=array[1..2,1..2]of integer;
type
TForm1 = class(TForm)
Button2: TButton;
RichEdit3: TRichEdit;
procedure Button2Click(Sender: TObject);
private
function Produit2(MatA:matrice1;MatB:matrice2):matrice;
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button2Click(Sender: TObject);
var
i,j,k:integer;
ok:boolean;
begin
matrice1[1][1]:=1; //erreur [Error] produit.pas(38): '(' expected but '[' found
matrice1[1][2]:=2;
matrice1[1][3]:=3;
matrice1[2][1]:=4;
matrice1[2][2]:=5;
matrice1[2][3]:=6;
matrice1[1][1]:=1;
matrice1[1][2]:=2;
matrice1[2][1]:=3;
matrice1[2][2]:=4;
matrice1[3][1]:=5;
matrice1[3][2]:=6;
matrice:=Produit2(matrice1,matrice2);
end;
function TForm1.Produit2(MatA,MatB:Matrice):matrice;
var i,j,k:integer;
MatC:matrice;
begin
for i:=1 TO high(MatA) DO
for j:=1 TO high(MatA) DO
begin
MatC[i,j]:=0;
for k:=1 TO high(MatA) DO
MatC[i,j]:=MatC[i,j]+MatA[i,k]*MatB[k,j];
end;
result:=matc;
end;
end.

Message édité par os2 le 16-12-2002 à 23:53:58

---------------
Borland rulez: http://pages.infinit.net/borland

Publicité

zion

Plop

c clair que tu as bu, matrice1 que tu utilises, c ton type, mais t'as pas défini de variables dans ta procédure de ce type la, donc je vois pas comment tu espères l'utiliser :heink:

---------------
Informaticien.be - Lancez des défis à vos amis

antp

Super Administrateur
Champion des excuses bidons

T'aurais du mettre "var" à la place de "type"... et choisir un meilleur titre

---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

FORUM HardWare.fr

Programmation

Delphi/Pascal

c quoi le fuck

Sujets relatifs
Plus de sujets relatifs à : c quoi le fuck

Page générée en 0.045 secondes