Pascal problem with double dimensional function - Programmers Heaven

Howdy, Stranger!

It looks like you're new here. If you want to get involved, click one of these buttons!

Categories

Pascal problem with double dimensional function

Anarki667Anarki667 Posts: 1Member
Hello, i'm pretty new in programming, but got to write a projeckt which makes diverse matrix. I've got a problem with function because can't declare double dimensional matrix. This is the code, can't figure out how to make it.

function detrm(matrix:Array[0..10,0..10] of real; k:integer):real;
var
s,det:real;
b:array[0..25,0..25] of real;
i,j,m,n,c:Integer;
begin
for c:=0 to k do
begin
m:=0;
n:=0;
for i:=0 to k do
begin
for j:=0 to k do
begin
b[i,j]:=0;
if (i<>0) and (j<>c) then
begin
b[m,n]:=matrix[i,j];
end;
end;
end;
end;

end;

Comments

  • Actor21Actor21 Posts: 35Member
    types cannot be declared in the parameter list of a function.

    [code]
    [red]type
    matrixtype = array[0..10,0..10] of real ;[/red]

    function detrm(matrix : [red]matrixtype[/red] ; k : integer) : real ;

    var
    s,det:real;
    b:array[0..25,0..25] of real;
    i,j,m,n,c:Integer;

    begin
    for c:=0 to k do
    begin
    m:=0;
    n:=0;
    for i:=0 to k do
    begin
    for j:=0 to k do
    begin
    b[i,j]:=0;
    if (i<>0) and (j<>c) then
    begin
    b[m,n]:=matrix[i,j];
    end;
    end;
    end;
    end;

    end;
    [/code]
Sign In or Register to comment.