|
|
<< 72 >> |
| 15:02:00 17. dubna 2011 | ||
|
Děkuju za názory :) | |
|
||
| 14:06:52 17. dubna 2011 | ||
|
Já bych místo toho raději koupil tablet, což má, dle mého, větší potenciál :) | |
|
||
|
(uživatel smazán)
Small_killer
|
17:51:03 15. dubna 2011 | |
|---|---|---|
|
|
Juker: Nezkoušel jsem. :-)
A ani nebudu, když něco funguje, tak to tak nechám. |
|
|
||
| 21:34:44 13. dubna 2011 | ||
|
No a kdyby se to pole nevolalo tím odkazem, takže by bylo bez toho var, tak to nefunguje? | |
|
||
|
(uživatel smazán)
Small_killer
|
21:23:22 13. dubna 2011 | |
|---|---|---|
|
|
Takto to má vypadat:
function maxpole(pp:TIndex;var p:TPole):integer; var j:TIndex; pomocna:integer; begin pomocna:=p[1]; For j:=2 to pp do If pomocna<p[j] then begin pomocna:=p[j]; end; maxpole:=pomocna; end; function CIndexu(pp:TIndex;var p:TPole):TIndex; var j,pomocna:TIndex; pomocnepole:TPole; begin pomocnepole:=p; For j:=1 to pp do If maxpole(pp,p)=pomocnepole[j] then pomocna:=j; CIndexu:=pomocna; end; Tedy úplně přesně jak napsal JokerS. Takže díky. |
|
|
||
| Uživatel: | |
| Heslo: | |
