0
Views
0
Downloads
0
Favorites
ZH_Dynamic_Arrays_Lib 0-80108
//+--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+
//| ZH_Dynamic_Arrays_Lib 0-80108.mq4|
//| Copyright © Zhunko |
//|08.01.2008 ÌF ZHUNKO vadim@zhunko.ru |
//+--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+
//| ÍÀÁÎÐ ÔÓÍÊÖÈÉ ÄËß ÝÌÓËßÖÈÈ ÄÈÍÀÌÈ×ÅÑÊÈÕ ÌÀÑÑÈÂÎÂ. |
//| Ôóíêöèè îáðàùàþòñÿ ê îäíîìåðíîìó ìàññèâó, êàê ê ìíîãîìåðíîìó. |
//+--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+
//+ææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ Ôóíêöèè äèíàìè÷åñêèõ ìàññèâîâ ñ ëîãè÷åñêèìè äàííûìè. ææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ+
//| 1.Ôóíêöèÿ "Äâóõìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".==========================================================================================================================+
//| BoolArrayDynamicDimension2 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int BoolArrayDynamicDimension2 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int Cell_0, int Cell_1, bool Value, bool Array[]); |
//| 2.Ôóíêöèÿ "Òð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".--------------------------------------------------------------------------------------------------------------------------+
//| BoolArrayDynamicDimension3 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int BoolArrayDynamicDimension3 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int Cell_0, int Cell_1, |
//| int Cell_2, bool Value, bool Array[]); |
//| 3.Ôóíêöèÿ "×åòûð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".-----------------------------------------------------------------------------------------------------------------------+
//| BoolArrayDynamicDimension4 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int BoolArrayDynamicDimension4 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, |
//| int Cell_0, int Cell_1, int Cell_2, int Cell_3, bool Value, bool Array[]); |
//| 4.Ôóíêöèÿ "Ïÿòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".--------------------------------------------------------------------------------------------------------------------------+
//| BoolArrayDynamicDimension5 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int BoolArrayDynamicDimension5 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, |
//| int SizeDimension_4, int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Cell_4, bool Value, bool Array[]); |
//| 5.Ôóíêöèÿ "Øåñòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".-------------------------------------------------------------------------------------------------------------------------+
//| BoolArrayDynamicDimension6 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïÿòîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïÿòîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int BoolArrayDynamicDimension6 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, |
//| int SizeDimension_4, int SizeDimension_5, int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Cell_4, int Cell_5, bool Value, bool Array[]); |
//+ææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ Ôóíêöèè äèíàìè÷åñêèõ ìàññèâîâ ñ äàííûìè äâîéíîé òî÷íîñòè. æææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ+
//| 6.Ôóíêöèÿ "Äâóõìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".---------------------------------------------------------------------------------------------------------------------+
//| doubleArrayDynamicDimension2 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int doubleArrayDynamicDimension2 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int Cell_0, int Cell_1, double Value, double Array[]); |
//| 7.Ôóíêöèÿ "Òð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".---------------------------------------------------------------------------------------------------------------------+
//| doubleArrayDynamicDimension3 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int doubleArrayDynamicDimension3 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int Cell_0, int Cell_1, int Cell_2, |
//| double Value, double Array[]); |
//| 8.Ôóíêöèÿ "×åòûð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".------------------------------------------------------------------------------------------------------------------+
//| doubleArrayDynamicDimension4 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int doubleArrayDynamicDimension4 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, int Cell_0, |
//| int Cell_1, int Cell_2, int Cell_3, double Value, double Array[]); |
//| 9.Ôóíêöèÿ "Ïÿòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".---------------------------------------------------------------------------------------------------------------------+
//| doubleArrayDynamicDimension5 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè,|
//| íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int doubleArrayDynamicDimension5 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, |
//| int SizeDimension_4, int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Cell_4, double Value, double Array[]); |
//|10.Ôóíêöèÿ "Øåñòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".--------------------------------------------------------------------------------------------------------------------+
//| doubleArrayDynamicDimension6 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè,|
//| óñòàíîâêà ðàçìåðà ïÿòîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïÿòîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int doubleArrayDynamicDimension6 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, |
//| int SizeDimension_4, int SizeDimension_5, int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Cell_4, int Cell_5, double Value, double Array[]); |
//+ææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ Ôóíêöèè äèíàìè÷åñêèõ ìàññèâîâ ñ öåëî÷èñëåííûìè äàííûìè.ææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ+
//|11.Ôóíêöèÿ "Äâóõìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".-----------------------------------------------------------------------------------------------------------------------+
//| IntArrayDynamicDimension2 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int IntArrayDynamicDimension2 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int Cell_0, int Cell_1, int Value, int Array[]); |
//|12.Ôóíêöèÿ "Òð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".-----------------------------------------------------------------------------------------------------------------------+
//| IntArrayDynamicDimension3 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int IntArrayDynamicDimension3 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int Cell_0, int Cell_1, int Cell_2, |
//| int Value, int Array[]); |
//|13.Ôóíêöèÿ "×åòûð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".--------------------------------------------------------------------------------------------------------------------+
//| IntArrayDynamicDimension4 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int IntArrayDynamicDimension4 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, int Cell_0, |
//| int Cell_1, int Cell_2, int Cell_3, int Value, int Array[]); |
//|14.Ôóíêöèÿ "Ïÿòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".-----------------------------------------------------------------------------------------------------------------------+
//| IntArrayDynamicDimension5 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int IntArrayDynamicDimension5 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, int SizeDimension_4, |
//| int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Cell_4, int Value, int Array[]); |
//|15.Ôóíêöèÿ "Øåñòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".----------------------------------------------------------------------------------------------------------------------+
//| IntArrayDynamicDimension6 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïÿòîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïÿòîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| int IntArrayDynamicDimension6 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, |
//| int SizeDimension_4, int SizeDimension_5, int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Cell_4, int Cell_5, int Value, int Array[]); |
//+ææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ Ôóíêöèè äèíàìè÷åñêèõ ìàññèâîâ ñî ñòðîêîâûìè äàííûìè.æææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ+
//|16.Ôóíêöèÿ "Äâóõìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".--------------------------------------------------------------------------------------------------------------------------+
//| StringArrayDynamicDimension2 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| string StringArrayDynamicDimension2 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int Cell_0, int Cell_1, string Value, string Array[]); |
//|17.Ôóíêöèÿ "Òð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".--------------------------------------------------------------------------------------------------------------------------+
//| StringArrayDynamicDimension3 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| string StringArrayDynamicDimension3 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int Cell_0, int Cell_1, |
//| int Cell_2, string Value, string Array[]); |
//|18.Ôóíêöèÿ "×åòûð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".-----------------------------------------------------------------------------------------------------------------------+
//| StringArrayDynamicDimension4 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| string StringArrayDynamicDimension4 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, int Cell_0, |
//| int Cell_1, int Cell_2, int Cell_3, string Value, string Array[]); |
//|19.Ôóíêöèÿ "Ïÿòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".--------------------------------------------------------------------------------------------------------------------------+
//| StringArrayDynamicDimension5 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè,|
//| íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| string StringArrayDynamicDimension5 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, |
//| int SizeDimension_4, int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Cell_4, string Value, string Array[]); |
//|20.Ôóíêöèÿ "Øåñòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".-------------------------------------------------------------------------------------------------------------------------+
//| StringArrayDynamicDimension6 (ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü, ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå, |
//| ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè, óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè, |
//| óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè, óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè,|
//| óñòàíîâêà ðàçìåðà ïÿòîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè, |
//| íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè, íîìåð ÿ÷åéêè â ïÿòîé ðàçìåðíîñòè, ÷èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà, |
//| 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ); |
//| string StringArrayDynamicDimension6 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, |
//| int SizeDimension_4, int SizeDimension_5, int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Cell_4, int Cell_5, string Value, string Array[]); |
//+--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------+
#property copyright "Copyright © 2006 Zhunko"
#property link "vadim@zhunko.ru"
#property library
//ææææ Ôóíêöèè äèíàìè÷åñêèõ ìàññèâîâ ñ ëîãè÷åñêèìè äàííûìè.æææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ
//1===Ôóíêöèÿ "Äâóõìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".===========================================================================================================================
int BoolArrayDynamicDimension2 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
bool Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
bool& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.-------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension2()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension2()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension2()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension2()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension2()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension2()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
ArrayResize (Array, SizeDimension_0 * SizeDim_1);
Cell = SizeDim_1 * Cell_0 + Cell_1; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
Print ("Array[", a,"][", b, "] = ", Array[SizeDim_1 * a + b]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//2===Ôóíêöèÿ "Òð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".============================================================================================================================
int BoolArrayDynamicDimension3 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
bool Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
bool& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2);
Cell = SizeDim_1 * SizeDim_2 * Cell_0 + SizeDim_2 * Cell_1 + Cell_2; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
Print ("Array[", a,"][", b, "][", c, "] = ", Array[SizeDim_1 * SizeDim_2 * a + SizeDim_2 * b + c]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//3===Ôóíêöèÿ "×åòûð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".=========================================================================================================================
int BoolArrayDynamicDimension4 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
bool& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
bool& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * Cell_0 + SizeDim_2 * SizeDim_3 * Cell_1 + SizeDim_3 * Cell_2 + Cell_3; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
Print ("Array[", a,"][", b, "][", c, "][", d, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * a + SizeDim_2 * SizeDim_3 * b + SizeDim_3 * c + d]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//4===Ôóíêöèÿ "Ïÿòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".============================================================================================================================
int BoolArrayDynamicDimension5 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int SizeDimension_4, // Óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int Cell_4, // Íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè.
bool& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
bool& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d, e; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_4; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_4 < 0) // Êîíòðîëü íà íîëü ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_4 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
if (Cell_4 > (SizeDimension_4 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.----------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
if (SizeDimension_4 == 0) SizeDim_4 = 1;
else SizeDim_4 = SizeDimension_4;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * Cell_0 + SizeDim_2 * SizeDim_3 * SizeDim_4 * Cell_1 + SizeDim_3 * SizeDim_4 * Cell_2 + SizeDim_4 * Cell_3 + Cell_4; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
for (e = 0; e < SizeDim_4; e++)
Print ("Array[", a,"][", b, "][", c, "][", d, "][", e, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * a + SizeDim_2 * SizeDim_3 * SizeDim_4 * b + SizeDim_3 * SizeDim_4 * c + SizeDim_4 * d + e]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//5===Ôóíêöèÿ "Øåñòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ ëîãè÷åñêèìè äàííûìè".===========================================================================================================================
int BoolArrayDynamicDimension6 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int SizeDimension_4, // Óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè.
int SizeDimension_5, // Óñòàíîâêà ðàçìåðà ïÿòîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int Cell_4, // Íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè.
int Cell_5, // Íîìåð ÿ÷åéêè â ïÿòîé ðàçìåðíîñòè.
bool& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
bool& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d, e, f; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_4; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_5; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_4 < 0) // Êîíòðîëü íà íîëü ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_5 < 0) // Êîíòðîëü íà íîëü ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_5 = ", SizeDimension_5, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_5 = ", SizeDimension_5, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_4 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_5 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_5 = ", Cell_5, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_5 = ", Cell_5, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
if (Cell_4 > (SizeDimension_4 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4);
return (-1);
}
if (Cell_5 > (SizeDimension_5 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"BoolArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_5 = ", Cell_5, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_5 = ", SizeDimension_5, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_5 = ", Cell_5, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_5 = ", SizeDimension_5);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
if (SizeDimension_4 == 0) SizeDim_4 = 1;
else SizeDim_4 = SizeDimension_4;
if (SizeDimension_5 == 0) SizeDim_5 = 1;
else SizeDim_5 = SizeDimension_5;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_0 + SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_1 + SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_2 + SizeDim_4 * SizeDim_5 * Cell_3 + SizeDim_5 * Cell_4 + Cell_5; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
for (e = 0; e < SizeDim_4; e++)
for (f = 0; f < SizeDim_5; f++)
Print ("Array[", a,"][", b, "][", c, "][", d, "][", e, "][", f, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * a + SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * b + SizeDim_3 * SizeDim_4 * SizeDim_5 * c + SizeDim_4 * SizeDim_5 * d + SizeDim_5 * e + f]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//ææææ Ôóíêöèè äèíàìè÷åñêèõ ìàññèâîâ ñ äàííûìè äâîéíîé òî÷íîñòè.æææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ
//6===Ôóíêöèÿ "Äâóõìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".=======================================================================================================================
int doubleArrayDynamicDimension2 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
double& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
double& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension2()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension2()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension2()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension2()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension2()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension2()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
ArrayResize (Array, SizeDimension_0 * SizeDim_1);
Cell = SizeDim_1 * Cell_0 + Cell_1; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
Print ("Array[", a,"][", b, "] = ", Array[SizeDim_1 * a + b]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//7===Ôóíêöèÿ "Òð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".=======================================================================================================================
int doubleArrayDynamicDimension3 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
double& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
double& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2);
Cell = SizeDim_1 * SizeDim_2 * Cell_0 + SizeDim_2 * Cell_1 + Cell_2; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
Print ("Array[", a,"][", b, "][", c, "] = ", Array[SizeDim_1 * SizeDim_2 * a + SizeDim_2 * b + c]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//8===Ôóíêöèÿ "×åòûð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".====================================================================================================================
int doubleArrayDynamicDimension4 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
double& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
double& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * Cell_0 + SizeDim_2 * SizeDim_3 * Cell_1 + SizeDim_3 * Cell_2 + Cell_3; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
Print ("Array[", a,"][", b, "][", c, "][", d, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * a + SizeDim_2 * SizeDim_3 * b + SizeDim_3 * c + d]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//9===Ôóíêöèÿ "Ïÿòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".=======================================================================================================================
int doubleArrayDynamicDimension5 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int SizeDimension_4, // Óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int Cell_4, // Íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè.
double& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
double& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d, e; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_4; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_4 < 0) // Êîíòðîëü íà íîëü ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_4 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
if (Cell_4 > (SizeDimension_4 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
if (SizeDimension_4 == 0) SizeDim_4 = 1;
else SizeDim_4 = SizeDimension_4;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * Cell_0 + SizeDim_2 * SizeDim_3 * SizeDim_4 * Cell_1 + SizeDim_3 * SizeDim_4 * Cell_2 + SizeDim_4 * Cell_3 + Cell_4; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
for (e = 0; e < SizeDim_4; e++)
Print ("Array[", a,"][", b, "][", c, "][", d, "][", e, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * a + SizeDim_2 * SizeDim_3 * SizeDim_4 * b + SizeDim_3 * SizeDim_4 * c + SizeDim_4 * d + e]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//10==Ôóíêöèÿ "Øåñòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ äàííûìè äâîéíîé òî÷íîñòè".======================================================================================================================
int doubleArrayDynamicDimension6 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int SizeDimension_4, // Óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè.
int SizeDimension_5, // Óñòàíîâêà ðàçìåðà ïÿòîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int Cell_4, // Íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè.
int Cell_5, // Íîìåð ÿ÷åéêè â ïÿòîé ðàçìåðíîñòè.
double& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
double& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d, e, f; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_4; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_5; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_4 < 0) // Êîíòðîëü íà íîëü ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_5 < 0) // Êîíòðîëü íà íîëü ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_5 = ", SizeDimension_5, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_5 = ", SizeDimension_5, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_4 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_5 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_5 = ", Cell_5, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_5 = ", Cell_5, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
if (Cell_4 > (SizeDimension_4 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4);
return (-1);
}
if (Cell_5 > (SizeDimension_5 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"doubleArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_5 = ", Cell_5, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_5 = ", SizeDimension_5, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_5 = ", Cell_5, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_5 = ", SizeDimension_5);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
if (SizeDimension_4 == 0) SizeDim_4 = 1;
else SizeDim_4 = SizeDimension_4;
if (SizeDimension_5 == 0) SizeDim_5 = 1;
else SizeDim_5 = SizeDimension_5;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_0 + SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_1 + SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_2 + SizeDim_4 * SizeDim_5 * Cell_3 + SizeDim_5 * Cell_4 + Cell_5; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
for (e = 0; e < SizeDim_4; e++)
for (f = 0; f < SizeDim_5; f++)
Print ("Array[", a,"][", b, "][", c, "][", d, "][", e, "][", f, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * a + SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * b + SizeDim_3 * SizeDim_4 * SizeDim_5 * c + SizeDim_4 * SizeDim_5 * d + SizeDim_5 * e + f]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//ææææ Ôóíêöèè äèíàìè÷åñêèõ ìàññèâîâ ñ öåëî÷èñëåííûìè äàííûìè.æææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ
//11==Ôóíêöèÿ "Äâóõìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".=========================================================================================================================
int IntArrayDynamicDimension2 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
int& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension2()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension2()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension2()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension2()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension2()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension2()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
ArrayResize (Array, SizeDimension_0 * SizeDim_1);
Cell = SizeDim_1 * Cell_0 + Cell_1; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
Print ("Array[", a,"][", b, "] = ", Array[SizeDim_1 * a + b]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//12==Ôóíêöèÿ "Òð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".=========================================================================================================================
int IntArrayDynamicDimension3 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
int& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2);
Cell = SizeDim_1 * SizeDim_2 * Cell_0 + SizeDim_2 * Cell_1 + Cell_2; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
Print ("Array[", a,"][", b, "][", c, "] = ", Array[SizeDim_1 * SizeDim_2 * a + SizeDim_2 * b + c]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//13==Ôóíêöèÿ "×åòûð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".======================================================================================================================
int IntArrayDynamicDimension4 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
int& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * Cell_0 + SizeDim_2 * SizeDim_3 * Cell_1 + SizeDim_3 * Cell_2 + Cell_3; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
Print ("Array[", a,"][", b, "][", c, "][", d, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * a + SizeDim_2 * SizeDim_3 * b + SizeDim_3 * c + d]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//14==Ôóíêöèÿ "Ïÿòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".=========================================================================================================================
int IntArrayDynamicDimension5 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int SizeDimension_4, // Óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int Cell_4, // Íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè.
int& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
int& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d, e; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_4; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_4 < 0) // Êîíòðîëü íà íîëü ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_4 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
if (Cell_4 > (SizeDimension_4 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
if (SizeDimension_4 == 0) SizeDim_4 = 1;
else SizeDim_4 = SizeDimension_4;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * Cell_0 + SizeDim_2 * SizeDim_3 * SizeDim_4 * Cell_1 + SizeDim_3 * SizeDim_4 * Cell_2 + SizeDim_4 * Cell_3 + Cell_4; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.----------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
for (e = 0; e < SizeDim_4; e++)
Print ("Array[", a,"][", b, "][", c, "][", d, "][", e, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * a + SizeDim_2 * SizeDim_3 * SizeDim_4 * b + SizeDim_3 * SizeDim_4 * c + SizeDim_4 * d + e]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//15==Ôóíêöèÿ "Øåñòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñ öåëî÷èñëåííûìè äàííûìè".========================================================================================================================
int IntArrayDynamicDimension6 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int SizeDimension_4, // Óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè.
int SizeDimension_5, // Óñòàíîâêà ðàçìåðà ïÿòîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int Cell_4, // Íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè.
int Cell_5, // Íîìåð ÿ÷åéêè â ïÿòîé ðàçìåðíîñòè.
int& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
int& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d, e, f; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_4; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_5; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_4 < 0) // Êîíòðîëü íà íîëü ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
return (-1);
}
if (SizeDimension_5 < 0) // Êîíòðîëü íà íîëü ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_5 = ", SizeDimension_5, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_5 = ", SizeDimension_5, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_4 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
return (-1);
}
if (Cell_5 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_5 = ", Cell_5, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_5 = ", Cell_5, "ìåíüøå íóëÿ.");
return (-1);
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return (-1);
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return (-1);
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return (-1);
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return (-1);
}
if (Cell_4 > (SizeDimension_4 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4);
return (-1);
}
if (Cell_5 > (SizeDimension_5 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"IntArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_5 = ", Cell_5, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_5 = ", SizeDimension_5, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_5 = ", Cell_5, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_5 = ", SizeDimension_5);
return (-1);
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
if (SizeDimension_4 == 0) SizeDim_4 = 1;
else SizeDim_4 = SizeDimension_4;
if (SizeDimension_5 == 0) SizeDim_5 = 1;
else SizeDim_5 = SizeDimension_5;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_0 + SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_1 + SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_2 + SizeDim_4 * SizeDim_5 * Cell_3 + SizeDim_5 * Cell_4 + Cell_5; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
for (e = 0; e < SizeDim_4; e++)
for (f = 0; f < SizeDim_5; f++)
Print ("Array[", a,"][", b, "][", c, "][", d, "][", e, "][", f, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * a + SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * b + SizeDim_3 * SizeDim_4 * SizeDim_5 * c + SizeDim_4 * SizeDim_5 * d + SizeDim_5 * e + f]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//ææææ Ôóíêöèè äèíàìè÷åñêèõ ìàññèâîâ ñî ñòðîêîâûìè äàííûìè.ææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ
//16==Ôóíêöèÿ "Äâóõìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".============================================================================================================================
string StringArrayDynamicDimension2 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
string& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
string& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension2()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension2()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension2()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension2()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension2()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return ("-1");
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension2()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return ("-1");
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
ArrayResize (Array, SizeDimension_0 * SizeDim_1);
Cell = SizeDim_1 * Cell_0 + Cell_1; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
Print ("Array[", a,"][", b, "] = ", Array[SizeDim_1 * a + b]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//17==Ôóíêöèÿ "Òð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".=============================================================================================================================
string StringArrayDynamicDimension3 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè
string& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà
string& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ
{
int a, b, c; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return ("-1");
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return ("-1");
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension3()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return ("-1");
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2);
Cell = SizeDim_1 * SizeDim_2 * Cell_0 + SizeDim_2 * Cell_1 + Cell_2; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
Print ("Array[", a,"][", b, "][", c, "] = ", Array[SizeDim_1 * SizeDim_2 * a + SizeDim_2 * b + c]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//18==Ôóíêöèÿ "×åòûð¸õìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".=========================================================================================================================
string StringArrayDynamicDimension4 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
string& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
string& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return ("-1");
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return ("-1");
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return ("-1");
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension4()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return ("-1");
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * Cell_0 + SizeDim_2 * SizeDim_3 * Cell_1 + SizeDim_3 * Cell_2 + Cell_3; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
Print ("Array[", a,"][", b, "][", c, "][", d, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * a + SizeDim_2 * SizeDim_3 * b + SizeDim_3 * c + d]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//19==Ôóíêöèÿ "Ïÿòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".============================================================================================================================
string StringArrayDynamicDimension5 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int SizeDimension_4, // Óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int Cell_4, // Íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè.
string& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
string& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d, e; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_4; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_4 < 0) // Êîíòðîëü íà íîëü ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÐàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_4 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return ("-1");
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return ("-1");
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return ("-1");
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return ("-1");
}
if (Cell_4 > (SizeDimension_4 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension5()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4);
return ("-1");
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
if (SizeDimension_4 == 0) SizeDim_4 = 1;
else SizeDim_4 = SizeDimension_4;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * Cell_0 + SizeDim_2 * SizeDim_3 * SizeDim_4 * Cell_1 + SizeDim_3 * SizeDim_4 * Cell_2 + SizeDim_4 * Cell_3 + Cell_4; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
for (e = 0; e < SizeDim_4; e++)
Print ("Array[", a,"][", b, "][", c, "][", d, "][", e, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * a + SizeDim_2 * SizeDim_3 * SizeDim_4 * b + SizeDim_3 * SizeDim_4 * c + SizeDim_4 * d + e]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//20==Ôóíêöèÿ "Øåñòèìåðíûé äèíàìè÷åñêèé ìàññèâ ñî ñòðîêîâûìè äàííûìè".===========================================================================================================================
string StringArrayDynamicDimension6 (bool Write_Read, // Ïåðåêëþ÷àòåëü true/false - ïèñàòü/÷èòàòü.
bool CheckingERROR, // Ïåðåêëþ÷àòåëü true/false - êîíòðîëèðîâàòü/íå êîíòðîëèðîâàòü âõîäíûå äàííûå.
bool PRINT, // Ïåðåêëþ÷àòåëü true/false - ïå÷àòàòü/íå ïå÷àòàòü ñîäåðæèìîå ìàññèâà ïîñëå êàæäîãî îáðàùåíèÿ ê ôóíêöèè.
int SizeDimension_0, // Óñòàíîâêà ðàçìåðà íóëåâîé ðàçìåðíîñòè.
int SizeDimension_1, // Óñòàíîâêà ðàçìåðà ïåðâîé ðàçìåðíîñòè.
int SizeDimension_2, // Óñòàíîâêà ðàçìåðà âòîðîé ðàçìåðíîñòè.
int SizeDimension_3, // Óñòàíîâêà ðàçìåðà òðåòüåé ðàçìåðíîñòè.
int SizeDimension_4, // Óñòàíîâêà ðàçìåðà ÷åòâ¸ðòîé ðàçìåðíîñòè.
int SizeDimension_5, // Óñòàíîâêà ðàçìåðà ïÿòîé ðàçìåðíîñòè.
int Cell_0, // Íîìåð ÿ÷åéêè â íóëåâîé ðàçìåðíîñòè.
int Cell_1, // Íîìåð ÿ÷åéêè â ïåðâîé ðàçìåðíîñòè.
int Cell_2, // Íîìåð ÿ÷åéêè â âòîðîé ðàçìåðíîñòè.
int Cell_3, // Íîìåð ÿ÷åéêè â òðåòüåé ðàçìåðíîñòè.
int Cell_4, // Íîìåð ÿ÷åéêè â ÷åòâ¸ðòîé ðàçìåðíîñòè.
int Cell_5, // Íîìåð ÿ÷åéêè â ïÿòîé ðàçìåðíîñòè.
string& Value, // ×èñëîâîå çíà÷åíèå äëÿ ââîäà/âûâîäà.
string& Array[]) // 1-î ìåðíûé ìàññèâ äëÿ ïðåîáðàçîâàíèÿ â ìíîãîìåðíûé è çàïîëíåíèÿ.
{
int a, b, c, d, e, f; // Ïåðåìåíûå äëÿ öèêëîâ.
int Cell; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
int SizeDim_1; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_2; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_3; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_4; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
int SizeDim_5; // Ìîäèôèöèðóåìàÿ ðàçìåðíîñòü.
//----Êîíòðîëü ââîäèìûõ çíà÷åíèé.--------------------------------------------------------------------------------------------------------------------------------------------------------------
if (CheckingERROR == true)
{
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (SizeDimension_0 < 0) // Êîíòðîëü íà íîëü íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_0 = ", SizeDimension_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_1 < 0) // Êîíòðîëü íà íîëü ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_1 = ", SizeDimension_1, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_2 < 0) // Êîíòðîëü íà íîëü âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_2 = ", SizeDimension_2, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_3 < 0) // Êîíòðîëü íà íîëü òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_3 = ", SizeDimension_3, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_4 < 0) // Êîíòðîëü íà íîëü ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_4 = ", SizeDimension_4, "ìåíüøå íóëÿ.");
return ("-1");
}
if (SizeDimension_5 < 0) // Êîíòðîëü íà íîëü ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÐàçìåðíîñòü SizeDimension_5 = ", SizeDimension_5, "ìåíüøå íóëÿ.");
Print ("Ðàçìåðíîñòü SizeDimension_5 = ", SizeDimension_5, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü íà îòðèöàòåëüíûå çíà÷åíèÿ ðàçìåðíîñòåé.
if (Cell_0 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè íóëåâîé ðàçìåðíîñòè Cell_0 = ", Cell_0, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_1 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_1 = ", Cell_1, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_2 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_2 = ", Cell_2, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_3 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_3 = ", Cell_3, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_4 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_4 = ", Cell_4, "ìåíüøå íóëÿ.");
return ("-1");
}
if (Cell_5 < 0) // Êîíòðîëü íà íîëü íîìåðà ÿ÷åéêè ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_5 = ", Cell_5, "ìåíüøå íóëÿ.");
Print ("Íîìåð ÿ÷åéêè ïåðâîé ðàçìåðíîñòè Cell_5 = ", Cell_5, "ìåíüøå íóëÿ.");
return ("-1");
}
// Êîíòðîëü ââîäèìûõ çíà÷åíèé íîìåðîâ ÿ÷ååê.
if (Cell_0 > (SizeDimension_0 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ íóëåâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_0 = ", Cell_0, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_0 = ", SizeDimension_0);
return ("-1");
}
if (Cell_1 > (SizeDimension_1 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïåðâîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_1 = ", Cell_1, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_1 = ", SizeDimension_1);
return ("-1");
}
if (Cell_2 > (SizeDimension_2 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ âòîðîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_2 = ", Cell_2, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_2 = ", SizeDimension_2);
return ("-1");
}
if (Cell_3 > (SizeDimension_3 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ òðåòüåé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_3 = ", Cell_3, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_3 = ", SizeDimension_3);
return ("-1");
}
if (Cell_4 > (SizeDimension_4 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ÷åòâ¸ðòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_4 = ", Cell_4, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_4 = ", SizeDimension_4);
return ("-1");
}
if (Cell_5 > (SizeDimension_5 - 1)) // Êîíòðîëü ââîäèìûõ çíà÷åíèé äëÿ ïÿòîé ðàçìåðíîñòè.
{
Comment ("Ôóíêöèÿ \"StringArrayDynamicDimension6()\".\nÍîìåð ââîäèìîé ÿ÷åéêè Cell_5 = ", Cell_5, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_5 = ", SizeDimension_5, ".");
Print ("Íîìåð ââîäèìîé ÿ÷åéêè Cell_5 = ", Cell_5, ". Ýòî áîëüøå îáúÿâëåííîé ðàçìåðíîñòè SizeDimension_5 = ", SizeDimension_5);
return ("-1");
}
}
//----Êîíòðîëü ââîäèìûõ ðàçìåðíîñòåé íà íîëü è èçìåíåíèå ðàçìåðîâ ìàññèâà.---------------------------------------------------------------------------------------------------------------------
if (SizeDimension_1 == 0) SizeDim_1 = 1;
else SizeDim_1 = SizeDimension_1;
if (SizeDimension_2 == 0) SizeDim_2 = 1;
else SizeDim_2 = SizeDimension_2;
if (SizeDimension_3 == 0) SizeDim_3 = 1;
else SizeDim_3 = SizeDimension_3;
if (SizeDimension_4 == 0) SizeDim_4 = 1;
else SizeDim_4 = SizeDimension_4;
if (SizeDimension_5 == 0) SizeDim_5 = 1;
else SizeDim_5 = SizeDimension_5;
ArrayResize (Array, SizeDimension_0 * SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5);
Cell = SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_0 + SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_1 + SizeDim_3 * SizeDim_4 * SizeDim_5 * Cell_2 + SizeDim_4 * SizeDim_5 * Cell_3 + SizeDim_5 * Cell_4 + Cell_5; // Íîìåð ÿ÷åéêè â îäíîìåðíîì ìàññèâå.
//----×òåíèå/çàïèñü.---------------------------------------------------------------------------------------------------------------------------------------------------------------------------
// Åñëè ðàçðåøåíà ðàñïå÷àòêà ñîäåðæèìîãî ìàññèâà.
if (PRINT == true)
for (a = 0; a < SizeDimension_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++)
for (e = 0; e < SizeDim_4; e++)
for (f = 0; f < SizeDim_5; f++)
Print ("Array[", a,"][", b, "][", c, "][", d, "][", e, "][", f, "] = ", Array[SizeDim_1 * SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * a + SizeDim_2 * SizeDim_3 * SizeDim_4 * SizeDim_5 * b + SizeDim_3 * SizeDim_4 * SizeDim_5 * c + SizeDim_4 * SizeDim_5 * d + SizeDim_5 * e + f]);
// Åñëè íóæíî ïðî÷èòàòü.
if (Write_Read == false) return (Array[Cell]);
// Åñëè íóæíî çàïèñàòü.
if (Write_Read == true) Array[Cell] = Value;
//  ñëó÷àå óñïåõà, âîçâðàùàåì ñîäåðæèìîå çàïðàøèâàåìîé ÿ÷åéêè.
return (Array[Cell]);
}
//===============================================================================================================================================================================================
//æææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææææ
/*
//+-----------------------------------------------------------------------------------+
//| Checking_Dynamic_Arrays.mq4 |
//| Copyright © Zhunko |
//|08.01.2008 zhunko@mail.ru |
//+-----------------------------------------------------------------------------------+
//| Ñêðèïò äëÿ êîíòðîëÿ ðàáîòîñïîñîáíîñòè áèáëèîòåêè ôóíêöèé äèíèìè÷åñêèõ ìàññèâîâ. |
//+-----------------------------------------------------------------------------------+
#property copyright "Copyright © Zhunko"
#property link "zhunko@mail.ru"
#property show_inputs
#import "ZH_Dynamic_Arrays_Lib.ex4"
int IntArrayDynamicDimension4 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int SizeDimension_3, int Cell_0, int Cell_1, int Cell_2, int Cell_3, int Value, int Array[]);
#import
extern bool Write_Read = false;
extern int Cell_0 = 0;
extern int Cell_1 = 0;
extern int Cell_2 = 0;
extern int Cell_3 = 0;
extern int SizeDim_0 = 2;
extern int SizeDim_1 = 4;
extern int SizeDim_2 = 6;
extern int SizeDim_3 = 8;
//----
int a, b, c, d, n; // Ïåðåìåíûå äëÿ öèêëîâ.
int Array[];
//+------------------------------------------------------------------+
//| script program start function |
//+------------------------------------------------------------------+
int start()
{
int Value;
if (Write_Read == false)
{
ArrayResize (Array, SizeDim_0 * SizeDim_1 * SizeDim_2 * SizeDim_3);
for (a = 0; a < SizeDim_0 * SizeDim_1 * SizeDim_2 * SizeDim_3; a++) Array[a] = a;
// Êîíòðîëëèðóåì çàïèñü.
for (a = 0, n = 0; a < SizeDim_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++, n++) Alert ("Array[", n, "] = ", IntArrayDynamicDimension4 (Write_Read, true, true, SizeDim_0, SizeDim_1, SizeDim_2, SizeDim_3, a, b, c, d, Value, Array));
Comment (IntArrayDynamicDimension4 (Write_Read, true, true, SizeDim_0, SizeDim_1, SizeDim_2, SizeDim_3, Cell_0, Cell_1, Cell_2, Cell_3, Value, Array));
}
else
{
for (a = 0, n = 0; a < SizeDim_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
for (d = 0; d < SizeDim_3; d++, n++) IntArrayDynamicDimension4 (Write_Read, true, true, SizeDim_0, SizeDim_1, SizeDim_2, SizeDim_3, a, b, c, d, n, Array);
// Êîíòðîëëèðóåì çàïèñü.
for (a = 0; a < SizeDim_0 * SizeDim_1 * SizeDim_2 * SizeDim_3; a++) Alert ("Array[", a, "] = ", Array[a]);
}
//----
return(0);
}
//+------------------------------------------------------------------+
//+-----------------------------------------------------------------------------------+
//| Checking_Dynamic_Arrays.mq4 |
//| Copyright © Zhunko |
//|08.01.2008 zhunko@mail.ru |
//+-----------------------------------------------------------------------------------+
//| Ñêðèïò äëÿ êîíòðîëÿ ðàáîòîñïîñîáíîñòè áèáëèîòåêè ôóíêöèé äèíèìè÷åñêèõ ìàññèâîâ. |
//+-----------------------------------------------------------------------------------+
#property copyright "Copyright © Zhunko"
#property link "zhunko@mail.ru"
#property show_inputs
#import "ZH_Dynamic_Arrays_Lib.ex4"
double DoubleArrayDynamicDimension3 (bool Write_Read, bool CheckingERROR, bool PRINT, int SizeDimension_0, int SizeDimension_1, int SizeDimension_2, int Cell_0, int Cell_1, int Cell_2, double Value, double Array[]);
#import
extern bool Write_Read = false;
extern int Cell_0 = 0;
extern int Cell_1 = 0;
extern int Cell_2 = 0;
extern int Cell_3 = 0;
extern int SizeDim_0 = 10000;
extern int SizeDim_1 = 100;
extern int SizeDim_2 = 9;
extern int SizeDim_3 = 1;
//----
int a, b, c, d, n; // Ïåðåìåíûå äëÿ öèêëîâ.
string str1, str2;
double Array[];
//+------------------------------------------------------------------+
//| script program start function |
//+------------------------------------------------------------------+
int start()
{
datetime time;
double Value;
//----
if (Write_Read == false)
{
ArrayResize (Array, SizeDim_0 * SizeDim_1 * SizeDim_2);
time = TimeLocal();
for (a = 0; a < SizeDim_0 * SizeDim_1 * SizeDim_2 * SizeDim_3; a++) Array[a] = a;
str1 = TimeToStr (TimeLocal() - time, TIME_MINUTES|TIME_SECONDS);
Comment ("Âðåìÿ ðàáîòû îäíîìåðíîãî ìàññèâà = ", str1);
// Êîíòðîëëèðóåì çàïèñü.
time = TimeLocal();
for (a = 0, n = 0; a < SizeDim_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++)
// for (d = 0; d < SizeDim_3; d++, n++)
{
Value = DoubleArrayDynamicDimension3 (Write_Read, false, false, SizeDim_0, SizeDim_1, SizeDim_2, a, b, c, Value, Array);
// Alert ("Array[", n, "] = ", IntArrayDynamicDimension3 (Write_Read, false, false, SizeDim_0, SizeDim_1, SizeDim_2, a, b, c, Value, Array));
}
str2 = TimeToStr (TimeLocal() - time, TIME_MINUTES|TIME_SECONDS);
Comment ("Âðåìÿ ðàáîòû îäíîìåðíîãî ìàññèâà = ", str1, "\nÂðåìÿ ðàáîòû äèíàìè÷åñêîãî ìàññèâà = ", str2);
// Comment (DoubleArrayDynamicDimension3 (Write_Read, false, false, SizeDim_0, SizeDim_1, SizeDim_2, Cell_0, Cell_1, Cell_2, Value, Array));
}
else
{
time = TimeLocal();
for (a = 0, n = 0; a < SizeDim_0; a++)
for (b = 0; b < SizeDim_1; b++)
for (c = 0; c < SizeDim_2; c++, n++)
// for (d = 0; d < SizeDim_3; d++)
{
DoubleArrayDynamicDimension3 (Write_Read, false, false, SizeDim_0, SizeDim_1, SizeDim_2, a, b, c, n, Array);
}
str1 = TimeToStr (TimeLocal() - time, TIME_MINUTES|TIME_SECONDS);
Comment ("Âðåìÿ ðàáîòû äèíàìè÷åñêîãî ìàññèâà = ", str1);
// Êîíòðîëëèðóåì çàïèñü.
time = TimeLocal();
for (a = 0; a < SizeDim_0 * SizeDim_1 * SizeDim_2; a++)
{
Value = Array[a];
// Alert ("Array[", a, "] = ", Array[a]);
}
str2 = TimeToStr (TimeLocal() - time, TIME_MINUTES|TIME_SECONDS);
Comment ("Âðåìÿ ðàáîòû äèíàìè÷åñêîãî ìàññèâà = ", str1, "\nÂðåìÿ ðàáîòû îäíîìåðíîãî ìàññèâà = ", str2);
}
//----
return(0);
}
//+------------------------------------------------------------------+
ÍÀÁÎÐ ÔÓÍÊÖÈÉ ÄËß ÝÌÓËßÖÈÈ ÄÈÍÀÌÈ×ÅÑÊÈÕ ÌÀÑÑÈÂÎÂ.
Ôóíêöèè îáðàùàþòñÿ ê îäíîìåðíîìó ìàññèâó, êàê ê ìíîãîìåðíîìó.
Åñòü îòêëþ÷àåìûå âîçìîæíîñòè êîíòðîëÿ âõîäÿùèõ äàííûõ è êîíòðîëÿ ñîäåðæèìîãî ìàññèâà ïðè êàæäîì îáðàùåíèè ê ôóíêöèè.
Ëó÷øå íå èñïîëüçîâàòü ýòè âîçìîæíîñòè â ðàáî÷åì ðåæèìå. Ñèëüíî óâåëè÷èâàþò âðåìÿ âû÷èñëåíèé.
Ìîæíî èñïîëüçûâàòü øåñòèìåðíûé ìàññèâ, êàê äâóõìåðíûé. Âðåìÿ âû÷èñëåíèé ïî÷òè íå ìåíÿåòñÿ. Òîëüêî áîëüøå ïàðàìåòðîâ âõîäíûõ.
 öåëîì ôóíêöèè ðàáîòàþò â ñåìü ðàç ìåäëåííåå, ÷åì îáû÷íûé îäíîìåðíûé ìàññèâ â ÌÒ4.
*/
Comments