<< 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: | |