Facebook
From q, 1 Week ago, written in Plain Text.
This paste is a reply to Re: Re: tp from heoui - view diff
Embed
Download Paste or View Raw
Hits: 114
  1. # Créer une pile FIFO (Queue)
  2. $FIFO = New-Object System.Collections.Queue
  3.  
  4. # Boucle principale pour saisir les mots
  5. for ($j = 0; $j -lt 4; $j++) {
  6.     while ($true) {
  7.         # Vérifier et afficher la taille et le contenu de la FIFO
  8.         if ($FIFO.Count -gt 0) {
  9.             Write-Host "Taille de la FIFO : $($FIFO.Count)"
  10.             Write-Host "Contenu de la FIFO : $($FIFO -join ', ')"
  11.         } else {
  12.             Write-Host "La FIFO est vide."
  13.         }
  14.  
  15.         # Demander à l'utilisateur de saisir un mot
  16.         $mot = Read-Host "Entrez un mot ('fin' pour terminer la saisie)"
  17.  
  18.         # Vérifier si l'utilisateur souhaite terminer la saisie
  19.         if ($mot -eq 'fin') {
  20.             break 2
  21.         }
  22.  
  23.         # Ajouter le mot à la pile FIFO
  24.         $FIFO.Enqueue($mot)
  25.     }
  26. }
  27.  
  28. # Dépiler un nombre aléatoire de fois (entre 1 et 3)
  29. $nbDepiler = Get-Random -Minimum 1 -Maximum 4
  30. Write-Host "Dépilage de la FIFO $nbDepiler fois..."
  31. for ($i = 0; $i -lt $nbDepiler; $i++) {
  32.     # Vérifier s'il y a des éléments dans la FIFO avant de dépiler
  33.     if ($FIFO.Count -gt 0) {
  34.         $motDepile = $FIFO.Dequeue()
  35.         Write-Host "Élément dépilé : $motDepile"
  36.     } else {
  37.         Write-Host "La FIFO est vide, aucun élément à dépiler."
  38.         break
  39.     }
  40. }
  41.  
  42. Write-Host "Fin du programme."
  43.  

Replies to Re: Re: Re: tp rss

Title Name Language When
Re: Re: Re: Re: tp he text 1 Week ago.