Kurso de Raku / Esencoj / Asociaj datentipoj / Ekzercoj / Anstataŭigi per antonimoj

Solvo: Anstataŭigi per antonimoj

Por solvi la taskon, la enhavo de la dosiero dictionary.raku estas kopiita al la solva dosiero replace-with-antonyms.raku. Post tio, buklo super la eniraj argumentoj provas trovi la vorton en la vortaro, kaj se ĝi povas, ĝi prenas la antonimon. Se ne ekzistas tia vorto en la vortaro, la originala vorto estas uzata.

Kodo

La solvo estas prezentita sube. La vortaro estas montrita nur parte ĉi tie.

my %dictionary =
    'above' => 'below',
    'absent' => 'present',
    'achieve' => 'fail',
    # . . .
    'wrong' => 'right',
    'young' => 'old'    
;

for @*ARGS -> $word {
    say %dictionary{$word} // $word;
}

🦋 Trovu la programon en la dosiero replace-with-antonyms.raku.

Eligo

$ raku exercises/associatives/replace-with-antonyms.raku early morning
late
evening

$ raku exercises/associatives/replace-with-antonyms.raku big soft drive
small
hard
drive

Komentoj

1. La // operatoro estas la difinita-aŭ operatoro, kiu redonas la unuan difinitan operandon.
2. En la hakilo, ĉiuj ŝlosiloj estas vortoj (t.e., ili aspektas kiel identigiloj), do vi ne bezonas citi ilin en la hakilo. Estas do eble krei hakilon, kiel montrite sube:

my %dictionary =
    above => 'below',
    absent => 'present',
    achieve => 'fail',
    # . . .
    wrong => 'right',
    young => 'old'    
;

Kurso navigado

← Poziciaj datentipoj / Subskribante intervalojn   |   Kreado kaj vokado de funkcioj →