otazka je polozena! ;)
mame ve skole porgramovani VB v exelu a mel jsem zadany ukol,
ten jsem ziskal, ale potreboval bych od nekoho poradit, jak mam popsat,
co se tam deje a proc jsem pouzil tech prikazu a tak. diky predem vsem
Definujte funkci pro určení největšího a nejmenšího čísla vyskytujícího se
v posloupnosti čísel dodaných v poli C o N prvcích (použité pole na vstupu,
pole na výstupu i textový údaj Max, Min nad výsledky) a použijte ji
pro několik zadaných číselných posloupností.
Function minmax(c As Variant, n As Integer) As Variant
Dim i As Integer
Dim vysl(1 To 2)
vysl(1) = c(1) 'min
vysl(2) = c(1) 'max
For i = 1 To n
If c(i) < vysl(1) Then
vysl(1) = c(i)
End If If c(i) > vysl(2) Then
vysl(2) = c(i)
End If
Next i
minmax = vysl
End Function