Mam spraveny program ale mi to nefunguje. Prosim si od Vas pomoc.
Program je o triedeni MAXSORT
program triedenie;
uses crt;
const N=10;
var pole:array [1..N] of integer;
i,q,j,t:integer;
procedure napln_pole;
begin
for i:=1 to N do pole[i]:=random(100);
...
Založil pietro62; 3 názory, poslední 20. 3. 2013 – nevyřešeno
Založil pietro62; 3 názory, poslední 20. 3. 2013 – nevyřešeno