18. Ñòåêè
Ñòåêîì íàçûâàåòñÿ äèíàìè÷åñêàÿ ñòðóêòóðà äàííûõ, äîáàâëåíèå êîìïîíåíòû â êîòîðóþ è èñêëþ÷åíèå êîìïîíåíòû èç êîòîðîé ïðîèçâîäèòñÿ èç îäíîãî êîíöà, íàçûâàåìîãî âåðøèíîé ñòåêà. Ñòåê ðàáîòàåò ïî ïðèíöèïó LIFO(Last-In, First-Out) - "Ïîñòóïèâøèé ïîñëåäíèì, îáñëóæèâàåòñÿ ïåðâûì".
Îáû÷íî íàä ñòåêàìè âûïîëíÿåòñÿ òðè îïåðàöèè:
1) íà÷àëüíîå ôîðìèðîâàíèå ñòåêà (çàïèñü ïåðâîé êîìïîíåíòû);
2) äîáàâëåíèå êîìïîíåíòû â ñòåê;
3) âûáîðêà êîìïîíåíòû (óäàëåíèå).
Äëÿ ôîðìèðîâàíèÿ ñòåêà è ðàáîòû ñ íèì íåîáõîäèìî èìåòü äâå ïåðåìåííûå òèïà "óêàçàòåëü", ïåðâàÿ èç êîòîðûõ îïðåäåëÿåò âåðøèíó ñòåêà, à âòîðàÿ - âñïîìîãàòåëüíàÿ.
Ïðèìåð. Ñîñòàâèòü ïðîãðàììó, êîòîðàÿ ôîðìèðóåò ñòåê, äîáàâëÿåò â íåãî ïðîèçâîëüíîå êîëè÷åñòâî êîìïîíåíò, à çàòåì ÷èòàåò âñå êîìïîíåíòû.
Program STACK;
uses Crt;
type
Alfa = String[10];
PComp = ^Comp;
Comp = Record
sD: Alfa;
pNext: PComp
end;
var
pTop: PComp;
sC: Alfa;
Procedure CreateStack(var pTop: PComp; var sC: Alfa);
begin
New(pTop);
pTop^.pNext:= NIL;
pTop^.sD:= sC;
end;
Procedure AddComp(var pTop: PComp; var sC: Alfa);
var pAux: PComp;
begin
NEW(pAux);
pAux^.pNext:= pTop;
pTop:= pAux;
pTop^.sD:= sC;
end;
Procedure DelComp(var pTop: PComp; var sC: ALFA);
begin
sC:= pTop^.sD;
pTop:= pTop^.pNext;
end;
begin
Clrscr;
writeln( ÂÂÅÄÈ ÑÒÐÎÊÓ );
readln(sC);
CreateStack(pTop, sC);
repeat
writeln( ÂÂÅÄÈ ÑÒÐÎÊÓ );
readln(sC);
AddComp(pTop, sC);
until sC = 'END';
Àâòîð: Öâåòêîâà À.Â.
<< Íàçàä: Àáñòðàêòíûå ñòðóêòóðû äàííûõ
>> Âïåðåä: Î÷åðåäè
Ðåêîìåíäóåì èíòåðåñíûå ñòàòüè ðàçäåëà Êîíñïåêòû ëåêöèé, øïàðãàëêè:
▪ Ìóíèöèïàëüíîå ïðàâî. Øïàðãàëêà
▪ Òåîðèÿ îáó÷åíèÿ. Êîíñïåêò ëåêöèé
▪ Ââåäåíèå â ïåäàãîãè÷åñêóþ äåÿòåëüíîñòü. Øïàðãàëêà
Ñìîòðèòå äðóãèå ñòàòüè ðàçäåëà Êîíñïåêòû ëåêöèé, øïàðãàëêè.
×èòàéòå è ïèøèòå ïîëåçíûå êîììåíòàðèè ê ýòîé ñòàòüå.
<< Íàçàä
Ïîñëåäíèå íîâîñòè íàóêè è òåõíèêè, íîâèíêè ýëåêòðîíèêè:
Ëàáîðàòîðíàÿ ìîäåëü ïðîãíîçèðîâàíèÿ çåìëåòðÿñåíèé
30.11.2025
Ïðåäñêàçàíèå çåìëåòðÿñåíèé îñòàåòñÿ îäíîé èç ñàìûõ ñëîæíûõ çàäà÷ ãåîôèçèêè. Íåñìîòðÿ íà ðàçâèòèå ñåéñìîëîãèè, ó÷åíûå âñå åùå íå ìîãóò òî÷íî îïðåäåëèòü ìîìåíò íà÷àëà ðàçðóøèòåëüíîãî äâèæåíèÿ ðàçëîìîâ. Íåäàâíèå ýêñïåðèìåíòû àìåðèêàíñêèõ èññëåäîâàòåëåé îòêðûâàþò íîâûå ãîðèçîíòû: âïåðâûå óäàëîñü íàáëþäàòü ìèêðîñêîïè÷åñêèå èçìåíåíèÿ â êîíòàêòíîé çîíå ðàçëîìîâ, êîòîðûå ïðåäøåñòâóþò çåìëåòðÿñåíèþ.
Ãðóïïà ïîä ðóêîâîäñòâîì Ñèëüâåíà Áàðáîòà îáíàðóæèëà, ÷òî "ðåàëüíàÿ ïëîùàäü êîíòàêòà" - ó÷àñòêè, ãäå ïîâåðõíîñòè ðàçëîìà äåéñòâèòåëüíî ñîïðèêàñàþòñÿ - èçìåíÿåòñÿ çà ìèëëèñåêóíäû äî âûñâîáîæäåíèÿ íàêîïëåííîé ýíåðãèè. "Ìû îòêðûëè îêíî â ñåðäöå ìåõàíèêè çåìëåòðÿñåíèé", - îòìå÷àåò Áàðáîò. Ýòè èçìåíåíèÿ ïîçâîëÿþò ôèêñèðîâàòü ýòàïû çàðîæäåíèÿ ñåéñìè÷åñêîãî ñîáûòèÿ åùå äî ïîÿâëåíèÿ òðàäèöèîííûõ ñåéñìè÷åñêèõ âîëí.
Äëÿ íàáëþäåíèé ó÷åíûå èñïîëüçîâàëè ïðîçðà÷íûå àêðèëîâûå ìàòåðèàëû, ÷åðåç êîòîðûå ìîæíî áûëî îòñëåæèâàòü ñâåòîâûå èçìåíåíèÿ â çîíå êîíòàêòà.  õîäå èñêóññòâåííîãî ìîäåëèðîâàíèÿ ïðèìåðíî 30% êî ...>>
Ìóçûêà êàê åñòåñòâåííûé àíàëüãåòèê
30.11.2025
Ó÷åíûå âñå àêòèâíåå èññëåäóþò íåìåäèêàìåíòîçíûå ñïîñîáû îáëåã÷åíèÿ áîëè. Îäíèì èç ïåðñïåêòèâíûõ íàïðàâëåíèé ñòàíîâèòñÿ èñïîëüçîâàíèå ìóçûêè, êîòîðàÿ ñïîñîáíà âîçäåéñòâîâàòü íà ýìîöèîíàëüíîå ñîñòîÿíèå è êîãíèòèâíîå âîñïðèÿòèå áîëè. Íîâîå èññëåäîâàíèå ìåæäóíàðîäíîé ãðóïïû ñïåöèàëèñòîâ äåìîíñòðèðóåò, ÷òî äàæå êðàòêîâðåìåííîå ïðîñëóøèâàíèå ëþáèìûõ êîìïîçèöèé ìîæåò çíà÷èòåëüíî ñíèæàòü áîëåâûå îùóùåíèÿ ó ïàöèåíòîâ ñ îñòðîé áîëüþ â ñïèíå.
 ýêñïåðèìåíòå ó÷àñòâîâàëè ïàöèåíòû, îáðàòèâøèåñÿ çà ïîìîùüþ â îòäåëåíèå íåîòëîæíîé ïîìîùè ñ âûðàæåííîé áîëüþ â ñïèíå. Èì ïðåäëàãàëîñü íà ïðîòÿæåíèè äåñÿòè ìèíóò ñëóøàòü ñâîè ëþáèìûå ìóçûêàëüíûå òðåêè. Óæå ïîñëå ýòîé êîðîòêîé ñåññèè âðà÷è ôèêñèðîâàëè çàìåòíîå óìåíüøåíèå èíòåíñèâíîñòè áîëè êàê â ñîñòîÿíèè ïîêîÿ, òàê è ïðè äâèæåíèÿõ.
