faire une sorte de suite logique avec Qbasic

Salut,

j'ai regardé un truc pour apprendre le Qbasic et à la fin ils me demande de faire un trucs comme ça:
si l'utilisateur rentre par exemple 3:
111
112
113
121
122
etc...
si c'est 4:
1111
1112
1113
etc...

Alors voilà, j'ai un peu de peine. Moi j'ai mis ça:

Code:

  start:
  CLS
  var& = 1
  INPUT "Enter the length ", length%
  dim table nbre%
  ver$ = "false"
  nbre% = 1
  FOR i = 1 TO length% ^ (length% - 1)
  
          FOR j = 1 TO length%
                  
          PRINT nbre%;
          IF j = length% THEN nbre% = nbre% + 1
          PRINT j
  
          NEXT j
   
  NEXT i
  
  PRINT
  INPUT "Restart ? ", rep$
  IF rep$ = "yes" THEN GOTO start ELSE END

Mais ça ne marche évidemment pas.


Quelqu'un pourrait m'aider ?


Et une autre question concernant le Qbasic, chaque fois qu'on met une "," lorsque l'utilisateur doit rentrer des mots, ça fonctionne pas.
Par exemple si le résultat du code est:
"dites Bonjour": salut, ça va ?

lorsque l'utilisateur rentre "salut, ça va ?" ça ne fonctionne pas parce qu'il a mis une "," dans sa phrase, vous sauriez pourquoi et comment faire pour que ça fonctionne ?


Voilà, merci


[ Ce message a été modifié par : : MichaelJackfan le 31-10-2006 08:32 ]