zmienne dynamiczne

[adi1910]

Dane są definicje i deklaracje:

type wsk=^dane;
dane=record
nast:wsk;
nazw:string[10];
wiek:Byte
end;
var wa:wsk;
dp:dane;

oraz wykonano instrukcje:

new(wa);
with dp do
begin nazw:='Gaj' ;wiek:=28;nast:=wa end;
with dp.nast^
begin nazw:='Maj'; wiek:=Pred(dp.wiek) ;
nast:=wa end;

Uzupełnij poniższy diagram zaznaczając powstające zmienne dynamiczne i wartości nadawane zmiennym.


Co pojawi się na ekranie po instrukcji:

with wa^ do
Write(nazw,' ->wiek:' ,dp.wiek);