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 àìïåðà. Ýíöèêëîïåäèÿ ðàäèîýëåêòðîíèêè è ýëåêòðîòåõíèêè
Îñòàâüòå ñâîé êîììåíòàðèé ê ýòîé ñòàòüå:
Ãëàâíàÿ ñòðàíèöà | Áèáëèîòåêà | Ñòàòüè | Êàðòà ñàéòà | Îòçûâû î ñàéòå

www.diagram.com.ua
2000-2025