Menu Home

Áåñïëàòíàÿ òåõíè÷åñêàÿ áèáëèîòåêà äëÿ ëþáèòåëåé è ïðîôåññèîíàëîâ Áåñïëàòíàÿ òåõíè÷åñêàÿ áèáëèîòåêà


Èíôîðìàòèêà è èíôîðìàöèîííûå òåõíîëîãèè. Ñòàíäàðòíûå ïðîöåäóðû è ôóíêöèè (ñàìîå âàæíîå)

Êîíñïåêòû ëåêöèé, øïàðãàëêè

Ñïðàâî÷íèê / Êîíñïåêòû ëåêöèé, øïàðãàëêè

Êîììåíòàðèè ê ñòàòüå Êîììåíòàðèè ê ñòàòüå

Îãëàâëåíèå (ðàçâåðíóòü)

4. Ñòàíäàðòíûå ïðîöåäóðû è ôóíêöèè

Àðèôìåòè÷åñêèå ôóíêöèè

1. Function Abs(X); âîçâðàùàåò àáñîëþòíîå çíà÷åíèå ïàðàìåòðà.

2. Function ArcTan(X: Extended): Extended; âîçâðàùàåò àðêòàíãåíñ àðãóìåíòà.

3. Function Exp(X: Real): Real; âîçâðàùàåò ýêñïîíåíòó.

4. Function Frac(X: Real): Real; âîçâðàùàåò äðîáíóþ ÷àñòü àðãóìåíòà.

5. Function Int(X: Real): Real; âîçâðàùàåò öåëî÷èñëåííóþ ÷àñòü àðãóìåíòà.

6. Function Ln(X: Real): Real; âîçâðàùàåò íàòóðàëüíûé ëîãàðèôì (Ln å = 1) âûðàæåíèÿ x âåùåñòâåííîãî òèïà.

7. Function Pi: Extended; âîçâðàùàåò çíà÷åíèå Pi, êîòîðîå îïðåäåëåíî êàê 3.1415926535.

8. Function Sin(X: Extended): Extended; âîçâðàùàåò ñèíóñ àðãóìåíòà.

9. Function Sqr(X: Extended): Extended; âîçâðàùàåò êâàäðàò àðãóìåíòà.

10. Function Sqrt(X: Extended): Extended; âîçâðàùàåò êâàäðàòíûé êîðåíü àðãóìåíòà.

Ïðîöåäóðû è ôóíêöèè ïðåîáðàçîâàíèÿ âåëè÷èí

1. Procedure Str(X [: Width [: Decimals]]; var S); ïðåîáðàçîâûâàåò ÷èñëî X â ñòðîêîâîå ïðåäñòàâëåíèå.

2. Function Chr(X: Byte): Char; âîçâðàùàåò ñèìâîë ñ ïîðÿäêîâûì íîìåðîì x â ASCII-òàáëèöå.

3. Function High(X); âîçâðàùàåò íàèáîëüøåå çíà÷åíèå â äèàïàçîíå ïàðàìåòðà.

4. Function Low(X); âîçâðàùàåò íàèìåíüøåå çíà÷åíèå â äèàïàçîíå ïàðàìåòðà.

5. Function Ord(X): Longlnt; âîçâðàùàåò ïîðÿäêîâîå çíà÷åíèå âûðàæåíèÿ ïåðå÷èñëèìîãî òèïà.

6. Function Round(X: Extended): LongInt; îêðóãëÿåò çíà÷åíèå âåùåñòâåííîãî òèïà äî öåëîãî.

7. Function Trunc(X: Extended): LongInt; óñåêàåò çíà÷åíèå âåùåñòâåííîãî òèïà äî öåëîãî.

8. Procedure Val(S; var V; var Code: Integer); ïðåîáðàçîâûâàåò ÷èñëî èç ñòðîêîâîãî çíà÷åíèÿ S â ÷èñëîâîå ïðåäñòàâëåíèå V.

Ïðîöåäóðû è ôóíêöèè ðàáîòû ñ ïîðÿäêîâûìè âåëè÷èíàìè

1. Procedure Dec(var X [; N: LongInt]); âû÷èòàåò åäèíèöó èëè N èç ïåðåìåííîé X.

2. Procedure Inc(var X [; N: LongInt]); ïðèáàâëÿåò åäèíèöó èëè N ê ïåðåìåííîé X.

