Mathematica, maksimum z listy

Mathematica, Matlab, Statistica, LaTeX i wszelkiego rodzaju oprogramowanie przydatne matematykowi w pracy. Miejsca w sieci poświęcone zagadnieniu.
Trandar
Użytkownik
Użytkownik
Posty: 1
Rejestracja: 17 paź 2019, o 20:25
Płeć: Mężczyzna

Mathematica, maksimum z listy

Post autor: Trandar »

Mam za zadanie napisać program, który wyświetla maksimum z zadanej listy. Bez używania max[]. Moja próba:

Kod: Zaznacz cały

maksimum[u_] := Module[{a = u, maks = u[[0]]},
   For[i = 0, i < Length[a], i++,
    If[a[[i]] > m, maks = a[[i]]]];
   Print[maks]];

Kod: Zaznacz cały

In: maksimum[{-5, 2, 1}]
Out: List
Czemu zwraca mi jakąś listę?
lacek
Użytkownik
Użytkownik
Posty: 18
Rejestracja: 25 lip 2011, o 13:38
Płeć: Mężczyzna
Lokalizacja: Kraków
Pomógł: 1 raz

Re: Mathematica, maksimum z listy

Post autor: lacek »

w Mathematice listy są numerowane od 1.

jesli
tab={1,2,3}

To tab[[0]] to to samo co Head[tab] czyli List

Poza tym ostatnim elementem modułu powinna być zwracana wartość, a nie Print[maks]. Tzn samo maks powinno być.
ODPOWIEDZ