Hash from two arrays: Difference between revisions
Content added Content deleted
(revert spam) |
mNo edit summary |
||
| Line 1: | Line 1: | ||
[http://belikan.ifrance.com/library/patente-per.htm patente per aprire agenzia viaggi] [http://liubash.ifrance.com/new/famosas-brasileiras.htm famosas brasileiras] [http://shmarodral.ifrance.com/text/un-emozione.htm un emozione per sempre] [http://infunt.ifrance.com/articles/rasaerba-valex/ rasaerba valex] [http://animaetrix00.ifrance.com/content/agenzie-immobiliari/ agenzie immobiliari ferrara provincia] [http://feelosof.ifrance.com/description/gabbro/ gabbro] [http://cikumuffin.ifrance.com/topic/qatar-airline/ qatar airline] [http://firejedi.ifrance.com/new/dolfi-hi/ dolfi hi] [http://chrystiala.ifrance.com/library/mora-assemblaggio.htm mora assemblaggio] [http://liubash.ifrance.com/new/gaber-fernandez.htm gaber fernandez] [http://eccoblackfin.ifrance.com/html/tecnico-venditore.htm tecnico venditore verona (regione veneto verona provincia)] [http://ohmygoshalix.ifrance.com/blog/gg-d.htm gg d agostino] [http://eccoblackfin.ifrance.com/html/telecamere-sony.htm telecamere sony trv] [http://belikan.ifrance.com/library/scale-arabe.htm scale arabe] [http://shotlandetz.ifrance.com/blog/era-cd/ era cd] [http://firejedi.ifrance.com/new/hi-fi/ hi fi da muro] [http://jojorock.ifrance.com/articles/pioneer-diffusori/ pioneer diffusori] [http://chrystiala.ifrance.com/library/la-carriera.htm la carriera di suzanne] [http://lethalga.ifrance.com/topic/foto-gratis/ foto gratis sul cantante luca di risio] [http://infunt.ifrance.com/articles/ugl/ ugl] [http://shmarodral.ifrance.com/text/kuwait-airways.htm kuwait airways] [http://jazzyjoe.ifrance.com/notebook-geforce/ notebook geforce 6600] [http://belikan.ifrance.com/library/mensagem-da.htm mensagem da vivo em portugues] [http://infunt.ifrance.com/articles/batteria-litio/ batteria litio siemens me 45] [http://thecakeblog.ifrance.com/articles/samuele-riva/ samuele riva] [http://lethalga.ifrance.com/topic/the-corrs/ the corrs summer sunshine] [http://emrinalexander.ifrance.com/styles/mucc.htm mucc] [http://firejedi.ifrance.com/new/mein-block/ mein block instrumental] [http://eccoblackfin.ifrance.com/html/batteria-per.htm batteria per cordless] [http://jojorock.ifrance.com/articles/dsp-arezzo/ dsp arezzo] [http://chrystiala.ifrance.com/library/bulldog-allevamenti.htm bulldog allevamenti in roma] [http://chrystiala.ifrance.com/library/quattrocchi-download.htm quattrocchi download] [http://infunt.ifrance.com/articles/nanotubi/ nanotubi] [http://pouringsunny.ifrance.com/description/centro-morrone/ centro morrone] [http://feelosof.ifrance.com/description/intro-by/ intro by paperboy] [http://cikumuffin.ifrance.com/topic/piscine-rigide/ piscine rigide] [http://pouringsunny.ifrance.com/description/everytime-di/ everytime di britney spaers] [http://emrinalexander.ifrance.com/styles/perizomi.htm perizomi] [http://firejedi.ifrance.com/new/canon-eos/ canon eos 1d] [http://jene7777777.ifrance.com/new/voglia-di.htm voglia di sesso] [http://jojorock.ifrance.com/articles/suzuki/ suzuki] [http://infunt.ifrance.com/articles/usb-/ usb 2 0 pcmciacard] [http://ohmygoshalix.ifrance.com/blog/najaf.htm najaf] [http://makkiesan.ifrance.com/sex-animal.htm sex animal videoclip] [http://lethalga.ifrance.com/topic/organizer/ organizer] [http://seachildelf.ifrance.com/resources/prezzi-biglietti/ prezzi biglietti treni italia] [http://firejedi.ifrance.com/new/noti-play/ noti play] [http://ohmygoshalix.ifrance.com/blog/lettore-mp.htm lettore mp3 512mb ipod] [http://emrinalexander.ifrance.com/styles/blondei.htm blondei] [http://liubash.ifrance.com/new/www-radio.htm www radio formula com mx] [http://animaetrix00.ifrance.com/content/fuck-your/ fuck your right back] [http://seachildelf.ifrance.com/resources/canti-brigantaggio/ canti brigantaggio] [http://lethalga.ifrance.com/topic/vivoperlei/ vivoperlei] [http://jazzyjoe.ifrance.com/los-redondos/ los redondos] [http://shmarodral.ifrance.com/text/infissi-in.htm infissi in pvc] [http://eccoblackfin.ifrance.com/html/il-paradiso.htm il paradiso perduto della appeal] [http://cikumuffin.ifrance.com/topic/ratchet-e/ ratchet e clank] [http://feelosof.ifrance.com/description/immagini-lesbo/ immagini lesbo] [http://feelosof.ifrance.com/description/marrakech-hotel/ marrakech hotel] [http://liubash.ifrance.com/new/www-cercoamicivip.htm www cercoamicivip] [http://shmarodral.ifrance.com/text/casse-accessori.htm casse accessori philips audio video] [http://listsobacka.ifrance.com/small/www-musicvideo.htm www musicvideo com] [http://jazzyjoe.ifrance.com/rossellabrescia/ rossellabrescia] [http://seachildelf.ifrance.com/resources/il-re/ il re pastore sinfonia] [http://eccoblackfin.ifrance.com/html/adsl-tiscali.htm adsl tiscali] [http://seachildelf.ifrance.com/resources/ejaculation/ ejaculation] [http://listsobacka.ifrance.com/small/notebook-hp.htm notebook hp nx8220] [http://animaetrix00.ifrance.com/content/www-aie/ www aie srl it] [http://animaetrix00.ifrance.com/content/gratis-video/ gratis video porno] [http://cikumuffin.ifrance.com/topic/unicredito-banca/ unicredito banca] [http://emrinalexander.ifrance.com/styles/motoseghe-da.htm motoseghe da taglio] [http://makkiesan.ifrance.com/ya-no.htm ya no queda nada tito nieves] [http://jojorock.ifrance.com/articles/honey-rabbit/ honey rabbit] [http://lethalga.ifrance.com/topic/yves-saint/ yves saint laurent] [http://jazzyjoe.ifrance.com/volkswagen-/ volkswagen 9 posti] [http://lethalga.ifrance.com/topic/hard-disk/ hard disk box firewire] [http://jazzyjoe.ifrance.com/netgear-wireless/ netgear wireless router] [http://makkiesan.ifrance.com/bella-grazia.htm bella grazia] [http://ohmygoshalix.ifrance.com/blog/netsky-p.htm netsky p] [http://makkiesan.ifrance.com/muvo-creative.htm muvo creative] [http://listsobacka.ifrance.com/small/prima-squadriglia.htm prima squadriglia] [http://eccoblackfin.ifrance.com/html/stampanti-brother.htm stampanti brother hl 2040] [http://pouringsunny.ifrance.com/description/topografia-italia/ topografia italia veneto] [http://makkiesan.ifrance.com/benq-dc.htm benq dc 50] [http://beatpoetsa.ifrance.com/description/chamisso-adalbert.htm chamisso adalbert von] [http://jojorock.ifrance.com/articles/sharp-ar/ sharp ar 5316] [http://lethalga.ifrance.com/topic/sister-act/ sister act 2 joyful joyful] [http://chrystiala.ifrance.com/library/policyjne.htm policyjne] [http://infunt.ifrance.com/articles/golden-dragon/ golden dragon] [http://cikumuffin.ifrance.com/topic/elthon-john/ elthon john] [http://chrystiala.ifrance.com/library/milano-.htm milano atene] [http://jene7777777.ifrance.com/new/viaggio-nella.htm viaggio nella terra dei morti] [http://animaetrix00.ifrance.com/content/microlaser/ microlaser] [http://lethalga.ifrance.com/topic/la-ragazza/ la ragazza del riformatorio] [http://chrystiala.ifrance.com/library/su-aste.htm su aste] [http://shotlandetz.ifrance.com/blog/ufo/ ufo] [http://eccoblackfin.ifrance.com/html/giovanni-boccaccio.htm giovanni boccaccio] [http://firejedi.ifrance.com/new/kettler-traveller/ kettler traveller] [http://jojorock.ifrance.com/articles/www-moby/ www moby it] [http://jojorock.ifrance.com/articles/driver/ driver 2] [http://shotlandetz.ifrance.com/blog/radeon-xpress/ radeon xpress] [http://infunt.ifrance.com/articles/telefono-cordless/ telefono cordless segretaria] [http://seachildelf.ifrance.com/resources/zurigo-/ zurigo brindisi] [http://feelosof.ifrance.com/description/coded-arms/ coded arms] [http://jazzyjoe.ifrance.com/remota-backup/ remota backup] [http://seachildelf.ifrance.com/resources/natalie-imbruglia/ natalie imbruglia left of the middle] [http://ohmygoshalix.ifrance.com/blog/kia-clarus.htm kia clarus] [http://belikan.ifrance.com/library/george-bensongreatest.htm george bensongreatest hits] [http://animaetrix00.ifrance.com/content/nokia-n/ nokia n gage] [http://belikan.ifrance.com/library/temporary-health.htm temporary health insurance] [http://shotlandetz.ifrance.com/blog/night-club/ night club milano] [http://cikumuffin.ifrance.com/topic/sito-costantino/ sito costantino] [http://emrinalexander.ifrance.com/styles/www-medievo.htm www medievo it] [http://beatpoetsa.ifrance.com/description/wqww-google.htm wqww google it] [http://listsobacka.ifrance.com/small/web-hosting.htm web hosting gratis] [http://shmarodral.ifrance.com/text/immagini-per.htm immagini per ecks vs sever 2] [http://eccoblackfin.ifrance.com/html/trasporto-medicinali.htm trasporto medicinali] [http://eccoblackfin.ifrance.com/html/bmw-cabrio.htm bmw cabrio 2002] [http://beatpoetsa.ifrance.com/description/percorso-rosso.htm percorso rosso] [http://thecakeblog.ifrance.com/articles/pc/ pc2700 333] [http://belikan.ifrance.com/library/telgua.htm telgua] [http://beatpoetsa.ifrance.com/description/recupero-dati.htm recupero dati nascosti] [http://infunt.ifrance.com/articles/magazin-ne/ magazin ne] [http://beatpoetsa.ifrance.com/description/tatuaggio-cantante.htm tatuaggio cantante] [http://emrinalexander.ifrance.com/styles/borsa-portatile.htm borsa portatile] [http://liubash.ifrance.com/new/spartitti-gratis.htm spartitti gratis] [http://feelosof.ifrance.com/description/monitor-lcd/ monitor lcd packard bell] [http://seachildelf.ifrance.com/resources/battiti-lenti/ battiti lenti de cuore da 10 anni] [http://shmarodral.ifrance.com/text/video-porno.htm video porno interi da scaricare gratis] [http://chrystiala.ifrance.com/library/plextor-pxuf.htm plextor px716uf] [http://feelosof.ifrance.com/description/fabbrica-di/ fabbrica di ufficiali] [http://jene7777777.ifrance.com/new/www-gogoboys.htm www gogoboys com br] [http://animaetrix00.ifrance.com/content/luci-del/ luci del circo] [http://pouringsunny.ifrance.com/description/add-new/ add new link] [http://belikan.ifrance.com/library/gan-ma.htm gan ma] [http://animaetrix00.ifrance.com/content/driver-motherboard/ driver motherboard] [http://animaetrix00.ifrance.com/content/voli-dubai/ voli dubai] [http://firejedi.ifrance.com/new/atv-off/ atv off road] [http://thecakeblog.ifrance.com/articles/batteria-samsung/ batteria samsung a800] [http://animaetrix00.ifrance.com/content/hotel-milano/ hotel milano sala riunioni] [http://shmarodral.ifrance.com/text/jessica-simpson.htm jessica simpson foto] [http://emrinalexander.ifrance.com/styles/digicom-tintoretto.htm digicom tintoretto] [http://firejedi.ifrance.com/new/pene-curvo/ pene curvo] [http://ohmygoshalix.ifrance.com/blog/ram-edo.htm ram edo] [http://ohmygoshalix.ifrance.com/blog/dana-e.htm dana e roby] [http://jazzyjoe.ifrance.com/www-booble/ www booble com] [http://firejedi.ifrance.com/new/ti-voglio/ ti voglio vestita] [http://eccoblackfin.ifrance.com/html/phangnga-provincia.htm phangnga (provincia)] [http://ohmygoshalix.ifrance.com/blog/www-superpam.htm www superpam com] [http://beatpoetsa.ifrance.com/description/sound-blaster.htm sound blaster audigy 2 value bulk] [http://jazzyjoe.ifrance.com/vesa-standard/ vesa standard] [http://infunt.ifrance.com/articles/sigla-telefilm/ sigla telefilm] [http://infunt.ifrance.com/articles/lopez-video/ lopez video] [http://shmarodral.ifrance.com/text/mundo-reggaeton.htm mundo reggaeton] [http://infunt.ifrance.com/articles/turbamento/ turbamento] [http://jene7777777.ifrance.com/new/graso.htm graso] [http://makkiesan.ifrance.com/acquistare-video.htm acquistare video balli di gruppo] [http://ohmygoshalix.ifrance.com/blog/gsx-r.htm gsx r 600] [http://shotlandetz.ifrance.com/blog/ferdi-tayfur/ ferdi tayfur] [http://seachildelf.ifrance.com/resources/quali-amori/ quali amori] [http://ohmygoshalix.ifrance.com/blog/focosa.htm focosa] [http://liubash.ifrance.com/new/watteau.htm watteau] [http://seachildelf.ifrance.com/resources/cd-philips/ cd philips tavolo] [http://jene7777777.ifrance.com/new/panda.htm panda 1997] [http://belikan.ifrance.com/library/onano.htm onano] [http://chrystiala.ifrance.com/library/ponostar-asiatiche.htm ponostar asiatiche] [http://emrinalexander.ifrance.com/styles/king-of.htm king of fighters 2002 in casa] [http://belikan.ifrance.com/library/k.htm k] [http://jene7777777.ifrance.com/new/armadio-per.htm armadio per bambino] [http://listsobacka.ifrance.com/small/blue-to.htm blue to] [http://animaetrix00.ifrance.com/content/usb-memory/ usb memory stick] [http://shotlandetz.ifrance.com/blog/dolina/ dolina] [http://listsobacka.ifrance.com/small/iee.htm iee] [http://liubash.ifrance.com/new/bang-bang.htm bang bang bang] [http://feelosof.ifrance.com/description/trasporto-merci/ trasporto merci logistica] [http://chrystiala.ifrance.com/library/transcend-mmc.htm transcend mmc dv 256] [http://shotlandetz.ifrance.com/blog/io-si/ io si] [http://pouringsunny.ifrance.com/description/kingston/ kingston 1024] [http://liubash.ifrance.com/new/scratchdance.htm scratchdance] [http://chrystiala.ifrance.com/library/maco-s.htm maco s spa] [http://chrystiala.ifrance.com/library/creative-slim.htm creative slim 1gb] [http://beatpoetsa.ifrance.com/description/giorgio-iii.htm giorgio iii] [http://chrystiala.ifrance.com/library/testo-canzone.htm testo canzone in italiano dei blue] [http://belikan.ifrance.com/library/samsung-.htm samsung videocamera ego] [http://chrystiala.ifrance.com/library/to-nem.htm to nem ai maria] [http://beatpoetsa.ifrance.com/description/belanova.htm belanova] [http://lethalga.ifrance.com/topic/turrican/ turrican] [http://shotlandetz.ifrance.com/blog/christie/ christie] [http://eccoblackfin.ifrance.com/html/horrr.htm horrr] [http://emrinalexander.ifrance.com/styles/gazzano.htm gazzano] [http://chrystiala.ifrance.com/library/ecografia.htm ecografia] [http://makkiesan.ifrance.com/toner-hp.htm toner hp 4550 dn] [http://feelosof.ifrance.com/description/pentium-dissipatori/ pentium dissipatori e ventole] [http://belikan.ifrance.com/library/calendario-di.htm calendario di victoria pennington] [http://shmarodral.ifrance.com/text/mantenimiento.htm mantenimiento] [http://jazzyjoe.ifrance.com/girl-nude/ girl nude] [http://pouringsunny.ifrance.com/description/lisieux/ lisieux] [http://lethalga.ifrance.com/topic/reggio-emilia/ reggio emilia] [http://eccoblackfin.ifrance.com/html/dvd-recorder.htm dvd recorder vhs lg] [http://seachildelf.ifrance.com/resources/infanzia-vocazione/ infanzia vocazione e prime esperienze di giacomo casanova veneziano] [http://cikumuffin.ifrance.com/topic/la-scola/ la scola della musica] [http://feelosof.ifrance.com/description/moore-catherine/ moore catherine lucille] [http://jojorock.ifrance.com/articles/gilda-di/ gilda di firenze] [http://thecakeblog.ifrance.com/articles/lawrence-tierney/ lawrence tierney] [http://belikan.ifrance.com/library/immagini-di.htm immagini di edipo] [http://cikumuffin.ifrance.com/topic/estrellita/ estrellita] [http://makkiesan.ifrance.com/sarai.htm sarai] [http://animaetrix00.ifrance.com/content/luomo-delle/ luomo delle montagne] [http://feelosof.ifrance.com/description/fabrizio-faniello/ fabrizio faniello] [http://liubash.ifrance.com/new/brock-lesner.htm brock lesner] [http://ohmygoshalix.ifrance.com/blog/premi-letterari.htm premi letterari] [http://makkiesan.ifrance.com/mp-de.htm mp3 de nirvana] [http://liubash.ifrance.com/new/djm.htm djm 500] [http://jene7777777.ifrance.com/new/video-killed.htm video killed the radio] [http://pouringsunny.ifrance.com/description/www-fotosprivadas/ www fotosprivadas com] [http://shotlandetz.ifrance.com/blog/www-giochi/ www giochi pc it] [http://eccoblackfin.ifrance.com/html/graver-dans.htm graver dans la roche] [http://eccoblackfin.ifrance.com/html/dvd-r.htm dvd r70] [http://cikumuffin.ifrance.com/topic/tiziano-ferro/ tiziano ferro nonme lo so spiegare] [http://animaetrix00.ifrance.com/content/la-donna/ la donna il sesso il superuomo] [http://feelosof.ifrance.com/description/raccolta-dvd/ raccolta dvd bruce lee film] [http://emrinalexander.ifrance.com/styles/argenteria-firenze.htm argenteria firenze] [http://lethalga.ifrance.com/topic/jomini-henri/ jomini henri] [http://lethalga.ifrance.com/topic/musicgel/ musicgel] [http://jene7777777.ifrance.com/new/medio.htm medio] [http://jojorock.ifrance.com/articles/costi-ionita/ costi ionita] [http://firejedi.ifrance.com/new/zoom-x/ zoom 10x] [http://makkiesan.ifrance.com/vlatka-pokos.htm vlatka pokos] [http://makkiesan.ifrance.com/siamo-soli.htm siamo soli di vasco rossi] [http://animaetrix00.ifrance.com/content/fonderia-piombo/ fonderia piombo] [http://chrystiala.ifrance.com/library/discorso-del.htm discorso del sindaco] [http://cikumuffin.ifrance.com/topic/yon-puta/ yon puta] [http://lethalga.ifrance.com/topic/jean-simmons/ jean simmons] [http://shmarodral.ifrance.com/text/automodellismo-scoppio.htm automodellismo scoppio 1 5] [http://jene7777777.ifrance.com/new/hp-.htm hp 6210 fax] [http://seachildelf.ifrance.com/resources/geforce-/ geforce 6600 256 mb agp] [http://listsobacka.ifrance.com/small/google-moj.htm google moj posao] [http://makkiesan.ifrance.com/software-per.htm software per lg u8110] [http://ohmygoshalix.ifrance.com/blog/bertallosophie-vol.htm bertallosophie vol 3] [http://makkiesan.ifrance.com/nietzsche-opere.htm nietzsche opere complete] [http://animaetrix00.ifrance.com/content/sinudyne/ sinudyne 29] [http://jojorock.ifrance.com/articles/cliff-richard/ cliff richard live castle in the air] [http://beatpoetsa.ifrance.com/description/nikon-speedlight.htm nikon speedlight] [http://jojorock.ifrance.com/articles/mercato-della/ mercato della moto] [http://cikumuffin.ifrance.com/topic/iz/ iz] [http://feelosof.ifrance.com/description/filesharing-italiano/ filesharing italiano] [http://emrinalexander.ifrance.com/styles/archivio-immagini.htm archivio immagini] [http://cikumuffin.ifrance.com/topic/odore-di/ odore di sborra] [http://infunt.ifrance.com/articles/ekstrabladet/ ekstrabladet] [http://shotlandetz.ifrance.com/blog/gli-scettici/ gli scettici] {{task}} |
|||
{{task}} |
|||
Using two Arrays of equal length, create a Hash object where the elements from on array (the keys) are linked to the elements of the other (the values) |
Using two Arrays of equal length, create a Hash object where the elements from on array (the keys) are linked to the elements of the other (the values) |
||
| Line 44: | Line 44: | ||
end loop; |
end loop; |
||
for I in Key_List'range loop |
for I in Key_List'range loop |
||
Ada.Text_Io.Put_Line(To_String(Key_List(I)) |
Ada.Text_Io.Put_Line(To_String(Key_List(I)) |
||
To_String(Hash.Element(Key_List(I)))); |
|||
end loop; |
|||
end Hash_Map_Test; |
|||
==[[C plus plus|C++]]== |
|||
[[Category:C plus plus]] |
|||
By strict definition a std::map is not a hash, but it provides the same functionality (but note that some C++ has hash sets too). |
|||
'''Compiler:''' g++ 4.0.2 |
|||
#include <map> |
|||
#include <string> |
|||
int |
|||
main( int argc, char* argv[] ) |
|||
{ |
|||
std::string keys[] = { "1", "2", "3" } ; |
|||
std::string vals[] = { "a", "b", "c" } ; |
|||
std::map< std::string, std::string > hash ; |
|||
for( int i = 0 ; i < 3 ; i++ ) |
|||
{ |
|||
hash[ keys[i] ] = vals[i] ; |
|||
} |
|||
} |
|||
Alternatively: |
|||
#include <map> // for std::map |
|||
#include <algorithm> // for std::transform |
|||
#include <string> // for std::string |
|||
#include <utility> // for std::make_pair |
|||
int main() |
|||
{ |
|||
std::string keys[] = { "one", "two", "three" }; |
|||
std::string vals[] = { "foo", "bar", "baz" }; |
|||
std::map<std::string, std::string> hash; |
|||
std::transform(keys, keys+3, |
|||
vals, |
|||
std::inserter(hash, hash.end()), |
|||
std::make_pair<std::string, std::string>); |
|||
} |
|||
==[[C sharp|C#]]== |
|||
[[Category:C sharp]] |
|||
System.Collections.HashTable h = new System.Collections.HashTable(); |
|||
string[] arg_keys = {"foo","bar","val"}; |
|||
string[] arg_values = {"little", "miss", "muffet"}; |
|||
//Some basic error checking |
|||
int arg_length = 0; |
|||
if ( arg_keys.Length == arg_values.Length ) { |
|||
arg_length = arg_keys.Length; |
|||
} |
|||
for( int i = 0; i < arg_length; i++ ){ |
|||
h.add( arg_keys[i], arg_values[i] ); |
|||
} |
|||
Alternate way of adding values |
|||
for( int i = 0; i < arg_length; i++ ){ |
|||
h[ arg_keys[i] ] = arg_values[i]; |
|||
} |
|||
==[[D]]== |
|||
[[Category:D]] |
|||
char[][] keys = ["one", "two", "three"] |
|||
int[] values = [1, 2, 3]; |
|||
int[char[]] hash; |
|||
foreach(i,k; keys) |
|||
hash[k] = values[i]; |
|||
==[[E]]== |
|||
[[Category:E]] |
|||
def keys := ["one", "two", "three"] |
|||
def values := [1, 2, 3] |
|||
__makeMap.fromColumns(keys, values) |
|||
==[[Haskell]]== |
|||
[[Category:Haskell]] |
|||
'''Interpreter:''' [[GHC|GHCi]] 6.6 |
|||
import Data.Map |
|||
makeMap ks vs = fromList $ zip ks vs |
|||
mymap = makeMap ['a','b','c'] [1,2,3] |
|||
==[[JavaScript]]== |
|||
[[Category:JavaScript]] |
|||
var keys = ['a', 'b', 'c']; |
|||
var values = [1, 2, 3]; |
|||
var map = {}; |
|||
for(var i in keys) { |
|||
map[ keys[i] ] = values[i]; |
|||
} |
|||
==[[OCaml]]== |
|||
[[Category:OCaml]] |
|||
The idiomatic solution uses lists rather than arrays. |
|||
let keys = [ "foo"; "bar"; "baz" ] |
|||
and vals = [ 16384; 32768; 65536 ] |
|||
and hash = Hashtbl.create 0;; |
|||
List.iter2 (Hashtbl.add hash) keys vals;; |
|||
In the extremely unlikely event that it was actually necessary to use arrays, the solution would become slightly less elegant: |
|||
let keys = [| "foo"; "bar"; "baz" |] |
|||
and vals = [| 16384; 32768; 65536 |] |
|||
and hash = Hashtbl.create 0;; |
|||
for i = 0 to Array.length keys - 1 do |
|||
Hashtbl.add hash keys.(i) vals.(i) |
|||
done;; |
|||
In either case, an exception is raised if the inputs are different lengths. |
|||
==[[Perl]]== |
|||
[[Category:Perl]] |
|||
'''Interpreter:''' [[Perl]] 5 |
|||
use List::MoreUtils qw(zip); |
|||
my @keys = qw(a b c); |
|||
my @vals = (1, 2, 3); |
|||
my %hash = zip @keys, @vals; |
|||
Using no modules: |
|||
my %hash; |
|||
@hash{qw(a b c)} = (1, 2, 3); |
|||
==[[PHP]]== |
|||
[[Category:PHP]] |
|||
PHP 5: |
|||
$keys = array('a', 'b', 'c'); |
|||
$values = array(1, 2, 3); |
|||
$hash = array_combine($keys, $values); |
|||
PHP 4: |
|||
$keys = array('a', 'b', 'c'); |
|||
$values = array(1, 2, 3); |
|||
$hash = array(); |
|||
for ($idx = 0; $idx < count($keys); $idx++) { |
|||
$hash[$keys[$idx]] = $values[$idx]; |
|||
} |
|||
==[[Pop11]]== |
|||
[[Category:Pop11]] |
|||
vars keys = { 1 a b c}; |
|||
vars vals = { 2 3 valb valc}; |
|||
vars i; |
|||
;;; Create hash table |
|||
vars ht = newmapping([], 500, 0, true); |
|||
;;; Loop over input arrays (vectors) |
|||
for i from 1 to length(keys) do |
|||
vals(i) -> ht(keys(i)); |
|||
endfor; |
|||
==[[Python]]== |
|||
[[Category:Python]] |
|||
'''Interpreter:''' [[Python]] 2.5 |
|||
<pre> |
|||
keys = ['a', 'b', 'c'] |
|||
values = [1, 2, 3] |
|||
hash = dict(zip(keys, values)) |
|||
# Lazily: |
|||
from itertools import izip |
|||
hash = dict(izip(keys, values)) |
|||
</pre> |
|||
==[[Ruby]]== |
|||
[[Category:Ruby]] |
|||
keys=['hal',666,[1,2,3]] |
|||
vals=['ibm','devil',123] |
|||
hash = Hash[*keys.zip(vals).flatten] |
|||
# now hash => {'hal' => 'ibm', 666 => 'devil', [1,2,3] => 123} |
|||
#retrieve the value linked to the key [1,2,3] |
|||
puts hash[ [1,2,3] ] |
|||
#123 |
|||
== [[Scala]] == |
|||
[[Category:Scala]] |
|||
val keys = Array(1, 2, 3) |
|||
val values = Array("A", "B", "C") |
|||
val map = Map(keys.zip(values) : _*) |
|||
// returns Map(1 -> "A", 2 -> "B", 3 -> "C") |
|||
// keys.zip(values) is an array of pairs : Array({1, "A"}, {2, "B"}, {3, "C"}) |
|||
// Map(...) expects multiple pairs arguments. Syntax ": _*" tells the single argument contains multiple values. |
|||
== [[Tcl]] == |
|||
[[Category:Tcl]] |
|||
Arrays in Tcl are automatically associative, i.e. there are no "not hashed arrays". If we can take "arrays of equal length" to mean "<i>lists</i> of equal length", then the task might look like this: |
|||
set keys [list fred bob joe] |
|||
set values [list barber plumber tailor] |
|||
array set arr {} |
|||
foreach a $keys b $values { set $arr($a) $b } |
|||
Revision as of 17:55, 10 September 2007
patente per aprire agenzia viaggi famosas brasileiras un emozione per sempre rasaerba valex agenzie immobiliari ferrara provincia gabbro qatar airline dolfi hi mora assemblaggio gaber fernandez tecnico venditore verona (regione veneto verona provincia) gg d agostino telecamere sony trv scale arabe era cd hi fi da muro pioneer diffusori la carriera di suzanne foto gratis sul cantante luca di risio ugl kuwait airways notebook geforce 6600 mensagem da vivo em portugues batteria litio siemens me 45 samuele riva the corrs summer sunshine mucc mein block instrumental batteria per cordless dsp arezzo bulldog allevamenti in roma quattrocchi download nanotubi centro morrone intro by paperboy piscine rigide everytime di britney spaers perizomi canon eos 1d voglia di sesso suzuki usb 2 0 pcmciacard najaf sex animal videoclip organizer prezzi biglietti treni italia noti play lettore mp3 512mb ipod blondei www radio formula com mx fuck your right back canti brigantaggio vivoperlei los redondos infissi in pvc il paradiso perduto della appeal ratchet e clank immagini lesbo marrakech hotel www cercoamicivip casse accessori philips audio video www musicvideo com rossellabrescia il re pastore sinfonia adsl tiscali ejaculation notebook hp nx8220 www aie srl it gratis video porno unicredito banca motoseghe da taglio ya no queda nada tito nieves honey rabbit yves saint laurent volkswagen 9 posti hard disk box firewire netgear wireless router bella grazia netsky p muvo creative prima squadriglia stampanti brother hl 2040 topografia italia veneto benq dc 50 chamisso adalbert von sharp ar 5316 sister act 2 joyful joyful policyjne golden dragon elthon john milano atene viaggio nella terra dei morti microlaser la ragazza del riformatorio su aste ufo giovanni boccaccio kettler traveller www moby it driver 2 radeon xpress telefono cordless segretaria zurigo brindisi coded arms remota backup natalie imbruglia left of the middle kia clarus george bensongreatest hits nokia n gage temporary health insurance night club milano sito costantino www medievo it wqww google it web hosting gratis immagini per ecks vs sever 2 trasporto medicinali bmw cabrio 2002 percorso rosso pc2700 333 telgua recupero dati nascosti magazin ne tatuaggio cantante borsa portatile spartitti gratis monitor lcd packard bell battiti lenti de cuore da 10 anni video porno interi da scaricare gratis plextor px716uf fabbrica di ufficiali www gogoboys com br luci del circo add new link gan ma driver motherboard voli dubai atv off road batteria samsung a800 hotel milano sala riunioni jessica simpson foto digicom tintoretto pene curvo ram edo dana e roby www booble com ti voglio vestita phangnga (provincia) www superpam com sound blaster audigy 2 value bulk vesa standard sigla telefilm lopez video mundo reggaeton turbamento graso acquistare video balli di gruppo gsx r 600 ferdi tayfur quali amori focosa watteau cd philips tavolo panda 1997 onano ponostar asiatiche king of fighters 2002 in casa k armadio per bambino blue to usb memory stick dolina iee bang bang bang trasporto merci logistica transcend mmc dv 256 io si kingston 1024 scratchdance maco s spa creative slim 1gb giorgio iii testo canzone in italiano dei blue samsung videocamera ego to nem ai maria belanova turrican christie horrr gazzano ecografia toner hp 4550 dn pentium dissipatori e ventole calendario di victoria pennington mantenimiento girl nude lisieux reggio emilia dvd recorder vhs lg infanzia vocazione e prime esperienze di giacomo casanova veneziano la scola della musica moore catherine lucille gilda di firenze lawrence tierney immagini di edipo estrellita sarai luomo delle montagne fabrizio faniello brock lesner premi letterari mp3 de nirvana djm 500 video killed the radio www fotosprivadas com www giochi pc it graver dans la roche dvd r70 tiziano ferro nonme lo so spiegare la donna il sesso il superuomo raccolta dvd bruce lee film argenteria firenze jomini henri musicgel medio costi ionita zoom 10x vlatka pokos siamo soli di vasco rossi fonderia piombo discorso del sindaco yon puta jean simmons automodellismo scoppio 1 5 hp 6210 fax geforce 6600 256 mb agp google moj posao software per lg u8110 bertallosophie vol 3 nietzsche opere complete sinudyne 29 cliff richard live castle in the air nikon speedlight mercato della moto iz filesharing italiano archivio immagini odore di sborra ekstrabladet gli scettici
You are encouraged to solve this task according to the task description, using any language you may know.
Using two Arrays of equal length, create a Hash object where the elements from on array (the keys) are linked to the elements of the other (the values)
Ada
Compiler: GNAT GPL 2007
with Ada.Strings.Hash;
with Ada.Containers.Hashed_Maps;
with Ada.Text_Io;
with Ada.Strings.Unbounded; use Ada.Strings.Unbounded;
procedure Hash_Map_Test is
function Equivalent_Key (Left, Right : Unbounded_String) return Boolean is
begin
return Left = Right;
end Equivalent_Key;
function Hash_Func(Key : Unbounded_String) return Ada.Containers.Hash_Type is
begin
return Ada.Strings.Hash(To_String(Key));
end Hash_Func;
package My_Hash is new Ada.Containers.Hashed_Maps(Key_Type => Unbounded_String,
Element_Type => Unbounded_String,
Hash => Hash_Func,
Equivalent_Keys => Equivalent_Key);
type String_Array is array(Positive range <>) of Unbounded_String;
Hash : My_Hash.Map;
Key_List : String_Array := (To_Unbounded_String("foo"),
To_Unbounded_String("bar"),
To_Unbounded_String("val"));
Element_List : String_Array := (To_Unbounded_String("little"),
To_Unbounded_String("miss"),
To_Unbounded_String("muffet"));
begin
for I in Key_List'range loop
Hash.Insert(Key => (Key_List(I)),
New_Item => (Element_List(I)));
end loop;
for I in Key_List'range loop
Ada.Text_Io.Put_Line(To_String(Key_List(I))