Реферат: Программирование на языках высокого уровня

Да


Нет


Нет Да Да


Нет

L:=L^.p;


Нет


Да

st:=st+ch;

New(FEst); FEst^.s:=L^.s; FEst^.k:=L^.k; FEst^.p:=nil;


Да


Нет

L:=L^.p; Est:=FEst;


Нет


Да

PEst:=Est; Est:=Est^.p;


Да

L^.k:=L^.k+1;

st:=''; b:=true; L:=L^.p;


Нет

New(temp); temp^.s:=L^.s; temp^.k:=L^.k; temp^.p:=nil; PEst^.p:=temp;


Да


Нет


New(temp); temp^.s:=L^.s; temp^.k:=L^.k; temp^.p:=Est; PEst^.p:=temp;

Да

Нет


Да


Нет


Да

Нет


3 ТЕКСТ ПРОГРАММЫ

Program Project1;

{$APPTYPE CONSOLE}

Uses SysUtils;

type spisok=^Recspisok;

Recspisok=record

s:String; k:word; p:spisok; end;

var a,b,c,e:boolean; ch:char; st:string;

L,Fst,FEst,PEst,Est,temp:spisok; f:text;

label lb;

К-во Просмотров: 358
Бесплатно скачать Реферат: Программирование на языках высокого уровня