Strona 1 z 1

Mathematica, maksimum z listy

: 17 paź 2019, o 20:28
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ę?