Advertisement
Guest User

Untitled

a guest
Jul 28th, 2017
162
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
q/kdb+ 1.36 KB | None | 0 0
  1. Mon Premier programme :
  2. Principal :
  3.     Actions :
  4.         "Bonjour" !
  5.    
  6.  
  7. Mon deuxième programme :
  8. Principal :
  9.     Rôles :
  10.         nom est un texte
  11.     Actions :
  12.         "Quel est ton prénom" !
  13.         nom ?
  14.         "Tu t'appelles " + nom !
  15.  
  16.  
  17. Syracuse :
  18. ("
  19. La suite de Syracuse est définie ainsi :
  20. - on part d'un entier ;
  21. - s'il est pair, on le divise par 2 ; sinon, on le multiplie par 3 et on ajoute 1 ;
  22. - on recommence la même opération sur l'entier obtenu, et ainsi de suite ; la suite s'arrête si on arrive à 1.
  23. ")
  24. Principal :
  25.     Rôles :
  26.         durée est un nombre vide
  27.         e est un nombre
  28.     Actions :
  29.         demande e
  30.         tant que e est différent de 1, lis
  31.             durée vaut durée + 1
  32.             Si (e mod 2) est égal à 0 alors e vaut e / 2
  33.             Sinon, e vaut e * 3 + 1
  34.         Ferme
  35.         affiche durée
  36.         termine
  37.  
  38.  
  39. Livre : Clonage d'un rond
  40. ("L'utilisation du symbole # avant un acteur permet d'utiliser un clone")
  41. Paragraphe : Magie !
  42.     Rôles :
  43.         rond est un cercle, couleur vaut "bleu", plein vaut "oui", rayon vaut 30,  x vaut 289, y vaut 290
  44.         groupe est un casier de cercle vide
  45.     Actions :
  46.         efface la toile
  47.         projette rond
  48.         ajoute #rond & #rond & #rond dans groupe
  49.         de 1 à 100, lis
  50.             déplace groupe{0} vers le haut de 1
  51.             déplace groupe{1} vers le bas de 1
  52.             déplace groupe{2} vers la droite de 1
  53.             déplace rond vers la gauche de 1
  54.             attends 20 millisecondes
  55.         ferme
  56.         termine
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement