Anonymní profil moje – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Anonymní profil moje – Programujte.comAnonymní profil moje – Programujte.com

 

Příspěvky odeslané z IP adresy 217.67.19.–

moje
Pascal › Chyba ve spouštění
25. 10. 2007   #52647

procedure ClearSet (var M : tSet);

var x: integer;
begin {vytvoreni mnoziny}
for x:=0 to K do New(M[x]); {vytvoreni dynamickeho pole}
ClearSet(M);
end;

a co tak kdyby si mnela uzavrenou rekurzii.
procedure ClearSet (var M : tSet);

var x: integer;
begin {vytvoreni mnoziny}
for x:=0 to K do
begin
New(M[x]); {vytvoreni dynamickeho pole}
ClearSet(M);
end
end;

 

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032024 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý