Re: Re: Re: Powershell

From METOO, 2 Weeks ago, written in Plain Text.

This paste is a reply to Re: Re: Powershell from Moi - view diff

Embed

Download Paste or View Raw
Hits: 123

# Dictionnaire de traduction de caractères en code Morse

$morseCode = @{

'M' = '--'; 'N' = '-.' ; 'O' = '---'; 'P' = '.--.'

'Q' = '--.-'; 'R' = '.-.' ; 'S' = '...'

}

# Demander à l'utilisateur de saisir la séquence de caractères à traduire

$inputSequence = Read-Host -Prompt "Entrez une séquence de 1 à 4 caractères (M à S)"

# Vérifier que la séquence saisie est valide

if ($inputSequence.Length -le 4 -and $inputSequence -cmatch '^[M-S]+$') {

# Traduire chaque caractère en code Morse et afficher le résultat à l'écran

$morseSequence = $inputSequence.ToUpper() -split '' | ForEach-Object { $morseCode[$_] } -join ' '

Write-Host "Séquence saisie : $inputSequence"

Write-Host "Séquence en code Morse : $morseSequence"

} else {

Write-Host "Séquence invalide. Veuillez saisir une séquence de 1 à 4 caractères (M à S)."

Author

Title

Language

Your paste - Paste your paste here

Private - Private paste aren't shown in recent listings.

Delete After - When should we delete your paste?

Spam protection -

{"html5":"htmlmixed","css":"css","javascript":"javascript","php":"php","python":"python","ruby":"ruby","lua":"text\/x-lua","bash":"text\/x-sh","go":"go","c":"text\/x-csrc","cpp":"text\/x-c++src","diff":"diff","latex":"stex","sql":"sql","xml":"xml","apl":"apl","asterisk":"asterisk","c_loadrunner":"text\/x-csrc","c_mac":"text\/x-csrc","coffeescript":"text\/x-coffeescript","csharp":"text\/x-csharp","d":"d","ecmascript":"javascript","erlang":"erlang","groovy":"text\/x-groovy","haskell":"text\/x-haskell","haxe":"text\/x-haxe","html4strict":"htmlmixed","java":"text\/x-java","java5":"text\/x-java","jquery":"javascript","mirc":"mirc","mysql":"sql","ocaml":"text\/x-ocaml","pascal":"text\/x-pascal","perl":"perl","perl6":"perl","plsql":"sql","properties":"text\/x-properties","q":"text\/x-q","scala":"scala","scheme":"text\/x-scheme","tcl":"text\/x-tcl","vb":"text\/x-vb","verilog":"text\/x-verilog","yaml":"text\/x-yaml","z80":"text\/x-z80"}

Re: Re: Re: Powershell

Reply to "Re: Re: Re: Powershell"