Raku kurss / Pamati / Vairāk par tipiem / Asociatīvie datu tipi / Exercises / Aizstāt ar antonīmiem
Risinājums: Aizstāt ar antonīmiem
Lai atrisinātu uzdevumu, faila dictionary.raku saturs tiek nokopēts risinājuma failā replace-with-antonyms.raku. Pēc tam cikls pār input argumentiem mēģina atrast vārdu vārdnīcā, un, ja tas izdodas, tiek ņemts antonīms. Ja vārdnīcā šāda vārda nav, tiek izmantots oriģinālais vārds.
Kods
Risinājums ir parādīts zemāk. Vārdnīca šeit ir parādīta tikai daļēji.
my %dictionary =
'above' => 'below',
'absent' => 'present',
'achieve' => 'fail',
# . . .
'wrong' => 'right',
'young' => 'old'
;
for @*ARGS -> $word {
say %dictionary{$word} // $word;
}🦋 Atrodiet programmu failā replace-with-antonyms.raku.
Izvade
$ raku exercises/associatives/replace-with-antonyms.raku early morning
late
evening
$ raku exercises/associatives/replace-with-antonyms.raku big soft drive
small
hard
driveKomentāri
//operators ir definētais-vai operators, kas atgriež pirmo definēto operandu.- Vārdnīcā visi atslēgas vārdi ir vārdi (t.i., tie izskatās kā identifikatori), tāpēc jums nav nepieciešams tos citēt vārdnīcā. Tādējādi ir iespējams izveidot vārdnīcu, kā parādīts zemāk:
my %dictionary =
above => 'below',
absent => 'present',
achieve => 'fail',
# . . .
wrong => 'right',
young => 'old'
;