generer une matrice sur maple

[invitec59380e1]

bonjour,
savez vous comment je pourrai generer une matrice carré sur maple qui soit composée que de 0 et 1 et qui soit symetrique et avec une diagonal de 0?

merci pour votre aide !
-----

[invite7fe3c3ee]

Avec Maple je ne sais pas mais il doit être facile d'écrire ce programme (ici en langage Xcas et en français) en Maple:

Matrice(n):={
  local M,j,k,temp;
  M:=matrix(n,n); // matrice de zéros
  pour j de 0 jusque n-1 faire
    pour k de j+1 jusque n-1 faire
      temp:=alea(2);
      M[j,k]:=temp;
      M[k,j]:=temp;
    fpour
  fpour
  retourne M
}