Retrieving an Element of an Array

x700 vivo ill be there corse automobili suonerie midi cellulari tvc lcd 32 iovine patrizia software wallpaper lacie hard drive 250 gb usb 2 0 bella senz anima mp3 il pepitone corporate gifts evangelist oficina pesi balt tastiera touch km0 mercedes c diesel auto km 0 valvole sfera acqua opel vectra 3 serie una ragazza che si eccita nuda pelicula titanic solo irei i mastini della guerra olio d oliva toshiba combo midi mama dalida camerette componibili helen hayes savana selvaggia email in roma saramacca ford fiesta windsor catasto rovigo peter pan cd pani dolci a forma umana tv lcd hdd la minorenne harry potter attori volo per hannover ospedali del lazio peugeot 205 cabrio gtv a roma fla hai luli sky star2 calici cristallo sfondi pocket pc lcd philips 26 slo londra ballets trockadero part 1 kye seggiolini auto chicco carrelli per imbarcazione usato lavoro sesto san giovanni brethe easy dei blue quante volte live maglie bikkemberg uomo gradasso asics tiger 66 dsc p10 sony kaa del libro della giungla sodimm 512mb webcamporno gestione assistenza hw affettatrice 300 jessica miller nuda fuga da 1 luogo chiuso cccia subaquea lultima preda monitor con crystalbrite un minuto a mezzanotte abo guerlain issima perfect white c wayfarer ii la bicyclette bleue video prada pelliccia www medicina it stage budgeting e gestione costi del personale (regione lombardia - milano provincia) relaku pujuk giorni per rilascio passaporto ez digital 5030 men s health le armate rosse alla liberazione deuropa hitman contracts ps2 prenotazione albergo malmo luster gallerie importanti in italia epson dlq 3000 radio doble nueve por ti wind waker palmare e navigatore gps www hoom it arresto computer acer n30 gps bundle story of the year ha luli fond ecrans lancia musa multijet corse con le machine porno ful fontana solare a920 home theater h500 bluetooth per cellulari rex rt65c jana ina frasi sulla vita il medico per forza hd 200 profumi valentino tazmania preludio carmen new balance 577 generatori yamaha spartiti sassofono tehuantepec stecca da biliardo ragazzi maschi nudi testo suavemente will dance ruslana finestra per tetti daewoo matiz toscana son de amores testo jedy lultimo arrivato alberghi caserta lg l342i cellulari lg il bianco, il giallo, il nero vacanza benessere italia lou reed. spanish fly. live in spain idropulitrice professionale 150 proteina vegetale nocturne with no moon midi thermaltake circlefire tuta nike frigoriferi samsung rt62kcmt sud immobiliare discoteche hvar immagini del moto circolare frigoriferi rex incasso www rive com fiat multipla diesel auto km 0 telefilm di settimo cielo scollature tefal scopa formidabili amici... viareggio birra autobianchi y10 hir ai kam download fra cinquant anni di nino d angelo flaz canon 17-85 is usm lacie 16x dl cpu amd athlon 64bit skt 939 boxato camera orio al serio lizzy e darcy viaggi formentera supervielle, jules v keys reciver asus - p5ad2 deluxe componenti elettroniche h h street puma sigla o c i diritti del malato dad and may code seca 2 carini s p a piacenza vacanza djerba ruspa bandiere europee super eva incontri spello sintoamplificatore audio video sony merchant accounts adsl router wifi scarponi ed anfibi sum 41 at ip outlet padova abbigliamento il maresciallo rocca. stagione 2. vol. 3 pulicinella zen vivid suonerie per cell attak ricetrasmettitore midland j terni mp3 cd dolore elettrostimolatori free porn site la conquista del k2, 1954 happy hooker canon ixus700 lan adapter jeep nuova grand cherokee 2005 vacanze ad honolulu f k it i don t want you back mp3 oceans eleven dvd cover download la spia fantasma crashteamracing modica calcio

Retrieving an Element of an Array
You are encouraged to solve this task according to the task description, using any language you may know.

In this task, the goal is to retrieve an element of an array.