3. Function Odd(X: LongInt): Boolean; âîçâðàùàåò True, åñëè X - íå÷åòíîå ÷èñëî, è False - â ïðîòèâíîì ñëó÷àå.

4. Function Pred(X); âîçâðàùàåò ïðåäûäóùåå çíà÷åíèå ïàðàìåòðà.

5. Function Succ(X); âîçâðàùàåò ñëåäóþùåå çíà÷åíèå ïàðàìåòðà.

Àâòîð: Öâåòêîâà À.Â.

<< Íàçàä: Ââåäåíèå â ÿçûê Pascal

>> Âïåðåä: Îïåðàòîðû ÿçûêà Pascal

Ðåêîìåíäóåì èíòåðåñíûå ñòàòüè ðàçäåëà Êîíñïåêòû ëåêöèé, øïàðãàëêè:

Êðèìèíàëèñòèêà. Êîíñïåêò ëåêöèé

Áóõãàëòåðñêèé ôèíàíñîâûé ó÷åò. Øïàðãàëêà

Æèëèùíîå ïðàâî. Êîíñïåêò ëåêöèé

Ñìîòðèòå äðóãèå ñòàòüè ðàçäåëà Êîíñïåêòû ëåêöèé, øïàðãàëêè.

×èòàéòå è ïèøèòå ïîëåçíûå êîììåíòàðèè ê ýòîé ñòàòüå.

<< Íàçàä

Ïîñëåäíèå íîâîñòè íàóêè è òåõíèêè, íîâèíêè ýëåêòðîíèêè:

Ëàáîðàòîðíàÿ ìîäåëü ïðîãíîçèðîâàíèÿ çåìëåòðÿñåíèé 30.11.2025

Ïðåäñêàçàíèå çåìëåòðÿñåíèé îñòàåòñÿ îäíîé èç ñàìûõ ñëîæíûõ çàäà÷ ãåîôèçèêè. Íåñìîòðÿ íà ðàçâèòèå ñåéñìîëîãèè, ó÷åíûå âñå åùå íå ìîãóò òî÷íî îïðåäåëèòü ìîìåíò íà÷àëà ðàçðóøèòåëüíîãî äâèæåíèÿ ðàçëîìîâ. Íåäàâíèå ýêñïåðèìåíòû àìåðèêàíñêèõ èññëåäîâàòåëåé îòêðûâàþò íîâûå ãîðèçîíòû: âïåðâûå óäàëîñü íàáëþäàòü ìèêðîñêîïè÷åñêèå èçìåíåíèÿ â êîíòàêòíîé çîíå ðàçëîìîâ, êîòîðûå ïðåäøåñòâóþò çåìëåòðÿñåíèþ. Ãðóïïà ïîä ðóêîâîäñòâîì Ñèëüâåíà Áàðáîòà îáíàðóæèëà, ÷òî "ðåàëüíàÿ ïëîùàäü êîíòàêòà" - ó÷àñòêè, ãäå ïîâåðõíîñòè ðàçëîìà äåéñòâèòåëüíî ñîïðèêàñàþòñÿ - èçìåíÿåòñÿ çà ìèëëèñåêóíäû äî âûñâîáîæäåíèÿ íàêîïëåííîé ýíåðãèè. "Ìû îòêðûëè îêíî â ñåðäöå ìåõàíèêè çåìëåòðÿñåíèé", - îòìå÷àåò Áàðáîò. Ýòè èçìåíåíèÿ ïîçâîëÿþò ôèêñèðîâàòü ýòàïû çàðîæäåíèÿ ñåéñìè÷åñêîãî ñîáûòèÿ åùå äî ïîÿâëåíèÿ òðàäèöèîííûõ ñåéñìè÷åñêèõ âîëí. Äëÿ íàáëþäåíèé ó÷åíûå èñïîëüçîâàëè ïðîçðà÷íûå àêðèëîâûå ìàòåðèàëû, ÷åðåç êîòîðûå ìîæíî áûëî îòñëåæèâàòü ñâåòîâûå èçìåíåíèÿ â çîíå êîíòàêòà.  õîäå èñêóññòâåííîãî ìîäåëèðîâàíèÿ ïðèìåðíî 30% êî ...>>

Ìóçûêà êàê åñòåñòâåííûé àíàëüãåòèê 30.11.2025

