{ Extraction sous forme de tableaux           }
{ de caracteres successifs des caracteres     }
{ d'un tableau de chaines de caracteres       }
{ Affichage de ces tableaux de caracteres     }

constante entier N <- 4
constante entier M <- ...

action principale()
  Locales
    ts : Tableau [N] de chaine
    i,j : entier
    tcl : entier
    tc : Tableau [M] de caractere
  ts[0] <- "ABC"
  ts[1] <- "!!&&%%"
  ts[2] <- ""
  ts[3] <- "âçéè"
  pour i de 0 à N-1 faire
    tc <- ts[i].toCharArray()           { ??? }
    tcl <- ts[i].length()               { ??? }
    Ecran.afficher(tcl," : ")
    pour j de 0 à tcl-1 faire
      Ecran.afficher(tc[j])
    fait
    Ecran.sautDeLigne()
  fait
fin action