4D

  ` first element
$elem:=$array{1}

X86 assembly

Assembler: nasm

mov esi, array_offset
mov ebx, 2
mov eax, [esi ebx*4]

ActionScript

var arr:Array = new Array(1,2,3);
var myVar:Number = arr[1];
// the value of myVar is: 2

Ada

Array indexed by an enumerated type. Ada enumerated types are discrete non-numeric types.

type Days is (Mon, Tue, Wed, Thu, Fri, Sat, Sun);
type Daily_Counts is array(Days) of Natural;
This_week : Daily_Counts := (200, 212, 175 220, 201, 120, 0);
Monday_Sales : Natural;

Monday_Sales := This_Week(Mon); 

Monday_Sales is assigned 200

AppleScript

on getArrayValue(array, location)
    -- very important -- The list index starts at 1 not 0
    return item location in array
end getArrayValue

C

 int array_index(int array[], int index) {
   return array[index];
 }

C#

 int getArrayValue( int values[], int index ) {
   return values[index];
 }
 

C

 template<typename T>
 T array_index(T array[], size_t index) {
   return array[index];
 }

ColdFusion

<cfset arr = ArrayNew(1)>
<cfset arr[1] = "one">
<cfset arr[2] = "2">
<cfset arr[3] = 3>
<cfset var = arr[1]>

The value of var is "one"

ColdFusion Arrays are NOT zero-based, their index begins at 1

Common Lisp

  (defun array-value (array index)
    (aref array index))

Delphi/Object Pascal/Turbo Pascal/Standard Pascal

Array's in all the flavors of pascal can be of any valid base type, or user defined type ( which are all made up of base types ) and are multi-dimensional. With Delphi dynamic arrays were defined but had been used in pascal since its inseption.

A Static array defintion:

foo : array[1..10] of integer; { The base index is ONE }

The base index can be freely chosen:

foo: array[7 .. 16] of integer; { The base index is 7 }

Indeed, the "1 .. 10" resp. "7 .. 16" are actually types: they are integer subrange types. Arrays can also be indexed by enumeration types or enumeration subrange types:

type
 rainbowcolor = (red, orange, yellow, green, blue, violet);
var
 foo: array[rainbowcolor] of integer;
 bar: array[yellow .. blue] of integer;
 i: integer
begin
 i := foo[red]; { allowed indices are red, orange, yellow, green, blue, violet }
 i := bar[green]; { allowed indices are yellow, green, blue }
end;

A Dynamic Array type in Delphi:

foo : array of integer ; // The base index is ZERO

An "old school" dynamic array in the various flavors of pascal

foo : array[0..0] of integer;  // The base index is ZERO

A dynamic array in Extended Pascal:

type
 intarray(n: integer) = array[1 .. n] of integer; { base index 1 }
var
 foo: ^intarray;
begin
 new(foo, 10); { foo now has index 1 to 10 }
 i := foo[2];
 dispose(foo); { get rid of the array }
end;

In the case of the static array, the compiler generates the code to allocate the required memory to hold 10 integers.

In the Delphi style ---dynamic--- array you must set its length:

SetLength(foo,10);  // this array will no hold 10 integers

In the "old school" style of dynamic arrays, you created a point to the zero length declaration and then allocated memory to it with GetMem

pFoo : ^Foo ;
Foo  : array[0..0] of integer ;

All arrays are accessed the same way regardless of declaration method.

i : integer ;

i := foo[n] ;

where n is the array index who's base is either 1 or 0 depending on how it was declared.

Erlang

Erlang lists are 1-based which means that the index must be within the bounds (1 .. length(List)):

Value = lists:nth(Index, List).

Forth

Forth does not have special syntax for array access. Address arithmetic is used to access contiguous memory.

create array 1 , 2 , 3 , 4 ,
array 2 cells   @ .    \ 3

IDL

 ; this is allowed:
 result = arr(5) 
 ; but this is preferred:
 result = arr[5]

The form with square brackets is preferred as it unambiguously constitutes array access, while the version with round ones can conflict with a function call if there are both a function and an array with the same name arr.

Java

public Object getArrayElem(Object[] array, int pos) {
    return array[pos];
}

JavaScript

var element = array[index];

mIRC

Interpeter: mIRC Script Editor

Library: mArray Snippet

 alias readmyarray { echo -a $array_read(MyArray, 2, 3) }

Perl

Interpreter: Perl 5.8.8

$elem = $array[0];

PHP

$array = array('php', 'has', 'arrays');
// First element 
$elem  = $array[0];

Pop11

lvars ar = {1 two 'three'};
lvars elem;
;;; Access second element and assign to variable elem
ar(2) -> elem;

This example uses the simplest possible array (a vector). Pop11 has more general arrays, but in all cases access follows the same pattern, and look the same as procedure (function) call.

Python

Interpreter: Python 2.5

The item is an element in a list at a given index

 item = aList[index]

or

To use a list like a stack be it FIFO/LIFO

 aList.pop()  # Pop last item in a list
 aList.pop(0) # Pop first item in a list

Note: When using the pop() method, the element is removed from the list.

Ruby

 ary = ['Ruby','rules','big','time']
 #the first element
 element = ary[0]
 #or
 element = ary.first
 # => element = 'Ruby'

 #the last element
 element = ary[-1]
 #or
 element = ary.last
 # => element = 'time'

 #retrieving different values at once
 elements = ary.values_at(0,2,3)
 # => elements = ['Ruby','big','time']

 #select the first element of length 3
 element = ary.find{|el|el.length==3}
 # => element = "big"

Smalltalk

  "Retrieve second element of an array"
  index := 2
  element := anArray at: index

Tcl

All arrays in Tcl are associative. If "key" is the variable that holds the key of the element to be retrieved, then

 set result $array($key)

Toka

This retrieves the value 20 from the second item in the array:

 3 cells is-array table

 ( Populate the array )
 10 0 table put-element
 20 1 table put-element 
 30 2 table put-element
 
 table 1 get-element