27.Prednaska/Cvicenie: Rozdiel medzi revíziami

Z Pascal
Prejsť na: navigácia, hľadanie
(Vytvorená stránka „{{Nadpis| 27. Cvičenie}} < 27.Prednáška | riešené úlohy ... === Domáca úloha === 1. Vytvorte triedu TSlovnik, ktora d...“)
 
Riadok 7: Riadok 7:
  
  
1. Vytvorte triedu TSlovnik, ktora do spajaneho zoznamu nacita zo suboru zoznam dvojic slov
+
1. pre spájaný zoznam
pes dog
+
{{Prog}}
  macka cat
+
  type
...
+
  PVrchol = ^TVrchol;
* zoznam v triede TSlovnik udrzujte utriedeny podla anglickych slovicok
+
  TVrchol = record
TVrchol = class
+
    Info: Integer;
  Slov, Angl:string;
+
    Next: PVrchol;
  Next:TVrchol;
+
   end;
   ...
+
|}
end;
+
* napísať procedúru '''Urob(Z: PVrchol)''', ktorá za každý vrchol s párnou hodnotou vloží nový vrchol s nulovou hodnotou, napr. zo zoznamu
+
{{Prog}}
TSlovnik = class
+
4 -> 5 -> 6 -> 7 -> 8 -> nil
  Z:Tvrchol;
+
|}
  constructor Create(subor:string);
+
:vyrobí zoznam
  procedure Vloz(s, a:string);
+
{{Prog}}
  end;
+
  4 -> 0 -> 5 -> 6 -> 0 -> 7 -> 8 -> 0 -> nil
 +
|}

Verzia zo dňa a času 13:54, 2. marec 2013

27. Cvičenie


< 27.Prednáška | riešené úlohy

...

Domáca úloha

1. pre spájaný zoznam

type
  PVrchol = ^TVrchol;
  TVrchol = record
    Info: Integer;
    Next: PVrchol;
  end;
  • napísať procedúru Urob(Z: PVrchol), ktorá za každý vrchol s párnou hodnotou vloží nový vrchol s nulovou hodnotou, napr. zo zoznamu
4 -> 5 -> 6 -> 7 -> 8 -> nil
vyrobí zoznam
4 -> 0 -> 5 -> 6 -> 0 -> 7 -> 8 -> 0 -> nil