Ó÷åíûå âñå àêòèâíåå èññëåäóþò íåìåäèêàìåíòîçíûå ñïîñîáû îáëåã÷åíèÿ áîëè. Îäíèì èç ïåðñïåêòèâíûõ íàïðàâëåíèé ñòàíîâèòñÿ èñïîëüçîâàíèå ìóçûêè, êîòîðàÿ ñïîñîáíà âîçäåéñòâîâàòü íà ýìîöèîíàëüíîå ñîñòîÿíèå è êîãíèòèâíîå âîñïðèÿòèå áîëè. Íîâîå èññëåäîâàíèå ìåæäóíàðîäíîé ãðóïïû ñïåöèàëèñòîâ äåìîíñòðèðóåò, ÷òî äàæå êðàòêîâðåìåííîå ïðîñëóøèâàíèå ëþáèìûõ êîìïîçèöèé ìîæåò çíà÷èòåëüíî ñíèæàòü áîëåâûå îùóùåíèÿ ó ïàöèåíòîâ ñ îñòðîé áîëüþ â ñïèíå.  ýêñïåðèìåíòå ó÷àñòâîâàëè ïàöèåíòû, îáðàòèâøèåñÿ çà ïîìîùüþ â îòäåëåíèå íåîòëîæíîé ïîìîùè ñ âûðàæåííîé áîëüþ â ñïèíå. Èì ïðåäëàãàëîñü íà ïðîòÿæåíèè äåñÿòè ìèíóò ñëóøàòü ñâîè ëþáèìûå ìóçûêàëüíûå òðåêè. Óæå ïîñëå ýòîé êîðîòêîé ñåññèè âðà÷è ôèêñèðîâàëè çàìåòíîå óìåíüøåíèå èíòåíñèâíîñòè áîëè êàê â ñîñòîÿíèè ïîêîÿ, òàê è ïðè äâèæåíèÿõ. Àâòîðû èññëåäîâàíèÿ ïîä÷åðêèâàþò, ÷òî ìóçûêà íå óñòðàíÿåò ñàìó ïðè÷èíó áîëè. Òåì íå ìåíåå, îíà âîçäåéñòâóåò íà ýìîöèîíàëüíûé ôîí ïàöèåíòà, ñíèæàåò óðîâåíü òðåâîæíîñòè è îòâëåêàåò âíèìàíèå, ÷òî â ñóììå ïðèâîäèò ê ñóáúåêòèâíîì ...>>

Àëêîãîëü ìîæåò ïðèâåñòè ê ñëîáîóìèþ 29.11.2025

Ïðîáëåìà âëèÿíèÿ àëêîãîëÿ íà ñòàðåþùèé ìîçã äàâíî âûçûâàåò èíòåðåñ êàê ó âðà÷åé, òàê è ó èññëåäîâàòåëåé êîãíèòèâíîãî ñòàðåíèÿ.  ïîñëåäíèå ãîäû ñòàëî î÷åâèäíî, ÷òî ãðàíèöû "áåçîïàñíîãî" óïîòðåáëåíèÿ ñïèðòíîãî ðàçìûâàþòñÿ, è íîâîå êðóïíîå èññëåäîâàíèå, ïðîâåäåííîå ìåæäóíàðîäíîé ãðóïïîé ó÷åíûõ, âíîâü óêàçûâàåò íà ýòî. Ðàáîòû Îêñôîðäñêîãî óíèâåðñèòåòà, âûïîëíåííûå ñîâìåñòíî ñ èññëåäîâàòåëÿìè èç Éåëüñêîãî è Êåìáðèäæñêîãî óíèâåðñèòåòîâ, ïîêàçûâàþò: äàæå íåáîëüøèå äîçû àëêîãîëÿ ñïîñîáíû óñêîðÿòü êîãíèòèâíûé ñïàä. Êîìàíäà ïðîàíàëèçèðîâàëà äàííûå áîëåå ÷åì 500 òûñÿ÷ ó÷àñòíèêîâ èç áðèòàíñêîãî áèîáàíêà è àìåðèêàíñêîé Ïðîãðàììû ìèëëèîíîâ âåòåðàíîâ. Äîïîëíèòåëüíî áûë âûïîëíåí ìåòààíàëèç ñîðîêà ïÿòè èññëåäîâàíèé, â îáùåé ñëîæíîñòè âêëþ÷àâøèõ ñâåäåíèÿ î 2,4 ìèëëèîíà ÷åëîâåê. Òàêîé ìàñøòàá ïîçâîëèë îöåíèòü íå òîëüêî ïðÿìóþ ñâÿçü ìåæäó óïîòðåáëåíèåì ñïèðòíîãî è ðàçâèòèåì äåìåíöèè, íî è âëèÿíèå ãåíåòè÷åñêîé ïðåäðàñïîëîæåííîñòè. Îäèí èç íàèáîëåå òðåâîæíûõ ðåçóëüòàòîâ êàñàåòñÿ ëþäåé ñ ïîâûøåííûì ãå ...>>