Àâòîðû èññëåäîâàíèÿ ïîä÷åðêèâàþò, ÷òî ìóçûêà íå óñòðàíÿåò ñàìó ïðè÷èíó áîëè. Òåì íå ìåíåå, îíà âîçäåéñòâóåò íà ýìîöèîíàëüíûé ôîí ïàöèåíòà, ñíèæàåò óðîâåíü òðåâîæíîñòè è îòâëåêàåò âíèìàíèå, ÷òî â ñóììå ïðèâîäèò ê ñóáúåêòèâíîì ...>>
Àëêîãîëü ìîæåò ïðèâåñòè ê ñëîáîóìèþ
29.11.2025
Ïðîáëåìà âëèÿíèÿ àëêîãîëÿ íà ñòàðåþùèé ìîçã äàâíî âûçûâàåò èíòåðåñ êàê ó âðà÷åé, òàê è ó èññëåäîâàòåëåé êîãíèòèâíîãî ñòàðåíèÿ.  ïîñëåäíèå ãîäû ñòàëî î÷åâèäíî, ÷òî ãðàíèöû "áåçîïàñíîãî" óïîòðåáëåíèÿ ñïèðòíîãî ðàçìûâàþòñÿ, è íîâîå êðóïíîå èññëåäîâàíèå, ïðîâåäåííîå ìåæäóíàðîäíîé ãðóïïîé ó÷åíûõ, âíîâü óêàçûâàåò íà ýòî. Ðàáîòû Îêñôîðäñêîãî óíèâåðñèòåòà, âûïîëíåííûå ñîâìåñòíî ñ èññëåäîâàòåëÿìè èç Éåëüñêîãî è Êåìáðèäæñêîãî óíèâåðñèòåòîâ, ïîêàçûâàþò: äàæå íåáîëüøèå äîçû àëêîãîëÿ ñïîñîáíû óñêîðÿòü êîãíèòèâíûé ñïàä.
Êîìàíäà ïðîàíàëèçèðîâàëà äàííûå áîëåå ÷åì 500 òûñÿ÷ ó÷àñòíèêîâ èç áðèòàíñêîãî áèîáàíêà è àìåðèêàíñêîé Ïðîãðàììû ìèëëèîíîâ âåòåðàíîâ. Äîïîëíèòåëüíî áûë âûïîëíåí ìåòààíàëèç ñîðîêà ïÿòè èññëåäîâàíèé, â îáùåé ñëîæíîñòè âêëþ÷àâøèõ ñâåäåíèÿ î 2,4 ìèëëèîíà ÷åëîâåê. Òàêîé ìàñøòàá ïîçâîëèë îöåíèòü íå òîëüêî ïðÿìóþ ñâÿçü ìåæäó óïîòðåáëåíèåì ñïèðòíîãî è ðàçâèòèåì äåìåíöèè, íî è âëèÿíèå ãåíåòè÷åñêîé ïðåäðàñïîëîæåííîñòè.
Îäèí èç íàèáîëåå òðåâîæíûõ ðåçóëüòàòîâ êàñàåòñÿ ëþäåé ñ ïîâûøåííûì ãå ...>>
Ñëó÷àéíàÿ íîâîñòü èç Àðõèâà Áðàòñòâî ïî êðîâè, áðàòñòâî ïî êëåòêàì
12.01.2013
Ôèçèîëîãè èç ìåäèöèíñêîãî öåíòðà Ëåéäåíñêîãî óíèâåðñèòåòà èçó÷èëè êðîâü 23 íîâîðîæäåííûõ äåâî÷åê, ó 12 èç êîòîðûõ åñòü ñòàðøèå áðàòüÿ. Îêàçàëîñü, ÷òî â êðîâè ýòèõ 12 ïðèñóòñòâóþò àíòèòåëà ïðîòèâ ìóæñêîé Õ-õðîìîñîìû, òî åñòü ãäå-òî â òåëå äåâî÷åê èìåþòñÿ êëåòêè îò ñòàðøåãî áðàòà! Ó íåêîòîðûõ èç íîâîðîæäåííûõ äåâî÷åê ýòè êëåòêè îáíàðóæåíû â ïóïîâèííîé êðîâè.
Ðàíåå áûëî ïîêàçàíî, ÷òî êëåòêè ïëîäà è ìàòåðè ìîãóò ïðåîäîëåâàòü ïëàöåíòàðíûé áàðüåð, âçàèìíî îáìåíèâàòüñÿ è äåñÿòèëåòèÿìè æèòü â êîæå, ïå÷åíè, ñåëåçåíêå è ìîçãå ìàòåðè è ðåáåíêà. Çíà÷èò, ñîõðàíèâøèåñÿ êëåòêè ñòàðøåãî áðàòà èç ìàòåðè ìîãóò ïåðåõîäèòü â îðãàíèçì äåâî÷êè.
|
Äðóãèå èíòåðåñíûå íîâîñòè:
▪ Ðàçãàäàíà ïðè÷èíà ñâåæåãî çàïàõà ëåñà ïîñëå äîæäÿ
▪ Ìàãíèò ìåøàåò ëãàòü
▪ Êèøå÷íûå ïàðàçèòû ïîìîãàþò çàáåðåìåíåòü
▪ Âèòàìèí B12 è ïðûùè
▪ Îñíîâíàÿ ïðè÷èíà ëèøíåãî âåñà
Ëåíòà íîâîñòåé íàóêè è òåõíèêè, íîâèíîê ýëåêòðîíèêè
Èíòåðåñíûå ìàòåðèàëû Áåñïëàòíîé òåõíè÷åñêîé áèáëèîòåêè:
▪ ðàçäåë ñàéòà Ðàäèîóïðàâëåíèå. Ïîäáîðêà ñòàòåé
▪ ñòàòüÿ Áåíçîìîòîðíûé ðàñïèëîâî÷íûé ñòàíîê. Ñîâåòû äîìàøíåìó ìàñòåðó
▪ ñòàòüÿ Êàê àíãëè÷àíàì çàïîìíèòü ôðàçó ß ëþáëþ âàñ? Ïîäðîáíûé îòâåò
▪ ñòàòüÿ ×åñíî÷íàÿ òðàâà. Ëåãåíäû, âûðàùèâàíèå, ñïîñîáû ïðèìåíåíèÿ
▪ ñòàòüÿ Âîëüòìåòð ñ óëó÷øåííîé ëèíåéíîñòüþ. Ýíöèêëîïåäèÿ ðàäèîýëåêòðîíèêè è ýëåêòðîòåõíèêè
▪ ñòàòüÿ Àíòè-ÀÎÍ. Ýíöèêëîïåäèÿ ðàäèîýëåêòðîíèêè è ýëåêòðîòåõíèêè
Îñòàâüòå ñâîé êîììåíòàðèé ê ýòîé ñòàòüå:
Ãëàâíàÿ ñòðàíèöà | Áèáëèîòåêà | Ñòàòüè | Êàðòà ñàéòà | Îòçûâû î ñàéòå

www.diagram.com.ua
2000-2025