Naloga: program Obrni seznam/Rešitev Mathematica 2

Iz MaFiRaWiki

Naloga: program Obrni seznam

 
 ObrniSeznam::usage = "Funkcija ObrniSeznam[s] obrne seznam s samo z uporabo ukazov Join, Rest in First."
 ObrniSeznam[{}] = {};
 ObrniSeznam[s_List] := Join[ObrniSeznam[Rest[s]], {First[s]}];

Primer uporabe:

 In[53]:=ObrniSeznam[{1,2,3,4,5,6,7}]

Out[53]={7,6,5,4,3,2,1}

Glej tudi

Osebna orodja