Ñëó÷àéíàÿ íîâîñòü èç Àðõèâà

Èãðîâûå íîóòáóêè ASUS 20.01.2007

Êîìïàíèÿ ASUSTeK Computer ïðåäñòàâèëà äâà íîóòáóêà, ðàçðàáîòàííûõ ñïåöèàëüíî äëÿ ãåéìåðîâ. Ñîçäàííûå íà áàçå Intel Centrino Duo äëÿ ìîáèëüíûõ ÏÊ øèðîêîôîðìàòíûå ìîäåëè G1 è G2 èìåþò ýêðàíû ñîîòâåòñòâåííî 15,4" è 17".

Ôóíêöèÿ ïîäñâåòêè Direct Flash âêëþ÷àåòñÿ ïðè àêòèâàöèè DirectX9 â èãðàõ, òðåáóþùèõ âûñîêîé ãðàôè÷åñêîé ïðîèçâîäèòåëüíîñòè. Ñïåöèàëüíûé OLED-äèñïëåé îòîáðàæàåò ñòàòóñ ñèñòåìû, ìãíîâåííûå ñîîáùåíèÿ è íàïîìèíàíèÿ. Òåõíîëîãèÿ ýíåðãîñáåðåæåíèÿ ASUS Power4 Gear+ ïðîäëåâàåò âðåìÿ àâòîíîìíîé ðàáîòû íà 20-25%.

Äðóãèå èíòåðåñíûå íîâîñòè:

▪ Ãåîèíæåíåðèÿ è çàìåäëåíèå òàÿíèÿ ëåäíèêîâ

▪ Òåðìîóñòîé÷èâàÿ ïàìÿòü äëÿ ìåæïëàíåòíûõ ýêñïåäèöèé

▪ Íàäóâíàÿ ïå÷ü

▪ Îäèí óêîë èçáàâèò îò íèêîòèíîâîé çàâèñèìîñòè

▪ Ñâîé âåòðÿê íà êðûøå

Ëåíòà íîâîñòåé íàóêè è òåõíèêè, íîâèíîê ýëåêòðîíèêè

 

Èíòåðåñíûå ìàòåðèàëû Áåñïëàòíîé òåõíè÷åñêîé áèáëèîòåêè:

▪ ðàçäåë ñàéòà Ðåãóëÿòîðû òåìáðà, ãðîìêîñòè. Ïîäáîðêà ñòàòåé

▪ ñòàòüÿ Áóíèí Èâàí Àëåêñååâè÷. Çíàìåíèòûå àôîðèçìû

▪ ñòàòüÿ Çà÷åì íà ñúåìêàõ ôèëüìà Ïîëîñàòûé ðåéñ áûë óáèò ëåâ Âàñÿ? Ïîäðîáíûé îòâåò

▪ ñòàòüÿ Ëèìîí. Ëåãåíäû, âûðàùèâàíèå, ñïîñîáû ïðèìåíåíèÿ

▪ ñòàòüÿ Ïðîñòîé óñèëèòåëü ìîùíîñòè íà òðàíçèñòîðàõ ÊÒ805 (20 âàòò). Ýíöèêëîïåäèÿ ðàäèîýëåêòðîíèêè è ýëåêòðîòåõíèêè

▪ ñòàòüÿ Ñòàáèëèçèðîâàííûé áëîê ïèòàíèÿ, 60 âîëüò 0,1 àìïåðà. Ýíöèêëîïåäèÿ ðàäèîýëåêòðîíèêè è ýëåêòðîòåõíèêè

Îñòàâüòå ñâîé êîììåíòàðèé ê ýòîé ñòàòüå:

Èìÿ:


E-mail (íå îáÿçàòåëüíî):


Êîììåíòàðèé:





Ãëàâíàÿ ñòðàíèöà | Áèáëèîòåêà | Ñòàòüè | Êàðòà ñàéòà | Îòçûâû î ñàéòå

www.diagram.com.ua

www.diagram.com.ua
2000-2025