Registriert seit: 17. Nov 2005
Ort: Hamburg
1.083 Beiträge
Delphi XE2 Professional
|
Re: Matrizen-Addition
13. Jun 2007, 16:42
Delphi-Quellcode:
For x:= 0 to m-1 do
for y:= 0 to n-1 do begin
matrixA[x,y]:=StrToFloat(SG1.Cells[x,y]);
MatrixB[x,y]:=StrToFloat(SG2.Cells[x,y]);
matrixc[x,y]:=(matrixA[x,y])+(matrixB[x,y]);
SG3.Cells[x,y]:=FloatToStr(matrixc[x,y]);
end;
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....
|