Apprendre Maple

[ALS]

Exemple de message:
Comment faire pour programmer une matrice identité d'ordre n?
(c'est à dire une matrice carrée d'ordre n dont les éléments diagonaux valent 1 et les autres éléments valent 0)

[CASTREC]

Exemple de réponse:

> with(linalg):

> identite:=proc(n::posint)
> local A,i,j;
> A:=matrix(n,n);
> for i to n do
> for j to n do
> if i=j then A[i,j]:=1 else A[i,j]:=0 end if
> end do
> end do;
> evalm(A);
> end proc:


> identite(5);

[1 0 0 0 0]
[0 1 0 0 0]
[0 0 1 0 0]
[0 0 0 1 0]
[0 0 0 0 1]

[ALS]

Effectivement, on peut utiliser la forme d'instruction
préexistante suivante: Matrix(n,n,shape=identity)

Exemple:

> M:=Matrix(3,3,shape=identity);