Mathematica, maksimum z listy
: 17 paź 2019, o 20:28
Mam za zadanie napisać program, który wyświetla maksimum z zadanej listy. Bez używania max[]. Moja próba:
Czemu zwraca mi jakąś listę?
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