{"id":493,"date":"2017-04-19T16:37:06","date_gmt":"2017-04-19T12:37:06","guid":{"rendered":"http:\/\/infobs.athn.ru\/?p=493"},"modified":"2017-04-19T16:37:06","modified_gmt":"2017-04-19T12:37:06","slug":"spravochnik-po-standartnyim-funktsiyam-autolisp","status":"publish","type":"post","link":"https:\/\/infobase.athn.ru\/program\/2017\/04\/spravochnik-po-standartnyim-funktsiyam-autolisp\/","title":{"rendered":"\u0421\u043f\u0440\u0430\u0432\u043e\u0447\u043d\u0438\u043a \u043f\u043e \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u044b\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c AUTOLISP"},"content":{"rendered":"<p>\u0412\u0437\u044f\u0442\u043e \u043e\u0442\u0441\u044e\u0434\u0430 http:\/\/aco.ifmo.ru\/~nadinet\/html\/other\/lsp_book\/lisp.html<\/p>\n<blockquote>\n<blockquote><p><img loading=\"lazy\" decoding=\"async\" src=\".\/pic\/diamond_green_1.gif\" alt=\"\" width=\"20\" height=\"16\" \/><a href=\"#mat_f\">\u041c\u0430\u0442\u0435\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438\u0435<br \/>\n\u0444\u0443\u043d\u043a\u0446\u0438\u0438<\/a><\/p>\n<p><img loading=\"lazy\" decoding=\"async\" src=\".\/pic\/diamond_green_1.gif\" alt=\"\" width=\"20\" height=\"16\" \/><span style=\"color: #006666\"><b>\u0410\u043b\u0444\u0430\u0432\u0438\u0442\u043d\u044b\u0439<br \/>\n\u0441\u043f\u0438\u0441\u043e\u043a<\/b><\/span> <a href=\"#a\"> A<\/a> <a href=\"#b\">B<\/a> <a href=\"#c\"><br \/>\nC<\/a> <a href=\"#d\">D<\/a> <a href=\"#e\">E<\/a> <a href=\"#f\"> F<\/a> <a href=\"#g\">G<\/a><br \/>\n<a href=\"#i\">I<\/a> <a href=\"#_LL\">L<\/a> <a href=\"#m\">M<\/a> <a href=\"#n\">N<\/a><br \/>\n<a href=\"#O\">O<\/a> <a href=\"#p\">P<\/a> <a href=\"#q\">Q<\/a> <a href=\"#r\">R<\/a><br \/>\n<a href=\"#s\">S<\/a> <a href=\"#t\">T<\/a> <a href=\"#u\">U<\/a> <a href=\"#v\">V<\/a><br \/>\n<a href=\"#w\">W<\/a> <a href=\"#z\">Z<\/a><\/p><\/blockquote>\n<\/blockquote>\n<p><span style=\"font-family: Times New Roman\"><img loading=\"lazy\" decoding=\"async\" src=\".\/pic\/tick_green_2.gif\" alt=\"\" width=\"20\" height=\"16\" \/><a href=\"#2\"><span style=\"font-size: xx-small\">\u041f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b<br \/>\n\u0438 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c\u044b \u0434\u043e\u0441\u0442\u0443\u043f\u0430<\/span><\/a> <\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><img loading=\"lazy\" decoding=\"async\" src=\".\/pic\/tick_green_2.gif\" alt=\"\" width=\"20\" height=\"16\" \/><a href=\"#3\"><span style=\"font-size: xx-small\">\u0421\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u044f<br \/>\n\u043e\u0431 \u043e\u0448\u0438\u0431\u043a\u0430\u0445<\/span><\/a><\/p>\n<p align=\"JUSTIFY\"><img loading=\"lazy\" decoding=\"async\" src=\".\/pic\/birds_3.gif\" alt=\"\" width=\"560\" height=\"47\" \/><\/p>\n<p><!--more--><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\"><a name=\"#1\"><\/a><\/p>\n<p><a name=\"#mat_f\"><\/a><a href=\"#_Toc465260871\">(+<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260872\"> (- &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260873\"> (* &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260874\">(\/ &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260875\">(= &lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260876\">(\/= &lt;\u0430\u0442\u043e\u043c1&gt; &lt;\u0430\u0442\u043e\u043c2&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260877\">(&lt; &lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260878\">(&lt;= &lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260879\">(&gt; &lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260880\">(&gt;= &lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260881\">(~ &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260882\"> (1+ &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260883\"> (1- &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260884\">(abs &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260885\">(and &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260886\">(angle &lt;\u0442\u043e\u04471&gt; &lt;\u0442\u043e\u04472&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260887\"> (angtos &lt;\u0443\u0433\u043e\u043b&gt; [&lt;\u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u0435&gt; [&lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c&gt;]])<\/a><\/p>\n<p><a href=\"#_Toc465260888\"> (append &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260889\"> (apply &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260890\"> (ascii &lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260891\"> (assoc &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0441\u043f\u0438\u0441\u043a\u0430&gt; &lt;\u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260892\"> (atan &lt;\u0447\u0438\u0441\u043b\u043e1&gt; [&lt;\u0447\u0438\u0441\u043b\u043e2&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260893\"> (atof &lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260894\"> (atoi &lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430&gt; )<\/a><\/p>\n<p><a href=\"#_Toc465260895\"> (atom &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260896\"> (Boole &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt; &lt;\u0446\u0435\u043b\u043e\u04351&gt; &lt;\u0446\u0435\u043b\u043e\u04352&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260897\"> (boundp &lt;\u0430\u0442\u043e\u043c&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260899\"> (car &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260900\"> (cdr &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; )<\/a><\/p>\n<p><a href=\"#_Toc465260901\">(chr &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260902\">(close &lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260903\"> (command &lt;\u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260904\">\u041f\u0440\u0435\u0440\u044b\u0432\u0430\u043d\u0438\u0435 \u0434\u043b\u044f \u0432\u0432\u043e\u0434\u0430 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c<\/a><\/p>\n<p><a href=\"#_Toc465260905\"> (cond (&lt;\u0442\u0435\u0441\u04421&gt; &lt;\u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442&gt;&#8230;)&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260906\"> (CONS &lt;\u043d\u043e\u0432\u044b\u0439 \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260907\"> (cos &lt;\u0443\u0433\u043e\u043b&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260908\"> (defun &lt;\u0441\u0438\u043c\u0432\u043e\u043b&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260911\"> (distance &lt;\u0442\u043e\u0447\u043a\u04301&gt; &lt;\u0442\u043e\u0447\u043a\u04302&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260912\"> (eq &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04351&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04352&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260913\"> (equal &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04351&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04352&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260914\"> (eval &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260915\"> (exp &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260916\"> (expt &lt;\u043e\u0441\u043d\u043e\u0432\u0430\u043d\u0438\u0435&gt; &lt;\u0441\u0442\u0435\u043f\u0435\u043d\u044c&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260995\"> (*error* &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260917\"> (fix &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260918\"> (float &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260919\"> (foreach &lt;\u0438\u043c\u044f&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260920\"> (gcd &lt;\u0447\u0438\u0441\u043b\u043e1&gt; &lt;\u0447\u0438\u0441\u043b\u043e2&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260921\"> (getangle [&lt;\u0442\u043e\u0447\u043a\u0430&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260922\"> (getcorner &lt;\u0442\u043e\u0447\u043a\u0430&gt; [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260923\"> (getdist [&lt;\u0442\u043e\u0447\u043a\u0430&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260924\"> (getint [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260925\"> (getkword [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260926\"> (getorient [&lt;\u0442\u043e\u0447\u043a\u0430&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260927\"> (getpoint [&lt;\u0442\u043e\u0447\u043a\u0430&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260928\"> (getreal [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260929\"> (getstring [&lt;cr&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260930\"> (getvar &lt;\u0438\u043c\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260931\">(graphscr)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260932\"> (if &lt;\u0442\u0435\u043a\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435-\u0442\u043e\u0433\u0434\u0430&gt; [&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435-\u0438\u043d\u0430\u0447\u0435&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260933\">(initget [&lt;\u0431\u0438\u0442\u044b&gt;] [&lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260934\">(insers &lt;\u0442\u043e\u0447\u043a\u04301&gt; &lt;\u0442\u043e\u0447\u043a\u04302&gt; &lt;\u0442\u043e\u0447\u043a\u04303&gt; &lt;\u0442\u043e\u0447\u043a\u04304&gt; [&lt;onseg&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260935\"> (itoa &lt;\u0446\u0435\u043b\u043e\u0435&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260936\"> (lambda &lt;\u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260937\"> (last &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260938\"> (length &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260939\"> (list &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260940\"> (listp &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260941\"> (load &lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260942\"> (log &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260943\">(logand &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt; &#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260944\"> (logior &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt; &#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260945\"> (lsh &lt;\u0447\u0438\u0441\u043b\u043e1&gt; &lt;\u0447\u0438\u0441\u043b\u043e \u0431\u0438\u0442&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260946\"> (mopcar &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a1&gt;&#8230;&lt;\u0441\u043f\u0438\u0441\u043e\u043an&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260947\"> (max &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260948\"> (member &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260949\"> (menucmd &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260950\"> (min &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260951\">(minusp &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260952\">(not &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260953\">(nth &lt;n&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260954\">(null &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260955\">(numberp &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260956\"> (open &lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; &lt;\u0440\u0435\u0436\u0438\u043c&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260957\"> (or &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260958\"> (osnap &lt;\u0442\u043e\u0447\u043a\u0430&gt; &lt;\u0441\u0442\u0440\u043e\u043a\u0430-\u0440\u0435\u0436\u0438\u043c&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260959\">pi<\/a><\/p>\n<p><a href=\"#_Toc465260960\">(polar &lt;\u0442\u043e\u0447\u043a\u0430&gt; &lt;\u0443\u0433\u043e\u043b&gt; &lt;\u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260961\">(prin1 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260962\">(princ &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260963\">(print &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260964\">(progn &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260965\"> (prompt &lt;\u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260966\">(quote &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260967\">(read &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260968\">(read-char [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260969\">(read-line [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260970\"> (redraw [&lt;\u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430&gt; [&lt;\u0440\u0435\u0436\u0438\u043c&gt;]])<\/a><\/p>\n<p><a href=\"#_Toc465260971\">(rem &lt;\u0447\u0438\u0441\u043b\u043e1&gt; &lt;\u0447\u0438\u0441\u043b\u043e2&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260972\">(repeat &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260973\">(reverse &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260974\">(rtos &lt;\u0447\u0438\u0441\u043b\u043e&gt; [&lt;\u0440\u0435\u0436\u0438\u043c&gt; [&lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c&gt;]])<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260975\"> (set &lt;\u0441\u0438\u043c\u0432\u043e\u043b&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260976\">(setq &lt;\u0441\u0438\u043c\u0432\u043e\u043b1&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04351&gt; [&lt;\u0441\u0438\u043c\u0432\u043e\u043b2&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04352&gt;]&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260977\">(setvar &lt;\u0438\u043c\u044f-\u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439&gt; &lt;\u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260978\"> (sin &lt;\u0443\u0433\u043e\u043b&gt;);<\/a><\/p>\n<p><a href=\"#_Toc465260979\"> (sqrt &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260980\">(strcase &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; [&lt;\u043f\u0440\u0438\u0437\u043d\u0430\u043a&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260981\">(strcat &lt;\u0441\u0442\u0440\u043e\u043a\u04301&gt; &lt;\u0441\u0442\u0440\u043e\u043a\u04302&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260982\">(strlen &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260983\">(subst &lt;\u043d\u043e\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; &lt;\u0441\u0442\u0430\u0440\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/a><\/p>\n<p><a href=\"#_Toc465260984\">(substr &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; &lt;\u043d\u0430\u0447\u0430\u043b\u043e&gt; [&lt;\u0434\u043b\u0438\u043d\u0430&gt;])<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260985\"> (terpri)<\/a><\/p>\n<p><a href=\"#_Toc465260986\">(textscr)<\/a><\/p>\n<p><a href=\"#_Toc465260987\">(trace &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt;&#8230;);<\/a><\/p>\n<p><a href=\"#_Toc465260988\">(type &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260989\">(untrace &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt;&#8230;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260990\"> (ver)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260991\">(while &lt;\u0442\u0435\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/a><\/p>\n<p><a href=\"#_Toc465260992\">(write-char &lt;\u0447\u0438\u0441\u043b\u043e&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/a><\/p>\n<p><a href=\"#_Toc465260993\">((write-line &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/a><\/p>\n<p>&nbsp;<\/p>\n<p><a href=\"#_Toc465260994\"> (zerop&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/a><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p><b><i><a name=\"_Toc465260871\"><\/a>(+ &lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;) <\/i><\/b><\/p>\n<p>\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u0443\u043c\u043c\u0443 \u0432\u0441\u0435\u0445 &lt;\u0447\u0438\u0441\u0435\u043b&gt;. \u041e\u043d\u0430 \u043c\u043e\u0436\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u043a\u0430\u043a<br \/>\n\u0441 \u0446\u0435\u043b\u044b\u043c\u0438, \u0442\u0430\u043a \u0438 \u0441 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u0447\u0438\u0441\u043b\u0430\u043c\u0438. \u0415\u0441\u043b\u0438 \u0432\u0441\u0435 &lt;\u0447\u0438\u0441\u043b\u0430&gt; \u0446\u0435\u043b\u044b\u0435, \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442<br \/>\n\u0431\u0443\u0434\u0435\u0442 \u0446\u0435\u043b\u044b\u043c; \u0435\u0441\u043b\u0438 \u0445\u043e\u0442\u044f \u0431\u044b \u043e\u0434\u043d\u043e &lt;\u0447\u0438\u0441\u043b\u043e&gt; \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435, \u0432\u0441\u0435 \u0446\u0435\u043b\u044b\u0435 \u0431\u0443\u0434\u0443\u0442<br \/>\n\u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u044b \u0432 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0435 \u0438 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0431\u0443\u0434\u0435\u0442 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (+ 1 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (+ 1 2 3 4.5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 10.500000<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">+ 1 2 3 4.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 10.000000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260872\"><\/a>(-<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u0447\u0438\u0442\u0430\u0435\u0442 \u0432\u0442\u043e\u0440\u043e\u0435 &lt;\u0447\u0438\u0441\u043b\u043e&gt; \u0438\u0437 \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0430\u0437\u043d\u043e\u0441\u0442\u044c. \u0415\u0441\u043b\u0438 \u0437\u0430\u0434\u0430\u043d\u043e \u0431\u043e\u043b\u0435\u0435 \u0434\u0432\u0443\u0445 &lt;\u0447\u0438\u0441\u0435\u043b&gt;, \u0442\u043e \u0438\u0437 \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u0432\u044b\u0447\u0438\u0442\u0430\u0435\u0442\u0441\u044f \u0441\u0443\u043c\u043c\u0430 \u043e\u0441\u0442\u0430\u043b\u044c\u043d\u044b\u0445. \u0415\u0441\u043b\u0438 \u0437\u0430\u0434\u0430\u043d\u043e \u0442\u043e\u043b\u044c\u043a\u043e \u043e\u0434\u043d\u043e &lt;\u0447\u0438\u0441\u043b\u043e&gt;, \u043e\u043d\u043e \u0432\u044b\u0447\u0438\u0442\u0430\u0435\u0442\u0441\u044f \u0438\u0437 0 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442. \u0424\u0443\u043d\u043a\u0446\u0438\u044f \u043c\u043e\u0436\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0441 \u0446\u0435\u043b\u044b\u043c\u0438 \u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u043f\u043e \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u044b\u043c \u043f\u0440\u0430\u0432\u0438\u043b\u0430\u043c \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u0438\u044f. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (- 50 40) <\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 10<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&#8212; 50 40.0 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 8.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (- 50 40.0 2.5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 7.500000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (- 8)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -8<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260873\"><\/a>(*<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0440\u043e\u0438\u0437\u0432\u0435\u0434\u0435\u043d\u0438\u0435 \u0432\u0441\u0435\u0445 &lt;\u0447\u0438\u0441\u0435\u043b&gt;. \u0424\u0443\u043d\u043a\u0446\u0438\u044f \u043c\u043e\u0436\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0441 \u0446\u0435\u043b\u044b\u043c\u0438 \u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u043f\u043e \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u044b\u043c \u043f\u0440\u0430\u0432\u0438\u043b\u0430\u043c \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u0438\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">* 2 3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 6<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">* 2 3 4.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 24.000000<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">* 3 -4.5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -13.500000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260874\"><\/a>(\/<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0434\u0435\u043b\u0438\u0442 \u043f\u0435\u0440\u0432\u043e\u0435 &lt;\u0447\u0438\u0441\u043b\u043e&gt; \u043d\u0430 \u0432\u0442\u043e\u0440\u043e\u0435 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0447\u0430\u0441\u0442\u043d\u043e\u0435. \u0415\u0441\u043b\u0438 \u0437\u0430\u0434\u0430\u043d\u043e \u0431\u043e\u043b\u0435\u0435 \u0434\u0432\u0443\u0445 &lt;\u0447\u0438\u0441\u0435\u043b&gt;, \u043f\u0435\u0440\u0432\u043e\u0435 \u0434\u0435\u043b\u0438\u0442\u0441\u044f \u043d\u0430 \u043f\u0440\u043e\u0438\u0437\u0432\u0435\u0434\u0435\u043d\u0438\u0435 \u043e\u0441\u0442\u0430\u043b\u044c\u043d\u044b\u0445 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u043e\u043a\u043e\u043d\u0447\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0430\u0441\u0442\u043d\u043e\u0435. \u0424\u0443\u043d\u043a\u0446\u0438\u044f \u043c\u043e\u0436\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0441 \u0446\u0435\u043b\u044b\u043c\u0438 \u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u043f\u043e \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u044b\u043c \u043f\u0440\u0430\u0432\u0438\u043b\u0430\u043c \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u0438\u044f.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440<\/span>:<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (\/ 100 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 50<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">\/ 100 2.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 50.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (\/ 100 20 2.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2.500000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (\/ 100 20.0 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2.500000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (\/ 100 20 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (\/ 135 360)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 <\/span>0<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (\/ 135 360.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.375000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260875\"><\/a>(=<br \/>\n&lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0440\u0430\u0432\u043d\u0435\u043d\u0438\u044f &#171;\u0440\u0430\u0432\u043d\u043e&#187;. \u0415\u0441\u043b\u0438 \u0432\u0441\u0435 &lt;\u0430\u0442\u043e\u043c\u044b&gt; \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u044b &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422, \u0435\u0441\u043b\u0438 \u0445\u043e\u0442\u044f \u0431\u044b \u043e\u0434\u0438\u043d \u043d\u0435 \u0440\u0430\u0432\u043d\u043e &#8212; nil. \u0412 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u043c\u043e\u0433\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u043a\u0430\u043a \u0447\u0438\u0441\u043b\u0430, \u0442\u0430\u043a \u0438 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u044b\u0435 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u044b.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">= 4 4.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">= 20 388)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">= 2.4 2.4 2.4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">= 499 499 500)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">= &#171;\u044f&#187; &#171;\u044f&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">= &#171;\u044f&#187; &#171;\u0442\u044b&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260876\"><\/a>(\/=<br \/>\n&lt;\u0430\u0442\u043e\u043c1&gt; &lt;\u0430\u0442\u043e\u043c2&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0440\u0430\u0432\u043d\u0435\u043d\u0438\u044f &#171;\u043d\u0435 \u0440\u0430\u0432\u043d\u043e&#187;. \u0415\u0441\u043b\u0438 &lt;\u0430\u0442\u043e\u043c1&gt; \u043d\u0435 \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u0435\u043d &lt;\u0430\u0442\u043e\u043c\u04432&gt; &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422, \u0435\u0441\u043b\u0438 \u043e\u043d\u0438 \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u044b &#8212; nil. \u0424\u0443\u043d\u043a\u0446\u0438\u044f \u043d\u0435\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0430 \u0434\u043b\u044f \u0447\u0438\u0441\u043b\u0430 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u0431\u043e\u043b\u0435\u0435 \u0434\u0432\u0443\u0445.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">\/= 10 20) <\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">\/= &#171;\u0442\u044b&#187; \u0442\u044b&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">\/= 5.43 5.44)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172635\"><\/a><a name=\"_Ref465173389\"><\/a><a name=\"_Toc465260877\"><\/a><span style=\"font-family: Arial\">(&lt;<br \/>\n&lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0440\u0430\u0432\u043d\u0435\u043d\u0438\u044f &#171;\u043c\u0435\u043d\u044c\u0448\u0435, \u0447\u0435\u043c&#187;. \u0415\u0441\u043b\u0438 \u043f\u0435\u0440\u0432\u044b\u0439 &lt;\u0430\u0442\u043e\u043c&gt; \u043c\u0435\u043d\u044c\u0448\u0435, \u0447\u0435\u043c \u0432\u0442\u043e\u0440\u043e\u0439 &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422, \u0435\u0441\u043b\u0438 \u043d\u0435\u0442 &#8212; nil. \u0415\u0441\u043b\u0438 \u0434\u0430\u043d\u043e \u0431\u043e\u043b\u0435\u0435 2-\u0445 &lt;\u0430\u0442\u043e\u043c\u043e\u0432&gt;, \u0442\u043e, \u0435\u0441\u043b\u0438 \u043a\u0430\u0436\u0434\u044b\u0439 \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u0439 \u0430\u0442\u043e\u043c \u043c\u0435\u043d\u044c\u0448\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0433\u043e, &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt; 10 20)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt; &#171;b&#187; &#171;c&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt; 357 33.2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt; 2 3 88)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt; 2 3 4 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260878\"><\/a>(&lt;=<br \/>\n&lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0440\u0430\u0432\u043d\u0435\u043d\u0438\u044f &#171;\u043c\u0435\u043d\u044c\u0448\u0435 \u0438\u043b\u0438 \u0440\u0430\u0432\u043d\u043e&#187;. \u0415\u0441\u043b\u0438 \u043f\u0435\u0440\u0432\u044b\u0439 &lt;\u0430\u0442\u043e\u043c&gt; \u043c\u0435\u043d\u044c\u0448\u0435 \u0438\u043b\u0438 \u0440\u0430\u0432\u0435\u043d \u0432\u0442\u043e\u0440\u043e\u043c\u0443 &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422, \u0435\u0441\u043b\u0438 \u043d\u0435\u0442 &#8212; nil. \u0415\u0441\u043b\u0438 \u0434\u0430\u043d\u043e \u0431\u043e\u043b\u0435\u0435 2-\u0445 &lt;\u0430\u0442\u043e\u043c\u043e\u0432&gt;, \u0442\u043e, \u0435\u0441\u043b\u0438 \u043a\u0430\u0436\u0434\u044b\u0439 \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u0439 \u0430\u0442\u043e\u043c \u043c\u0435\u043d\u044c\u0448\u0435 \u0438\u043b\u0438 \u0440\u0430\u0432\u0435\u043d \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c\u0443, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&lt;= 10 20)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt;= &#171;b&#187; &#171;b&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt;= 357 33.2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt;= 2 9 9)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 <\/span> T<\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">&lt;= 2 9 4 5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260879\"><\/a>(&gt;<br \/>\n&lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0440\u0430\u0432\u043d\u0435\u043d\u0438\u044f &#171;\u0431\u043e\u043b\u044c\u0448\u0435&#187;. \u0415\u0441\u043b\u0438 \u043f\u0435\u0440\u0432\u044b\u0439 &lt;\u0430\u0442\u043e\u043c&gt; \u0431\u043e\u043b\u044c\u0448\u0435, \u0447\u0435\u043c \u0432\u0442\u043e\u0440\u043e\u0439 &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422, \u0435\u0441\u043b\u0438 \u043d\u0435\u0442 &#8212; nil. \u0415\u0441\u043b\u0438 \u0434\u0430\u043d\u043e \u0431\u043e\u043b\u0435\u0435 2-\u0445 &lt;\u0430\u0442\u043e\u043c\u043e\u0432&gt;, \u0442\u043e, \u0435\u0441\u043b\u0438 \u043a\u0430\u0436\u0434\u044b\u0439 \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u0439 \u0430\u0442\u043e\u043c \u0431\u043e\u043b\u044c\u0448\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0433\u043e, &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt; 120 17)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt; &#171;c&#187; &#171;b&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt; 3.5 1792)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt; 77 4 2) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt; 77 4 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260880\"><\/a>(&gt;=<br \/>\n&lt;\u0430\u0442\u043e\u043c&gt; &lt;\u0430\u0442\u043e\u043c&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0440\u0430\u0432\u043d\u0435\u043d\u0438\u044f &#171;\u0431\u043e\u043b\u044c\u0448\u0435 \u0438\u043b\u0438 \u0440\u0430\u0432\u043d\u043e&#187;, \u0415\u0441\u043b\u0438 \u043f\u0435\u0440\u0432\u044b\u0439 &lt;\u0430\u0442\u043e\u043c&gt; \u0431\u043e\u043b\u044c\u0448\u0435 \u0438\u043b\u0438 \u0440\u0430\u0432\u0435\u043d \u0432\u0442\u043e\u0440\u043e\u043c\u0443 &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422, \u0435\u0441\u043b\u0438 \u043d\u0435\u0442 &#8212; nil. \u0415\u0441\u043b\u0438 \u0434\u0430\u043d\u043e \u0431\u043e\u043b\u0435\u0435 2-\u0445 &lt;\u0430\u0442\u043e\u043c\u043e\u0432&gt;, \u0442\u043e, \u0435\u0441\u043b\u0438 \u043a\u0430\u0436\u0434\u044b\u0439 \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u0439 \u0430\u0442\u043e\u043c \u0431\u043e\u043b\u044c\u0448\u0435 \u0438\u043b\u0438 \u0440\u0430\u0432\u0435\u043d \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c\u0443, &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0422.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt;= 120 17)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt;= &#171;c&#187; &#171;c&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt;= 3.5 1792) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt;= 77 4 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(&gt;= 77 4 9)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260881\"><\/a>(~<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043b\u043e\u0433\u0438\u0447\u0435\u0441\u043a\u043e\u0435 \u041d\u0415\u0422 (\u0434\u043e\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u0435 \u0434\u043e \u0435\u0434\u0438\u043d\u0438\u0446\u044b). &lt;\u0427\u0438\u0441\u043b\u043e&gt;<\/p>\n<p align=\"JUSTIFY\">\u0434\u043e\u043b\u0436\u043d\u043e \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u044b\u043c. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(~ 3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -4<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">~ 100)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -100<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(~ -4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260882\"><\/a>(1+<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &#8212; &lt;\u0447\u0438\u0441\u043b\u043e&gt;, \u0443\u0432\u0435\u043b\u0438\u0447\u0435\u043d\u043d\u043e\u0435 \u043d\u0430 \u0435\u0434\u0438\u043d\u0438\u0446\u0443. &lt;\u0427\u0438\u0441\u043b\u043e&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u044b\u043c \u0438\u043b\u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(1+ 5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 6<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(1+ -17.5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -16.500000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260883\"><\/a>(1-<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &#8212; &lt;\u0447\u0438\u0441\u043b\u043e&gt;, \u0443\u043c\u0435\u043d\u044c\u0448\u0435\u043d\u043d\u043e\u0435 \u043d\u0430 \u0435\u0434\u0438\u043d\u0438\u0446\u0443. &lt;\u0427\u0438\u0441\u043b\u043e&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u044b\u043c \u0438\u043b\u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">1- 5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 4<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(1- -17.5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -18.500000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260884\"><\/a><br \/>\n(abs &lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0430\u0431\u0441\u043e\u043b\u044e\u0442\u043d\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 &lt;\u0447\u0438\u0441\u043b\u0430&gt;. &lt;\u0427\u0438\u0441\u043b\u043e&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u044b\u043c \u0438\u043b\u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">abs 100)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 100<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">abs -100)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 100<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">abs -99.25)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 99.250000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260885\"><\/a><br \/>\n(and &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u043b\u043e\u0433\u0438\u0447\u0435\u0441\u043a\u043e\u0433\u043e \u0418 \u043d\u0430\u0434 \u0441\u043f\u0438\u0441\u043a\u043e\u043c \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439. \u0412\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0442\u044c\u0441\u044f \u0431\u0443\u0434\u0435\u0442 nil, \u0435\u0441\u043b\u0438 \u043b\u044e\u0431\u043e\u0435 \u0438\u0437 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439 \u0438\u043c\u0435\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 nil, \u0438\u043d\u0430\u0447\u0435 \u0422.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 103)<\/p>\n<p align=\"JUSTIFY\">(setq b nil)<\/p>\n<p align=\"JUSTIFY\">(setq c &#171;string&#187;)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(and 1.4 a c)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(and 1.4 a b c)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260886\"><\/a>(angle<br \/>\n&lt;\u0442\u043e\u04471&gt; &lt;\u0442\u043e\u04472&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0443\u0433\u043e\u043b (\u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445) \u043c\u0435\u0436\u0434\u0443 2-\u043c\u044f \u043b\u0443\u0447\u0430\u043c\u0438, \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u043d\u044b\u043c\u0438 \u0438\u0437 2-\u0445 \u043c\u0435\u0440\u043d\u043e\u0439 &lt;\u0442\u043e\u04471&gt;. \u041f\u0435\u0440\u0432\u044b\u0439 &#8212; \u0432\u0434\u043e\u043b\u044c \u043e\u0441\u0438 \u0425 \u0432 \u0441\u0442\u043e\u0440\u043e\u043d\u0443 \u043f\u043e\u043b\u043e\u0436\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0433\u043e \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u044f, \u0432\u0442\u043e\u0440\u043e\u0439 &#8212; \u0432 \u0441\u0442\u043e\u0440\u043e\u043d\u0443 2-\u0445 \u043c\u0435\u0440\u043d\u043e\u0439 &lt;\u0442\u043e\u04472&gt;, \u0433\u0434\u0435 2-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430 &#8212; \u0441\u043f\u0438\u0441\u043e\u043a 2-\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">angle &#8216;(1.0 1.0) &#8216;(1.0 4.0))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 1.570796<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">angle &#8216;(5.0 1.33) &#8216;(2.4 1.33)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3.141593<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172645\"><\/a><a name=\"_Ref465173406\"><\/a><a name=\"_Toc465260887\"><\/a><span style=\"font-family: Arial\">(angtos<br \/>\n&lt;<\/span><span style=\"font-family: Arial\">\u0443\u0433\u043e\u043b&gt; [&lt;\u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u0435&gt; [&lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c&gt;]])<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0431\u0435\u0440\u0435\u0442 &lt;\u0443\u0433\u043e\u043b&gt; (\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e, \u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445) \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0435\u0433\u043e \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u043d\u044b\u043c \u0432 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0443\u044e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443. \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u0435&gt;<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"437\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"24%\">\n<p align=\"CENTER\">ANGTOS<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"76%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0424\u043e\u0440\u043c\u0430\u0442 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u044f<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"24%\">\n<p align=\"CENTER\">0<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"76%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0413\u0440\u0430\u0434\u0443\u0441\u044b<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"24%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"76%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0413\u0440\u0430\u0434\u0443\u0441\u044b\/\u043c\u0438\u043d\u0443\u0442\u044b\/\u0441\u0435\u043a\u0443\u043d\u0434\u044b<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"24%\">\n<p align=\"CENTER\">2<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"76%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0413\u0440\u0430\u0434\u044b<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"24%\">\n<p align=\"CENTER\">3<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"76%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0420\u0430\u0434\u0438\u0430\u043d\u044b<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"24%\">\n<p align=\"CENTER\">4<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"76%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0413\u0435\u043e\u0434\u0435\u0437\u0438\u0447\u0435\u0441\u043a\u043e\u0435 \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u0435<\/p>\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c&gt; &#8212; \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e, \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442 \u043a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u043e \u0446\u0438\u0444\u0440 \u043f\u043e\u0441\u043b\u0435 \u0437\u0430\u043f\u044f\u0442\u043e\u0439. \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b &lt;\u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u0435&gt; \u0438 &lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c&gt; \u043e\u0431\u0440\u0430\u0449\u0430\u044e\u0442\u0441\u044f \u043a \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u043c AutoCAD\u0430 AUNITS \u0438 AUPREC. \u0415\u0441\u043b\u0438 \u043f\u0440\u043e\u0438\u0433\u043d\u043e\u0440\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u044d\u0442\u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b, \u0442\u043e \u0431\u0443\u0434\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u044b \u0442\u0435\u043a\u0443\u0449\u0438\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f AUNITS \u0438 AUPREC.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq pt1 &#8216;(5.0 1.33))<\/p>\n<p align=\"JUSTIFY\">(setq pt2 &#8216;(2.4 1.33))<\/p>\n<p align=\"JUSTIFY\">(setq a (angle pt1 pt2))<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(angtos a 0 0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;180&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(angtos a 0 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;180.0000&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(angtos a 1 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;180d0&#8217;0&#8243;&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(angtos a 3 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;3.1416r&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(angtos a 4 2) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;W&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260888\"><\/a>(append<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0431\u0435\u0440\u0435\u0442 \u043b\u044e\u0431\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0441\u043f\u0438\u0441\u043a\u043e\u0432 (&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439&gt;) \u0438 \u0441\u043b\u0438\u0432\u0430\u0435\u0442 \u0438\u0445 \u0432\u043c\u0435\u0441\u0442\u0435 \u043a\u0430\u043a \u043e\u0434\u0438\u043d \u0441\u043f\u0438\u0441\u043e\u043a.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(append &#8216;(a b) &#8216;(c d))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B C D)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(append &#8216;((a) (b)) &#8216;((c) (d)))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 ((A) (B) (C) (D))<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">APPEND \u0442\u0440\u0435\u0431\u0443\u0435\u0442, \u0447\u0442\u043e\u0431\u044b \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u0431\u044b\u043b\u0438 \u0441\u043f\u0438\u0441\u043a\u0430\u043c\u0438.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260889\"><\/a>(apply<br \/>\n&lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442\u0441\u044f &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt; \u0441 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430\u043c\u0438, \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u043c\u0438 &lt;\u0441\u043f\u0438\u0441\u043a\u043e\u043c&gt;.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(apply &#8216;+ &#8216;(1 2 3))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 6<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(apply &#8216;strcat &#8216;(&#171;a&#187; &#171;b&#187; &#171;c&#187;))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;abc<\/span>&#171;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">APPLY \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 \u043a\u0430\u043a \u0441\u043e \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u044b\u043c\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438 (\u0441\u0443\u0431\u0440), \u0442\u0430\u043a \u0438 \u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u044b\u043c\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c (\u043e\u043d\u0438 \u0441\u043e\u0437\u0434\u0430\u044e\u0442\u0441\u044f \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u0439 DEFUN \u0438\u043b\u0438 LAMBDA).<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260890\"><\/a>(ascii<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u0430 &lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430&gt; \u0432 \u0435\u0433\u043e ASCII-\u0441\u0438\u043c\u0432\u043e\u043b\u044c\u043d\u044b\u0439 \u043a\u043e\u0434 (\u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e). \u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u043e\u0434\u043e\u0431\u043d\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 ASC \u0432 \u0411\u0435\u0439\u0441\u0438\u043a\u0435<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ascii &#171;A&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 65<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ascii &#171;a&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 97<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ascii &#171;BIG&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 66<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260891\"><\/a>(assoc<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0441\u043f\u0438\u0441\u043a\u0430&gt; &lt;\u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u0435\u0442 &lt;\u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a&gt; \u043f\u043e \u043a\u043b\u044e\u0447\u0443 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0441\u043f\u0438\u0441\u043a\u0430&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0442\u043e\u0447\u043a\u0443 \u0432\u0445\u043e\u0434\u0430 &lt;\u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440. \u0441\u043f\u0438\u0441\u043a\u0430&gt;. \u0415\u0441\u043b\u0438 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0441\u043f\u0438\u0441\u043a\u0430&gt; \u043d\u0435 \u043d\u0430\u0439\u0434\u0435\u043d, ASSOC \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440 \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c, \u0447\u0442\u043e &#171;al&#187; \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d \u043a\u0430\u043a:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">((name box) (width 3) (size 4.7263) (depth 5))<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(assoc &#8216;size al)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (SIZE 4.7363)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(assoc &#8216;weight al)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0435 \u0441\u043f\u0438\u0441\u043a\u0438 \u0447\u0430\u0441\u0442\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044e\u0442\u0441\u044f \u0434\u043b\u044f \u0445\u0440\u0430\u043d\u0435\u043d\u0438\u044f \u0434\u0430\u043d\u043d\u044b\u0445, \u043a \u043a\u043e\u0442\u043e\u0440\u044b\u043c \u043c\u043e\u0436\u043d\u043e \u0438\u043c\u0435\u0442\u044c \u0434\u043e\u0441\u0442\u0443\u043f \u043f\u043e \u043a\u043b\u044e\u0447\u0443. \u042d\u0442\u043e \u043f\u043e\u0445\u043e\u0436\u0435 \u043d\u0430 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u044b \u0438 \u043c\u0430\u0441\u0441\u0438\u0432\u044b \u0432 \u0434\u0440\u0443\u0433\u0438\u0445 \u044f\u0437\u044b\u043a\u0430\u0445 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f. \u0424\u0443\u043d\u043a\u0446\u0438\u044f SUBST, \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u0430\u044f \u043d\u0438\u0436\u0435 \u0432 \u044d\u0442\u043e\u0439 \u0433\u043b\u0430\u0432\u0435, \u043e\u0431\u0435\u0441\u043f\u0435\u0447\u0438\u0432\u0430\u0435\u0442 \u0443\u0434\u043e\u0431\u043d\u044b\u0439 \u0441\u043f\u043e\u0441\u043e\u0431 \u0437\u0430\u043c\u0435\u043d\u044b \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u044b, \u043d\u0430\u0439\u0434\u0435\u043d\u043d\u043e\u0439 \u043f\u043e \u043a\u043b\u044e\u0447\u0443 \u0432 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u043e\u043c \u0441\u043f\u0438\u0441\u043a\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260892\"><\/a>(atan<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e1&gt; [&lt;\u0447\u0438\u0441\u043b\u043e2&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 &lt;\u0447\u0438\u0441\u043b\u043e2&gt; \u043d\u0435 \u0437\u0430\u0434\u0430\u043d\u043e, ATAN \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442 \u0430\u0440\u043a\u0442\u0430\u043d\u0433\u0435\u043d\u0441 &lt;\u0447\u0438\u0441\u043b\u04301&gt;, \u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445. &lt;\u0427\u0438\u0441\u043b\u043e1&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043e\u0442\u0440\u0438\u0446\u0430\u0442\u0435\u043b\u044c\u043d\u044b\u043c; \u043e\u0431\u043b\u0430\u0441\u0442\u044c \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c\u044b\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 \u043e\u0442 -pi \u0434\u043e +pi \u0440\u0430\u0434\u0438\u0430\u043d.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atan 0.5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.463647<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atan 1.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.785398<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atan -1.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -0.785398<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(angtos (atan -1.0) 0 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;-45.0000&#187;<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0437\u0430\u0434\u0430\u043d\u044b \u043e\u0431\u0430 \u0447\u0438\u0441\u043b\u0430, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0430\u0440\u043a\u0442\u0430\u043d\u0433\u0435\u043d\u0441 (&lt;\u0447\u0438\u0441\u043b\u043e1&gt;\/&lt;\u0447\u0438\u0441\u043b\u043e2&gt;) \u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445. \u0415\u0441\u043b\u0438 &lt;\u0447\u0438\u0441\u043b\u043e2&gt; &#8212; \u043d\u043e\u043b\u044c, \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0437\u043d\u0430\u043a\u0430 &lt;\u0447\u0438\u0441\u043b\u04301&gt;, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f + \u0438\u043b\u0438 -1.570796 \u0440\u0430\u0434\u0438\u0430\u043d (90 \u0438\u043b\u0438 -90 \u0433\u0440\u0430\u0434\u0443\u0441\u043e\u0432).<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260893\"><\/a>(atof<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435 &lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u043e\u0439 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u044b&gt; \u0432 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">atof &#171;97.1&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 97.100000<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">atof &#171;3&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3.000000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260894\"><\/a>(atoi<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430&gt; )<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435 &lt;\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u043e\u0439 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u044b&gt; \u0432 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atoi &#171;97&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 9<\/span>7<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atoi &#171;3&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atoi &#171;3.9&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260895\"><\/a>(atom<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; &#8212; \u0441\u043f\u0438\u0441\u043e\u043a &#8212; \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f nil, \u0438\u043d\u0430\u0447\u0435 \u0422. \u041b\u044e\u0431\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0441\u043f\u0438\u0441\u043a\u043e\u043c, \u0441\u0447\u0438\u0442\u0430\u0435\u0442\u0441\u044f \u043a\u0430\u043a \u043d\u0435\u0434\u0435\u043b\u0438\u043c\u044b\u0439 (\u0430\u0442\u043e\u043c).<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a &#8216;(x y z))<\/p>\n<p align=\"JUSTIFY\">(setq b &#8216;a)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atom &#8216;a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atom a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atom &#8216;b)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atom b)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(atom &#8216;(a b c))<\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u0435\u0440\u0441\u0438\u0438 LISP\u0430 \u0440\u0430\u0437\u043b\u0438\u0447\u0430\u044e\u0442\u0441\u044f \u0432 \u0441\u0432\u043e\u0435\u0439 \u0438\u043d\u0442\u0435\u0440\u043f\u0440\u0435\u0442\u0430\u0446\u0438\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0410\u0422\u041e\u041c, \u0442\u0430\u043a \u0447\u0442\u043e \u0431\u0443\u0434\u044c\u0442\u0435 \u0432\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u043d\u044b \u043f\u0440\u0438 \u043f\u0435\u0440\u0435\u0445\u043e\u0434\u0435 \u0438\u0437 \u043e\u0434\u043d\u043e\u0439 \u0432\u0435\u0440\u0441\u0438\u0438 \u0432 \u0434\u0440\u0443\u0433\u0443\u044e.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260896\"><\/a><br \/>\n(Boole &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt; &lt;\u0446\u0435\u043b\u043e\u04351&gt; &lt;\u0446\u0435\u043b\u043e\u04352&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u043e \u043e\u0441\u043d\u043e\u0432\u043d\u0430\u044f \u0431\u0438\u0442\u043e\u0432\u0430\u044f \u0411\u0443\u043b\u0435\u0432\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f. &lt;\u0424\u0443\u043d\u043a\u0446\u0438\u044f&gt; &#8212; \u044d\u0442\u043e \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u043c\u0435\u0436\u0434\u0443 0 \u0438 15, \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0449\u0435\u0435 \u043e\u0434\u043d\u0443 \u0438\u0437 16 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u044b\u0445 \u0411\u0443\u043b\u0435\u0432\u044b\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0434\u0432\u0443\u0445 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0445. \u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u043e\u0431\u0438\u0442\u043e\u0432\u043e (\u043b\u043e\u0433\u0438\u0447\u0435\u0441\u043a\u0438) \u043a\u043e\u043c\u0431\u0438\u043d\u0438\u0440\u0443\u0435\u0442 \u0446\u0435\u043b\u043e\u0447\u0438\u0441\u043b\u0435\u043d\u043d\u044b\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u0432 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0438\u0438 \u0441 \u0442\u0430\u0431\u043b\u0438\u0446\u0435\u0439 \u0438\u0441\u0442\u0438\u043d\u043d\u043e\u0441\u0442\u0438, \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u043d\u043e\u0439 \u043d\u0438\u0436\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"318\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"33%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0426\u0435\u043b\u043e\u0435 1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"30%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0426\u0435\u043b\u043e\u0435 2<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"37%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u043e\u0434 \u0444\u0443\u043d\u043a\u0446\u0438\u0438<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"33%\">\n<p align=\"CENTER\">0<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"30%\">\n<p align=\"CENTER\">0<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"37%\">\n<p align=\"CENTER\">8<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"33%\">\n<p align=\"CENTER\">0<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"30%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"37%\">\n<p align=\"CENTER\">4<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"33%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"30%\">\n<p align=\"CENTER\">0<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"37%\">\n<p align=\"CENTER\">2<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"33%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"30%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"37%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u0430\u0436\u0434\u044b\u0439 \u0431\u0438\u0442 &lt;\u0446\u0435\u043b\u043e\u0433\u043e1&gt; \u0431\u0435\u0440\u0435\u0442\u0441\u044f \u0441\u043e\u0432\u043c\u0435\u0441\u0442\u043d\u043e \u0441 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u043c \u0431\u0438\u0442\u043e\u043c &lt;\u0446\u0435\u043b\u043e\u0433\u043e2&gt;, \u0438 \u043f\u043e\u043c\u0435\u0449\u0430\u0435\u0442\u0441\u044f \u0432 \u043e\u0434\u043d\u0443 \u0438\u0437 \u0441\u0442\u0440\u043e\u043a \u0442\u0430\u0431\u043b\u0438\u0446\u044b \u0438\u0441\u0442\u0438\u043d\u043d\u043e\u0441\u0442\u0438. \u0412 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u043a\u043e\u0434\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u0441\u0442\u043e\u044f\u0449\u0435\u0433\u043e \u0432 \u044d\u0442\u043e\u0439 \u0441\u0442\u0440\u043e\u043a\u0435, \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0438\u0440\u0443\u044e\u0449\u0438\u0439 \u0431\u0438\u0442 \u0431\u0443\u0434\u0435\u0442 \u043b\u0438\u0431\u043e 0 \u043b\u0438\u0431\u043e 1. \u0415\u0441\u043b\u0438 \u0432 &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u0438&gt; \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d \u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0438\u0439 \u0431\u0438\u0442, \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0438\u0440\u0443\u044e\u0449\u0438\u0439 \u0431\u0438\u0442 &#8212; 1, \u0438\u043d\u0430\u0447\u0435 &#8212; 0.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u0438&gt; \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u044b \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u044b\u043c \u0411\u0443\u043b\u0435\u0432\u044b\u043c \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u044f\u043c \u0418, \u0418\u041b\u0418, \u0438\u0441\u043a\u043b\u044e\u0447\u0430\u044e\u0449\u0435\u043c\u0443 \u0418\u041b\u0418, H\u0415:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"626\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"21%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"23%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041e\u043f\u0435\u0440\u0430\u0446\u0438\u044f<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"57%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0438\u0440\u0443\u044e\u0449\u0438\u0439 \u0431\u0438\u0442 1, \u0435\u0441\u043b\u0438\u2026<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"21%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"23%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0418<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"57%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041e\u0431\u0430 \u0431\u0438\u0442\u0430 \u0440\u0430\u0432\u043d\u044b 1<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"21%\">\n<p align=\"CENTER\">6<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"23%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0418\u0441\u043a\u043b. \u0418\u041b\u0418<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"57%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0422\u043e\u043b\u044c\u043a\u043e \u043e\u0434\u0438\u043d \u0438\u0437 \u0434\u0432\u0443\u0445 \u0431\u0438\u0442\u043e\u0432 \u0440\u0430\u0432\u0435\u043d 1<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"21%\">\n<p align=\"CENTER\">7<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"23%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0418\u041b\u0418<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"57%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u0430\u0436\u0434\u044b\u0439 \u0438\u043b\u0438 \u043e\u0431\u0430 \u0431\u0438\u0442\u0430 \u0440\u0430\u0432\u043d\u044b 1<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"21%\">\n<p align=\"CENTER\">8<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"23%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u041d\u0415<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"57%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041e\u0431\u0430 \u0431\u0438\u0442\u0430 \u0440\u0430\u0432\u043d\u044b 0(\u0434\u043e\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u0435 \u0434\u043e 1)<\/p>\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(Boole 1 12 5)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0437\u0430\u0434\u0430\u0435\u0442 \u043b\u043e\u0433\u0438\u0447\u0435\u0441\u043a\u043e\u0435 \u0418 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 12 \u0438 5. \u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 4. \u041f\u043e\u0434\u043e\u0431\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(Boole 6 6 5)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0437\u0430\u0434\u0430\u0435\u0442 \u043b\u043e\u0433\u0438\u0447\u0435\u0441\u043a\u043e\u0435 \u0438\u0441\u043a\u043b\u044e\u0447\u0430\u044e\u0449\u0435\u0435 \u0418\u041b\u0418 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 6 \u0438 5, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u044f 3.<\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0434\u0440\u0443\u0433\u0438\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u0438&gt; \u0434\u043b\u044f \u0437\u0430\u0434\u0430\u043d\u0438\u044f \u0434\u0440\u0443\u0433\u0438\u0445 \u0411\u0443\u043b\u0435\u0432\u044b\u0445 \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0439, \u043d\u0435 \u0438\u043c\u0435\u044e\u0449\u0438\u0445 \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u044b\u0445 \u0438\u043c\u0435\u043d. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0435\u0441\u043b\u0438 &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt; \u0437\u0430\u0434\u0430\u043d\u0430 \u0447\u0438\u0441\u043b\u043e\u043c 4, \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0438\u0440\u0443\u044e\u0449\u0438\u0439 \u0431\u0438\u0442 \u0437\u0430\u0434\u0430\u0435\u0442\u0441\u044f, \u0435\u0441\u043b\u0438 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u0431\u0438\u0442 \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d \u0432 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0435 &lt;\u0446\u0435\u043b\u043e\u04352&gt;, \u0430 \u043d\u0435 \u0432 &lt;\u0446\u0435\u043b\u043e\u04351&gt;. \u0422\u0430\u043a:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(Boole 4 3 14) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442 12.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260897\"><\/a>(boundp<br \/>\n&lt;\u0430\u0442\u043e\u043c&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#8212; \u0422, \u0435\u0441\u043b\u0438 &lt;\u0430\u0442\u043e\u043c&gt; \u0438\u043c\u0435\u0435\u0442 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 (\u0432 \u0448\u0438\u0440\u043e\u043a\u043e\u043c \u0441\u043c\u044b\u0441\u043b\u0435). \u0415\u0441\u043b\u0438 &lt;\u0430\u0442\u043e\u043c&gt; \u043d\u0435 \u0438\u043c\u0435\u0435\u0442 \u043d\u0438\u043a\u0430\u043a\u043e\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f, \u0438\u043b\u0438 \u0440\u0430\u0432\u0435\u043d nil, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 2)<\/p>\n<p align=\"JUSTIFY\">(setq b nil)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(boundp &#8216;a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(boundp &#8216;b)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260898\"><\/a>caar,<br \/>\ncadr, cddr, cadar, \u0438 \u0442.\u0434.<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">AutoLISP \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 \u0441\u0446\u0435\u043f\u043b\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0439 CAR \u0438 CDR, \u0432\u043f\u043b\u043e\u0442\u044c \u0434\u043e 4 \u0443\u0440\u043e\u0432\u043d\u044f \u0433\u043b\u0443\u0431\u0438\u043d\u044b.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq x &#8216;((a b) c d))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(caar x)<\/span><span style=\"font-family: Times New Roman\"> \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e<\/span><span style=\"font-family: Courier New\">(car (car x))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 A<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cdar x) <\/span><span style=\"font-family: Times New Roman\">\u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e<\/span><span style=\"font-family: Courier New\">(cdr (car x)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (B)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cadar x) <\/span><span style=\"font-family: Times New Roman\">\u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e<\/span><span style=\"font-family: Courier New\">(car (cdr (car x))) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 <\/span>B<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cadr x)<\/span><span style=\"font-family: Times New Roman\"> \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e<\/span><span style=\"font-family: Courier New\">(car (cdr x))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 C<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cddr x)<\/span><span style=\"font-family: Times New Roman\"> \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e<\/span><span style=\"font-family: Courier New\">(cdr (cdr x))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (D)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(caddr x) <\/span><span style=\"font-family: Times New Roman\">\u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e<\/span><span style=\"font-family: Courier New\"> (car (cdr (cdr x))) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 D<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412 AutoLISP\u0435 CADR \u0447\u0430\u0441\u0442\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f &#171;\u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f&#187; \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b Y 2-\u0445 \u043c\u0435\u0440\u043d\u043e\u0439 \u0438 3-\u0445 \u043c\u0435\u0440\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438 (\u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0441\u043f\u0438\u0441\u043a\u0430, \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0435\u0433\u043e \u0438\u0437 2-\u0445 \u0438\u043b\u0438 3-\u0445 \u043d\u0430\u0442\u0443\u0440\u0430\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b). \u0422\u043e\u0447\u043d\u043e \u0442\u0430\u043a \u0436\u0435 CADDR \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f &#171;\u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f&#187; \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b Z 3-\u0445 \u043c\u0435\u0440\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq pt2 &#8216;(5.2 1.0))<\/span> (<i><span style=\"font-family: Times New Roman\">2-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430)<\/span><\/i><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq pt3 &#8216;(5.2 1.0 3.0))<\/span> (<i><span style=\"font-family: Times New Roman\">3-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430)<\/span><\/i><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(car pt2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 5.200000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cadr pt2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 1.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(caddr pt2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(car pt3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 5.200000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cadr pt3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 1.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(caddr pt3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3.000000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260899\"><\/a>(car<br \/>\n&lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 &lt;\u0441\u043f\u0438\u0441\u043a\u0430&gt;. \u0415\u0441\u043b\u0438 \u0441\u043f\u0438\u0441\u043e\u043a \u043f\u0443\u0441\u0442, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(car &#8216;(a b c))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 A<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(car &#8216;((a b) c))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(car &#8216;())<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260900\"><\/a>(cdr<br \/>\n&lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; )<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0432\u0441\u0435 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b &lt;\u0441\u043f\u0438\u0441\u043a\u0430&gt;, \u043a\u0440\u043e\u043c\u0435 \u043f\u0435\u0440\u0432\u043e\u0433\u043e. \u0415\u0441\u043b\u0438 &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; \u043f\u0443\u0441\u0442, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f n<\/span>il.<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cdr &#8216;(a b c))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (B C)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cdr &#8216;((a b) c))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (C)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cdr &#8216;())<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u043e\u0433\u0434\u0430 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u043c &lt;\u0441\u043f\u0438\u0441\u043a\u0430&gt; \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0442\u043e\u0447\u0435\u0447\u043d\u0430\u044f \u043f\u0430\u0440\u0430 (\u0441\u043c\u043e\u0442\u0440\u0438\u0442\u0435 CONS, \u043d\u0438\u0436\u0435), CDR \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442, \u043d\u0435 \u0437\u0430\u043a\u043b\u044e\u0447\u0430\u044f \u0435\u0433\u043e \u0432 \u0441\u043f\u0438\u0441\u043e\u043a.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">cdr &#8216;(a . b))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 <\/span>B<\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">cdr &#8216;(1 . &#171;Text&#187;))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;Text&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260901\"><\/a>(chr<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u0446\u0435\u043b\u043e\u0433\u043e \u0447\u0438\u0441\u043b\u0430 \u0432 \u0441\u0438\u043c\u0432\u043e\u043b\u044c\u043d\u044b\u0439 \u043a\u043e\u0434 ASCII \u0438 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u043e\u043c \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430, (\u043f\u043e\u0434\u043e\u0431\u043d\u044b\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0434\u0435\u0439\u0441\u0442\u0432\u0443\u0435\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u044f CHR$ \u0432 \u044f\u0437\u044b\u043a\u0435 \u0411\u0435\u0439\u0441\u0438\u043a).<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(chr 65)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;A&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(chr 66)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;B&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(chr 97)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;a&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260902\"><\/a>(close<br \/>\n&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u043a\u0440\u044b\u0432\u0430\u0435\u0442 \u0444\u0430\u0439\u043b \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. &lt;\u041e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt; \u0438\u0437\u0432\u043b\u0435\u043a\u0430\u0435\u0442\u0441\u044f \u0438\u0437 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 OPEN. \u041f\u043e\u0441\u043b\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f CLOSE \u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430 \u043e\u0441\u0442\u0430\u0435\u0442\u0441\u044f \u043d\u0435\u0438\u0437\u043c\u0435\u043d\u043d\u044b\u043c, \u043d\u043e \u0434\u0430\u043b\u0435\u0435 \u043d\u0435\u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c\u044b\u043c.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u043f\u0440\u0435\u0434\u043f\u043e\u043b\u043e\u0436\u0438\u043c, \u0447\u0442\u043e \u0425 \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c\u044b\u0439 \u0444\u0430\u0439\u043b\u043e\u0432\u044b\u0439 \u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0433\u043e \u0444\u0430\u0439\u043b\u0430,<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(close x)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0437\u0430\u043a\u0440\u043e\u0435\u0442 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u0444\u0430\u0439\u043b \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442 nil.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260903\"><\/a>(command<br \/>\n&lt;\u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u043a\u043e\u043c\u0430\u043d\u0434\u044b AutoCAD\u0430 \u0432 AutoLISP\u0435 \u0438 \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0442 \u0441\u043e\u0431\u043e\u0439 \u043a\u043e\u043c\u0430\u043d\u0434\u044b AutoCAD\u0430 \u0438 \u0438\u0445 \u043f\u043e\u0434\u043a\u043e\u043c\u0430\u043d\u0434\u044b; \u043a\u0430\u0436\u0434\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442\u0441\u044f \u0438 \u043f\u043e\u0441\u044b\u043b\u0430\u0435\u0442\u0441\u044f \u0432 AutoCAD, \u043a\u0430\u043a \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u0437\u0430\u043f\u0440\u043e\u0441. \u041a\u043e\u043c\u0430\u043d\u0434\u043d\u044b\u0435 \u0438\u043c\u0435\u043d\u0430 \u0438 \u043e\u043f\u0446\u0438\u0438 \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0442\u0441\u044f \u043a\u0430\u043a \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u044b\u0435 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u044b, 2-\u0445 \u043c\u0435\u0440\u043d\u044b\u0435 \u0442\u043e\u0447\u043a\u0438 &#8212; \u043a\u0430\u043a \u0441\u043f\u0438\u0441\u043a\u0438 \u0438\u0437 2-\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b, \u0438 3-\u0445 \u043c\u0435\u0440\u043d\u044b\u0435 \u0442\u043e\u0447\u043a\u0438 &#8212; \u043a\u0430\u043a \u0441\u043f\u0438\u0441\u043a\u0438 \u0438\u0437 3-\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b. \u041a\u043e\u043c\u0430\u043d\u0434\u043d\u044b\u0435 \u0438\u043c\u0435\u043d\u0430 \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u044e\u0442\u0441\u044f AutoCAD\u043e\u043c \u0442\u043e\u043b\u044c\u043a\u043e \u043f\u043e\u0441\u043b\u0435 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0438 &#171;Command:&#187; \/\u043a\u043e\u043c\u0430\u043d\u0434\u0430:\/.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq pt1 &#8216;(1.45 3.23))<\/p>\n<p align=\"JUSTIFY\">(setq pt2 (getpoint &#171;Enter a point: &#171;))<\/p>\n<p align=\"JUSTIFY\">(command &#171;line&#187; pt1 pt2)<\/p>\n<p align=\"JUSTIFY\">(command &#171;&#187;)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u0442\u044c, \u0447\u0442\u043e \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430 &#171;Command:&#187; \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442, \u0442\u043e \u0437\u0430\u043f\u0438\u0441\u0430\u043d\u043d\u044b\u0435 \u0432\u044b\u0448\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u044e\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u0434\u043b\u044f \u0442\u043e\u0447\u043a\u0438 &#171;pt1&#187;, \u0437\u0430\u043f\u0440\u0430\u0448\u0438\u0432\u0430\u044e\u0442 \u0443 \u0412\u0430\u0441 \u0442\u043e\u0447\u043a\u0443 &#171;pt2&#187; \u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u044e\u0442 \u043a\u043e\u043c\u0430\u043d\u0434\u0443 AutoCAD\u0430 LINE \u043f\u043e \u0434\u0432\u0443\u043c \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u043c \u0442\u043e\u0447\u043a\u0430\u043c. \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u0444\u0443\u043d\u043a\u0446\u0438\u0438 COMMAND \u043c\u043e\u0433\u0443\u0442 \u0431\u044b\u0442\u044c \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u044b\u043c\u0438 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430\u043c\u0438, \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u0447\u0438\u0441\u043b\u0430\u043c\u0438, \u0446\u0435\u043b\u044b\u043c\u0438 \u0438\u043b\u0438 \u0442\u043e\u0447\u043a\u0430\u043c\u0438, \u0442\u043e \u0435\u0441\u0442\u044c \u0442\u0430\u043a\u0438\u043c\u0438, \u043a\u0430\u043a\u0438\u0435 \u043e\u0436\u0438\u0434\u0430\u0435\u0442 \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u043e\u0442 \u0412\u0430\u0441 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u043c\u0430\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u0430 \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0435\u0435 \u0437\u0430\u043f\u0440\u043e\u0441\u044b. \u041f\u0443\u0441\u0442\u0430\u044f \u0441\u0442\u0440\u043e\u043a\u0430 (&#171;&#187;) \u0440\u0430\u0432\u043d\u043e\u0441\u0438\u043b\u044c\u043d\u0430 \u043d\u0430\u0436\u0430\u0442\u0438\u044e \u043f\u0440\u043e\u0431\u0435\u043b\u0430 \u043d\u0430 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u0435. \u0412\u044b\u0437\u043e\u0432 COMMAND \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430 \u0440\u0430\u0432\u043d\u043e\u0441\u0438\u043b\u0435\u043d \u043d\u0430\u0436\u0430\u0442\u0438\u044e CTRL C \u043d\u0430 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u0435, \u0438 \u043f\u0440\u0435\u0440\u044b\u0432\u0430\u0435\u0442 \u0431\u043e\u043b\u044c\u0448\u0438\u043d\u0441\u0442\u0432\u043e \u043a\u043e\u043c\u0430\u043d\u0434 AutoCAD\u0430.<\/p>\n<p align=\"JUSTIFY\">\u041a\u043e\u043c\u0430\u043d\u0434\u044b, \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u043c\u044b\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 COMMAND \u043d\u0435 \u0438\u043c\u0435\u044e\u0442 \u044d\u0445\u0430 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435, \u0435\u0441\u043b\u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f AutoCAD\u0430 CMDECHO (\u0434\u043e\u0441\u0442\u0443\u043f\u043d\u0430 \u0438\u0437 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 SETVAR \u0438 GETVAR ) \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u0430 \u0440\u0430\u0432\u043d\u043e\u0439 \u043d\u0443\u043b\u044e. \u0424\u0443\u043d\u043a\u0446\u0438\u044f COMMAND &#8212; \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u0439 \u043c\u0435\u0442\u043e\u0434 \u0434\u043e\u0441\u0442\u0443\u043f\u0430 \u0438\u0437 AutoLISP\u0430 \u043a \u043a\u043e\u043c\u0430\u043d\u0434\u0430\u043c AutoCAD\u0430.<\/p>\n<p align=\"JUSTIFY\">\u0412\u0432\u043e\u0434\u0438\u043c\u044b\u0435 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &#171;GETxxx&#187; (GETANGLE,GETSTRING, GETINT,GETPOINT \u0438 \u0442.\u0434.) \u043d\u0435 \u043c\u043e\u0433\u0443\u0442 \u0431\u044b\u0442\u044c \u0432\u043b\u043e\u0436\u0435\u043d\u043d\u044b\u043c\u0438 \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 COMMAND. \u041f\u043e\u043f\u044b\u0442\u043a\u0430 \u0441\u0434\u0435\u043b\u0430\u0442\u044c \u044d\u0442\u043e \u0432\u044b\u0437\u043e\u0432\u0435\u0442 \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435 &#171;error: AutoCAD rejected function&#187; (\u043e\u0448\u0438\u0431\u043a\u0430: \u043d\u0435\u0432\u0435\u0440\u043d\u0430\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u0430 AutoCAD\u0430) \u0438 \u0432\u044b\u0437\u043e\u0432\u0435\u0442 \u0430\u0432\u0430\u0440\u0438\u0439\u043d\u044b\u0439 \u043e\u0441\u0442\u0430\u043d\u043e\u0432 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u041f\u0440\u0438 \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u043e\u0441\u0442\u0438, \u0437\u0430\u0434\u0430\u0432\u0430\u0439\u0442\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GETxxx \u0437\u0430\u0440\u0430\u043d\u0435\u0435 \u0438\u043b\u0438 \u043f\u043e\u043c\u0435\u0449\u0430\u0439\u0442\u0435 \u0438\u0445 \u043c\u0435\u0436\u0434\u0443 \u0441\u043c\u0435\u0436\u043d\u044b\u043c\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438 COMMAND.<\/p>\n<p align=\"JUSTIFY\">\u041a\u043e\u043c\u0430\u043d\u0434\u044b AutoCAD\u0430 DTEXT \u0438 SKETCH \u0441\u0447\u0438\u0442\u044b\u0432\u0430\u044e\u0442 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u044e \u043d\u0435\u043f\u043e\u0441\u0440\u0435\u0434\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u0441 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b \u0438 \u0434\u0438\u0433\u0438\u0442\u0430\u0439\u0437\u0435\u0440\u0430 \u0438 \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u043d\u0435 \u043c\u043e\u0433\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 AutoLISP COMMAND. \u0422\u0430\u043a\u0436\u0435 \u043d\u0435\u043b\u044c\u0437\u044f \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e COMMAND \u0434\u043b\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u043a\u043e\u043c\u0430\u043d\u0434 PLOT, PRPLOT \u0438\u043b\u0438 SCRIPT.<\/p>\n<p>&nbsp;<\/p>\n<p><b><i><span style=\"font-family: Arial\">\u00a0<\/span><\/i><\/b><\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260904\"><\/a>\u041f\u0440\u0435\u0440\u044b\u0432\u0430\u043d\u0438\u0435 \u0434\u043b\u044f \u0432\u0432\u043e\u0434\u0430 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0415\u0441\u043b\u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442\u0441\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u0430 AutoCAD\u0430 \u0438 \u0432 \u0441\u0442\u0440\u043e\u043a\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u0432\u0441\u0442\u0440\u0435\u0447\u0430\u0435\u0442\u0441\u044f \u0441\u0438\u043c\u0432\u043e\u043b PAUSE, \u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f COMMAND \u043f\u0440\u0438\u043e\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442 \u0441\u0432\u043e\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0435, \u0447\u0442\u043e\u0431\u044b \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u043d\u0435\u043f\u043e\u0441\u0440\u0435\u0434\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u0432\u0432\u0435\u043b \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 (\u0438\u043b\u0438 \u043f\u0440\u043e\u0438\u0437\u0432\u0435\u043b \u043e\u0442\u0441\u043b\u0435\u0436\u0438\u0432\u0430\u043d\u0438\u0435 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u0447\u0435\u0440\u0442\u0435\u0436\u0430). \u042d\u0442\u043e \u043f\u043e\u0445\u043e\u0436\u0435 \u043d\u0430 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c \u043f\u0430\u0443\u0437\u044b (\u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e backslash<\/span> <span style=\"font-family: Times New Roman\">&#171;\\&#187;), \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u0434\u043b\u044f \u043c\u0435\u043d\u044e.<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0432\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0435 &#171;\u043f\u0440\u043e\u0437\u0440\u0430\u0447\u043d\u0443\u044e&#187; \u043a\u043e\u043c\u0430\u043d\u0434\u0443 \u0432 \u043c\u043e\u043c\u0435\u043d\u0442 \u043f\u0440\u0438\u043e\u0441\u0442\u0430\u043d\u043e\u0432\u043a\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 COMMAND, \u0444\u0443\u043d\u043a\u0446\u0438\u044f COMMAND \u043e\u0441\u0442\u0430\u0435\u0442\u0441\u044f \u0432 \u0441\u043e\u0441\u0442\u043e\u044f\u043d\u0438\u0438 \u043f\u0430\u0443\u0437\u044b \u0434\u043e \u0437\u0430\u0432\u0435\u0440\u0448\u0435\u043d\u0438\u044f &#171;\u043f\u0440\u043e\u0437\u0440\u0430\u0447\u043d\u043e\u0439&#187; \u043a\u043e\u043c\u0430\u043d\u0434\u044b, \u043f\u043e\u0441\u043b\u0435 \u0447\u0435\u0433\u043e \u0432\u0435\u0440\u043d\u0435\u0442\u0441\u044f \u043a \u043d\u043e\u0440\u043c\u0430\u043b\u044c\u043d\u043e\u043c\u0443 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044e. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0432 \u043f\u0435\u0440\u0438\u043e\u0434 \u043f\u0430\u0443\u0437\u044b \u0444\u0443\u043d\u043a\u0446\u0438\u0438 COMMAND \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u043a\u043e\u043c\u0430\u043d\u0434\u044b &#8216;ZOOM&#8217; \u0438 &#8216;PAN&#8217; \u0438\u043b\u0438 \u043b\u044e\u0431\u044b\u0435 \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u044b\u0435 \u0412\u0430\u043c &#171;\u043f\u0440\u043e\u0437\u0440\u0430\u0447\u043d\u044b\u0435&#187; \u043a\u043e\u043c\u0430\u043d\u0434\u044b. \u041f\u0430\u0443\u0437\u0430 \u0431\u0443\u0434\u0435 \u043f\u0440\u043e\u0434\u043e\u043b\u0436\u0430\u0442\u044c\u0441\u044f \u0434\u043e \u0442\u0435\u0445 \u043f\u043e\u0440, \u043f\u043e\u043a\u0430 \u043d\u0435 \u0431\u0443\u0434\u0435\u0442 \u0432\u0432\u0435\u0434\u0435\u043d \u0438\u043c\u0435\u044e\u0449\u0438\u0439 \u0441\u0438\u043b\u0443 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0438 \u043f\u043e\u043a\u0430 \u043d\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0442\u044c\u0441\u044f \u0432\u0441\u0435 &#171;\u043f\u0440\u043e\u0437\u0440\u0430\u0447\u043d\u044b\u0435&#187; \u043a\u043e\u043c\u0430\u043d\u0434\u044b.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(command &#171;circle&#187; &#171;5,5&#187; pause &#171;line&#187; &#171;5,5&#187; &#171;7,5&#187; &#171;&#187;)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u043d\u0430\u0447\u0438\u043d\u0430\u0435\u0442\u0441\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u0430 CIRCLE, \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u044e\u0449\u0430\u044f \u0446\u0435\u043d\u0442\u0440 \u043a\u0440\u0443\u0433\u0430 \u0432 \u0442\u043e\u0447\u043a\u0443 5,5, \u0438 \u0437\u0430\u0442\u0435\u043c \u043f\u0440\u0435\u0440\u0432\u0435\u0442\u0441\u044f, \u0434\u0430\u0432\u0430\u044f \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u044c \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044e \u0437\u0430\u0434\u0430\u0442\u044c \u0440\u0430\u0434\u0438\u0443\u0441 \u043a\u0440\u0443\u0433\u0430, \u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u043c\u0435\u0442\u043e\u0434\u043e\u043c \u0441\u043b\u0435\u0436\u0435\u043d\u0438\u044f. \u041f\u043e\u0441\u043b\u0435 \u0442\u043e\u0433\u043e \u043a\u0430\u043a \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u0443\u043a\u0430\u0436\u0435\u0442 \u0436\u0435\u043b\u0430\u0435\u043c\u0443\u044e \u0442\u043e\u0447\u043a\u0443 \u0438\u043b\u0438 \u043d\u0430\u0431\u0435\u0440\u0435\u0442 \u0441 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b \u0436\u0435\u043b\u0430\u0435\u043c\u044b\u0439 \u0440\u0430\u0434\u0438\u0443\u0441, \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442\u0441\u044f \u043a \u0441\u0432\u043e\u0435\u043c\u0443 \u043d\u043e\u0440\u043c\u0430\u043b\u044c\u043d\u043e\u043c\u0443 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044e \u0438 \u0438\u0437\u043e\u0431\u0440\u0430\u0437\u0438\u0442 \u043e\u0442\u0440\u0435\u0437\u043e\u043a \u0438\u0437 \u0442\u043e\u0447\u043a\u0438 5,5 \u0432 \u0442\u043e\u0447\u043a\u0443 7,5.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0412\u0432\u043e\u0434 \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u043c\u0435\u043d\u044e \u043d\u0435 \u0438\u0441\u043a\u043b\u044e\u0447\u0430\u0435\u0442\u0441\u044f \u043f\u0430\u0443\u0437\u043e\u0439 AutoLISP\u0430. \u0415\u0441\u043b\u0438 \u0430\u043a\u0442\u0438\u0432\u0438\u0437\u0438\u0440\u043e\u0432\u0430\u043d\u043e \u043c\u0435\u043d\u044e \u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f COMMAND \u0442\u0440\u0435\u0431\u0443\u0435\u0442 \u0432\u0432\u043e\u0434\u0430, \u043d\u0430\u0445\u043e\u0434\u044f\u0441\u044c \u0432 \u043f\u0430\u0443\u0437\u0435, \u0437\u0430\u043f\u0440\u043e\u0441 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0443\u0434\u043e\u0432\u043b\u0435\u0442\u0432\u043e\u0440\u0435\u043d \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u043c\u0435\u043d\u044e. \u0415\u0441\u043b\u0438 \u0432\u044b \u0445\u043e\u0442\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 \u043f\u0440\u0438\u043e\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0435 \u043c\u0435\u043d\u044e, \u0432 \u043c\u0435\u043d\u044e \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u043f\u0440\u0435\u0434\u0443\u0441\u043c\u043e\u0442\u0440\u0435\u0442\u044c backslash. \u041a\u043e\u0433\u0434\u0430 \u0431\u0443\u0434\u0435\u0442 \u0434\u0430\u043d \u0438\u043c\u0435\u044e\u0449\u0438\u0439 \u0441\u0438\u043b\u0443 \u043e\u0442\u0432\u0435\u0442, \u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f COMMAND \u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043c\u0435\u043d\u044e \u0432\u043e\u0437\u043e\u0431\u043d\u043e\u0432\u044f\u0442 \u0441\u0432\u043e\u044e \u0440\u0430\u0431\u043e\u0442\u0443<\/span>.<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"color: #006666\">\u0417\u0410\u041c\u0415\u0427\u0410\u041d\u0418\u042f:<\/span><\/p>\n<p><span style=\"color: #800000;font-family: Times New Roman;font-size: large\"><u><b><br \/>\n<\/b><\/u><\/span><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>\u0421\u0438\u043c\u0432\u043e\u043b PAUSE \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u043e\u0439 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u043e\u0439 \u0441\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435\u043c backslash. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c backslash \u043d\u0435\u043f\u043e\u0441\u0440\u0435\u0434\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u0432\u043c\u0435\u0441\u0442\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430 PAUSE, \u043e\u0434\u043d\u0430\u043a\u043e \u0435\u0441\u043b\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f COMMAND \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u043a\u0430\u043a \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u043c\u0435\u043d\u044e, \u0442\u043e backslash \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u044c\u0441\u044f \u043d\u0435 \u043a\u0430\u043a \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 COMMAND, \u043d\u043e \u043a\u0430\u043a \u043e\u043f\u0446\u0438\u044f \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u043c\u0435\u043d\u044e, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442\u0441\u044f \u0432 \u0442\u0435\u043a\u0443\u0449\u0438\u0439 \u043c\u043e\u043c\u0435\u043d\u0442. \u041a\u0440\u043e\u043c\u0435 \u0442\u043e\u0433\u043e \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c \u043f\u0440\u0435\u0440\u044b\u0432\u0430\u043d\u0438\u044f \u043c\u043e\u0436\u0435\u0442 \u0437\u0430\u043f\u0440\u0430\u0448\u0438\u0432\u0430\u0442\u044c \u0440\u0430\u0437\u043b\u0438\u0447\u043d\u044b\u0435 \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u0432 \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0445 \u0432\u0435\u0440\u0441\u0438\u044f\u0445 AutoLISP\u0430, \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u043c\u044b \u0440\u0435\u043a\u043e\u043c\u0435\u043d\u0434\u0443\u0435\u043c \u0432\u043e \u0432\u0441\u0435\u0445 \u0441\u043b\u0443\u0447\u0430\u044f\u0445 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u043c PAUSE \u0432\u043c\u0435\u0441\u0442\u043e backslash.<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>\u0415\u0441\u043b\u0438 PAUSE \u0432\u0441\u0442\u0440\u0435\u0447\u0430\u0435\u0442\u0441\u044f \u0432 \u043a\u043e\u043c\u0430\u043d\u0434\u0435, \u0442\u0440\u0435\u0431\u0443\u044e\u0449\u0435\u0439 \u0432\u0432\u043e\u0434\u0430 \u0442\u0435\u043a\u0441\u0442\u0430 \u0438\u043b\u0438 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u0410\u0442\u0440\u0438\u0431\u0443\u0442\u0430, AutoCAD \u043f\u0440\u0435\u0440\u0432\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u0432\u0432\u043e\u0434\u0430, \u0442\u043e\u043b\u044c\u043a\u043e \u0435\u0441\u043b\u0438 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u043e\u0439 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 TEXTEVAL \u043d\u0435 \u0440\u0430\u0432\u043d\u043e \u043d\u0443\u043b\u044e. \u0412 \u043f\u0440\u043e\u0442\u0438\u0432\u043d\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u0430 PAUSE &#8212; backslash \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u044f\u0442\u043e \u043a\u0430\u043a \u0442\u0435\u043a\u0441\u0442 \u0438 \u043f\u0440\u0435\u0440\u044b\u0432\u0430\u043d\u0438\u044f \u0434\u043b\u044f \u0432\u0432\u043e\u0434\u0430 \u043d\u0435 \u043f\u0440\u043e\u0438\u0437\u043e\u0439\u0434\u0435\u0442.<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>\u041a\u043e\u0433\u0434\u0430 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 COMMAND \u043f\u0440\u0435\u0440\u0432\u0430\u043d\u043e \u0434\u043b\u044f \u0432\u0432\u043e\u0434\u0430, \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0432 \u0441\u043e\u0441\u0442\u043e\u044f\u043d\u0438\u0438 &#171;active&#187; \/\u043d\u0430 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u0438\/, \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u043d\u0435 \u043c\u043e\u0436\u0435\u0442 \u0432\u0432\u043e\u0434\u0438\u0442\u044c \u0434\u043b\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u0434\u0440\u0443\u0433\u0438\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f AutoLISP\u0430.<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260905\"><\/a>(cond<br \/>\n(&lt;\u0442\u0435\u0441\u04421&gt; &lt;\u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442&gt;&#8230;)&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0435\u0442 \u043b\u044e\u0431\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0441\u043f\u0438\u0441\u043a\u043e\u0432 \u043a\u0430\u043a \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b. \u041e\u043d\u0430 \u043e\u0446\u0435\u043d\u0438\u0432\u0430\u0435\u0442 \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0441\u043f\u0438\u0441\u043a\u0430 (\u043f\u043e \u043e\u0447\u0435\u0440\u0435\u0434\u0438) \u0434\u043e \u0442\u0435\u0445 \u043f\u043e\u0440, \u043f\u043e\u043a\u0430 \u043d\u0435 \u0432\u0441\u0442\u0440\u0435\u0442\u0438\u0442\u0441\u044f \u043e\u0442\u043b\u0438\u0447\u043d\u044b\u0439 \u043e\u0442 nil. \u0417\u0430\u0442\u0435\u043c \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442\u0441\u044f \u0442\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435, \u043a\u043e\u0442\u043e\u0440\u043e\u0435 \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u0437\u0430 \u0442\u0435\u0441\u0442\u043e\u043c \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0432 \u043f\u043e\u0434\u0441\u043f\u0438\u0441\u043a\u0435. \u0415\u0441\u043b\u0438 \u0432 \u043f\u043e\u0434\u0441\u043f\u0438\u0441\u043a\u0435 \u0442\u043e\u043b\u044c\u043a\u043e \u043e\u0434\u043d\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 (\u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, &lt;\u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442&gt; \u043e\u0442\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442), \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f &lt;\u0442\u0435\u0441\u0442&gt;. COND &#8212; \u043e\u0441\u043d\u043e\u0432\u043d\u0430\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0443\u0441\u043b\u043e\u0432\u0438\u044f \u0432 AutoLISP\u0435.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 COND \u0434\u043b\u044f \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u0438\u044f \u0430\u0431\u0441\u043e\u043b\u044e\u0442\u043d\u043e\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u0447\u0438\u0441\u043b\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(cond ((minusp a) (- a))<\/p>\n<p align=\"JUSTIFY\">(t a)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0432 &#171;\u0430&#187; \u0431\u044b\u043b\u043e \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 -10, \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0435\u043d\u043e 10. \u041a\u0430\u043a \u0432\u0438\u0434\u043d\u043e, COND \u043c\u043e\u0436\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u043a\u0430\u043a \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0442\u0438\u043f\u0430 &#171;case&#187; \/\u0432 \u0441\u043b\u0443\u0447\u0430\u0435&#8230;\/. \u041f\u0440\u0438\u043d\u044f\u0442\u043e \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e (\u043f\u043e \u0443\u043c\u043e\u043b\u0447\u0430\u043d\u0438\u044e) \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f &lt;\u0442\u0435\u0441\u0442&gt; \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0441\u0438\u043c\u0432\u043e\u043b T.<\/p>\n<p align=\"JUSTIFY\">\u0415\u0449\u0435 \u043e\u0434\u0438\u043d \u043f\u0440\u043e\u0441\u0442\u043e\u0439 \u043f\u0440\u0438\u043c\u0435\u0440. \u0417\u0430\u0434\u0430\u0432\u0430\u044f \u0437\u0430\u043f\u0440\u043e\u0441 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u0432 \u0441\u0438\u043c\u0432\u043e\u043b &#171;s&#187;, \u044d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 \u043e\u0442\u0432\u0435\u0442 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 1, \u0435\u0441\u043b\u0438 \u043e\u0442\u0432\u0435\u0442 &#187; Y&#187; \u0438\u043b\u0438 &#171;y&#187;, \u0430 \u0435\u0441\u043b\u0438 \u043e\u0442\u0432\u0435\u0442 &#171;N&#187; \u0438\u043b\u0438 &#171;n&#187;, \u0442\u043e 0, \u0438\u043d\u0430\u0447\u0435 nil.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(cond ((= s &#171;Y&#187;) 1)<\/p>\n<p align=\"JUSTIFY\">((= s &#171;y&#187;) 1)<\/p>\n<p align=\"JUSTIFY\">((= s &#171;N&#187;) 0)<\/p>\n<p align=\"JUSTIFY\">((= s &#171;n&#187;) 0)<\/p>\n<p align=\"JUSTIFY\">(t nil)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260906\"><\/a>(CONS<br \/>\n&lt;\u043d\u043e\u0432\u044b\u0439 \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u043e \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u0439 \u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0442\u043e\u0440 \u0441\u043f\u0438\u0441\u043a\u0430. \u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0431\u0435\u0440\u0435\u0442 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 (&lt;\u043d\u043e\u0432\u044b\u0439 \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;) \u0438 &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;, \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u043f\u0438\u0441\u043e\u043a \u0441 \u0434\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u043d\u044b\u043c \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u043c \u0432 \u043d\u0430\u0447\u0430\u043b\u043e \u0441\u043f\u0438\u0441\u043a\u0430.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (cons &#8216;a &#8216;(b c d))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B C D)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cons &#8216;(a) &#8216;(b c d))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 ((A) B C D)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0417\u0430\u043c\u0435\u0442\u0438\u043c, \u0447\u0442\u043e \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0430\u0442\u043e\u043c\u043e\u043c \u0438\u043b\u0438 \u0441\u043f\u0438\u0441\u043a\u043e\u043c.<\/p>\n<p align=\"JUSTIFY\">CONS \u0442\u0430\u043a \u0436\u0435 \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0435\u0442 \u0430\u0442\u043e\u043c \u043d\u0430 \u043c\u0435\u0441\u0442\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430 &lt;\u0441\u043f\u0438\u0441\u043a\u0430&gt;, \u043a\u043e\u043d\u0441\u0442\u0440\u0443\u0438\u0440\u0443\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0443, \u0438\u0437\u0432\u0435\u0441\u0442\u043d\u0443\u044e \u043a\u0430\u043a \u0442\u043e\u0447\u0435\u0447\u043d\u0430\u044f \u043f\u0430\u0440\u0430. \u041f\u043e\u043a\u0430\u0437\u044b\u0432\u0430\u044f \u0442\u043e\u0447\u0435\u0447\u043d\u0443\u044e \u043f\u0430\u0440\u0443 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435, AutoLISP \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442 \u0442\u043e\u0447\u043a\u0443 \u043c\u0435\u0436\u0434\u0443 \u043f\u0435\u0440\u0432\u044b\u043c \u0438 \u0432\u0442\u043e\u0440\u044b\u043c \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u043c\u0438. \u0422\u043e\u0447\u0435\u0447\u043d\u044b\u0435 \u043f\u0430\u0440\u044b \u0437\u0430\u043d\u0438\u043c\u0430\u044e\u0442 \u043c\u0435\u043d\u044c\u0448\u0435 \u043c\u0435\u0441\u0442\u0430 \u0432 \u043f\u0430\u043c\u044f\u0442\u0438, \u0447\u0435\u043c \u043e\u0431\u044b\u0447\u043d\u044b\u0435 \u0441\u043f\u0438\u0441\u043a\u0438 \u0438 \u043c\u043e\u0436\u043d\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e CDR \u0434\u043b\u044f \u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f \u0432\u0442\u043e\u0440\u043e\u0433\u043e \u0430\u0442\u043e\u043c\u0430.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cons &#8216;a &#8216;b)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A . B)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(car (cons &#8216;a &#8216;b))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 A<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cdr (cons &#8216;a &#8216;b))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 B<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260907\"><\/a>(cos<br \/>\n&lt;\u0443\u0433\u043e\u043b&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043a\u043e\u0441\u0438\u043d\u0443\u0441 &lt;\u0443\u0433\u043b\u0430&gt;, \u0433\u0434\u0435 &lt;\u0443\u0433\u043e\u043b&gt; &#8212; \u0432\u044b\u0440\u0430\u0436\u0430\u0435\u0442\u0441\u044f \u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cos 0.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 1.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(cos pi)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -1.000000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260908\"><\/a>(defun<br \/>\n&lt;\u0441\u0438\u043c\u0432\u043e\u043b&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465260909\">\u0411\u0438\u0431\u043b\u0438\u043e\u0442\u0435\u043a\u0430<br \/>\n\u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 \u0438 \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0430\u044f \u0437\u0430\u0433\u0440\u0443\u0437\u043a\u0430. <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465260910\"><br \/>\n\u0421:\u0425\u0425\u0425 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &#8212; \u0414\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043a\u043e\u043c\u0430\u043d\u0434 \u0432 AutoCAD. <\/a><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">DEFIN &#8212; \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u044e \u0441 \u0438\u043c\u0435\u043d\u0435\u043c &lt;\u0441\u0438\u043c\u0432\u043e\u043b&gt; (\u0437\u0430\u043c\u0435\u0442\u0438\u043c, \u0447\u0442\u043e \u0438\u043c\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u0431\u0435\u0440\u0435\u0442\u0441\u044f \u0432 \u043a\u0430\u0432\u044b\u0447\u043a\u0438 \u0438 \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u043d\u0435 \u0442\u0440\u0435\u0431\u0443\u0435\u0442\u0441\u044f \u044d\u0442\u043e\u0433\u043e \u0434\u0435\u043b\u0430\u0442\u044c \u0441\u0430\u043c\u043e\u043c\u0443). \u0418\u043c\u044f, \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0435 \u0437\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 &#8212; \u044d\u0442\u043e \u0441\u043f\u0438\u0441\u043e\u043a \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 (\u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e \u043f\u0443\u0441\u0442\u043e\u0439), \u0437\u0430 \u043a\u043e\u0442\u043e\u0440\u044b\u043c \u0441\u043b\u0435\u0434\u0443\u0435\u0442 (\u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u043e) \u043a\u043e\u0441\u0430\u044f \u0447\u0435\u0440\u0442\u0430 (slach) \u0438 \u0438\u043c\u0435\u043d\u0430 \u043e\u0434\u043d\u043e\u0433\u043e \u0438\u043b\u0438 \u0431\u043e\u043b\u0435\u0435 \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0445 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u041a\u043e\u0441\u0430\u044f \u0447\u0435\u0440\u0442\u0430 \u0434\u043e\u043b\u0436\u043d\u0430 \u043e\u0442\u0441\u0442\u043e\u044f\u0442\u044c \u043e\u0442 \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u043e\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430 \u0438 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430, \u0435\u0441\u043b\u0438 \u043e\u043d \u0435\u0441\u0442\u044c, \u0445\u043e\u0442\u044f \u0431\u044b \u043d\u0430 \u043e\u0434\u0438\u043d \u043f\u0440\u043e\u0431\u0435\u043b. \u0415\u0441\u043b\u0438 \u043d\u0435\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u0438 \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0445 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u043e\u0431\u044a\u044f\u0432\u043b\u044f\u0442\u044c, \u0437\u0430 \u0438\u043c\u0435\u043d\u0435\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u043f\u043e\u0441\u0442\u0430\u0432\u0438\u0442\u044c \u043f\u0443\u0441\u0442\u044b\u0435 \u0441\u043a\u043e\u0431\u043a\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(defun myfunc (x y) &#8230; )<\/span><span style=\"font-family: Times New Roman\"> (\u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0431\u0435\u0440\u0435\u0442 \u0434\u0432\u0430 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(defun myfunc (\/ a d) &#8230; )<\/span><span style=\"font-family: Times New Roman\"> (\u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0438\u043c\u0435\u0435\u0442 \u0434\u0432\u0430 \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0445 \u0441\u0438\u043c\u0432\u043e\u043b\u0430)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(defun myfunc (x \/ temp) &#8230; )<\/span><span style=\"font-family: Times New Roman\">(\u043e\u0434\u0438\u043d \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0438 \u043e\u0434\u0438\u043d \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0439 \u0441\u0438\u043c\u0432\u043e\u043b<\/span>)<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(defun myfunc () &#8230; )<\/span><span style=\"font-family: Times New Roman\"> (\u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u0438 \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0445 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0417\u0430 \u0441\u043f\u0438\u0441\u043a\u043e\u043c \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u0438 \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0445 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u043e\u0434\u043d\u043e \u0438\u043b\u0438 \u0431\u043e\u043b\u0435\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u044e\u0442\u0441\u044f \u0432 \u043f\u0440\u043e\u0446\u0435\u0441\u0441\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438.<\/p>\n<p align=\"JUSTIFY\">\u0421\u0430\u043c\u0430 \u043f\u043e \u0441\u0435\u0431\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044f DEFUN \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u041a\u043e\u0433\u0434\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u0430\u044f \u0442\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f, \u0435\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u044e\u0442\u0441\u044f \u0438 \u0441\u0432\u044f\u0437\u044b\u0432\u0430\u044e\u0442\u0441\u044f \u0432 \u0441\u043f\u0438\u0441\u043e\u043a \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432. \u041b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b \u043c\u043e\u0433\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0432\u043d\u0443\u0442\u0440\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0431\u0435\u0437 \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u044f \u043c\u0445 \u0441\u0432\u044f\u0437\u0438 \u043d\u0430 \u0432\u043d\u0435\u0448\u043d\u0438\u0445 \u0443\u0440\u043e\u0432\u043d\u044f\u0445. \u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0442\u044c \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f. \u0412\u0441\u0435 \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0431\u0443\u0434\u0443\u0442 \u0438\u043c\u0435\u0442\u044c \u0442\u043e\u043b\u044c\u043a\u043e \u043f\u043e\u0431\u043e\u0447\u043d\u044b\u0439 \u044d\u0444\u0444\u0435\u043a\u0442. \u0421\u0430\u043c\u0430 \u043f\u043e \u0441\u0435\u0431\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044f DEFUN \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0442\u043e\u043b\u044c\u043a\u043e \u0438\u043c\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(defun add10 (x)(+ 10 x) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442<\/span> ADD10<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(add10 5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 15<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(add10 -7.4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2.60000<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u0438:<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun dots (x y \/ temp)<\/p>\n<p align=\"JUSTIFY\">(setq temp (strcat x &#171;&#8230;&#187;))<\/p>\n<p align=\"JUSTIFY\">(strcat temp y)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> )<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 DOTS<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(dots &#171;a&#187; &#171;b&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;a&#8230;b&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(dots &#171;from&#187; &#171;to&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;from&#8230;to&#187;<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"color: #006666\">\u041d\u0438\u043a\u043e\u0433\u0434\u0430 \u043d\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0439\u0442\u0435 \u0438\u043c\u0435\u043d\u0430 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u044b\u0445<br \/>\n\u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0438\u043b\u0438 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 \u043a\u0430\u043a &lt;\u0441\u0438\u043c\u0432\u043e\u043b&gt;, \u0442\u0430\u043a \u043a\u0430\u043a \u044d\u0442\u043e \u0441\u0434\u0435\u043b\u0430\u0435\u0442 \u043d\u0435\u0434\u043e\u0441\u0442\u0443\u043f\u043d\u044b\u043c\u0438 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u044b\u0435<br \/>\n\u0444\u0443\u043d\u043a\u0446\u0438\u0438.<\/span><\/p>\n<p><span style=\"color: #800000;font-size: large\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><a name=\"_Toc465260909\"><\/a>\u0411\u0438\u0431\u043b\u0438\u043e\u0442\u0435\u043a\u0430<br \/>\n\u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 \u0438 \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0430\u044f \u0437\u0430\u0433\u0440\u0443\u0437\u043a\u0430.<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u043c\u043e\u0433\u0443\u0442 \u0445\u0440\u0430\u043d\u0438\u0442\u044c\u0441\u044f \u0432 \u0444\u0430\u0439\u043b\u0430\u0445 \u0438 \u0437\u0430\u0433\u0440\u0443\u0436\u0430\u0442\u044c\u0441\u044f, \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044e LOAD \u0432 AutoLISPe, \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u0443\u044e \u043d\u0438\u0436\u0435. \u0415\u0441\u043b\u0438 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442 \u0444\u0430\u0439\u043b &#171;acad.lsp&#187;, \u0442\u043e AutoLISP \u0437\u0430\u0433\u0440\u0443\u0437\u0438\u0442 \u0438\u0445 \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u043a\u0430\u0436\u0434\u044b\u0439 \u0440\u0430\u0437, \u043a\u043e\u0433\u0434\u0430 \u0431\u0443\u0434\u0435\u0442 \u0432\u0432\u0435\u0434\u0435\u043d \u0427\u0435\u0440\u0442\u0435\u0436\u043d\u044b\u0439 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440 AutoCADa. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u044d\u0442\u043e \u043e\u0431\u0441\u0442\u043e\u044f\u0442\u0435\u043b\u044c\u0441\u0442\u0432\u043e \u0434\u043b\u044f \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f \u0431\u0438\u0431\u043b\u0438\u043e\u0442\u0435\u043a\u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u043c\u044b\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0438 \u0431\u044b\u0442\u044c \u0443\u0432\u0435\u0440\u0435\u043d\u043d\u044b\u043c, \u0447\u0442\u043e \u043e\u043d\u0438 \u0432\u0441\u0435\u0433\u0434\u0430 \u043f\u043e\u0434 \u0440\u0443\u043a\u043e\u0439, \u043a\u043e\u0433\u0434\u0430 \u043f\u043e\u043d\u0430\u0434\u043e\u0431\u044f\u0442\u0441\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041b\u044e\u0431\u043e\u0439 \u0431\u0438\u0431\u043b\u0438\u043e\u0442\u0435\u0447\u043d\u044b\u0439 &#171;.lsp&#187; \u0444\u0430\u0439\u043b \u043c\u043e\u0436\u0435\u0442 \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0442\u044c \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0432\u043d\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 DEFUN. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c, \u0437\u0430\u0433\u0440\u0443\u0436\u0430\u044f \u0444\u0430\u0439\u043b, \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u044e\u0449\u0438\u0439 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f, \u0432\u043a\u043b\u044e\u0447\u0430\u044f \u0438\u043c\u0435\u043d\u043e\u0432\u0430\u043d\u043d\u044b\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0442\u044c \u044d\u0442\u0438 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438, \u043a\u043e\u0433\u0434\u0430 \u0431\u044b \u044d\u0442\u043e\u0442 \u0444\u0430\u0439\u043b \u043d\u0435 \u0431\u044b\u043b \u0437\u0430\u0433\u0440\u0443\u0436\u0435\u043d. \u041e\u0434\u043d\u0430\u043a\u043e, \u0437\u0430\u0433\u0440\u0443\u0437\u043a\u0430 \u0444\u0430\u0439\u043b\u0430 &#171;acad.lsp&#187; \u043f\u0440\u043e\u0438\u0437\u0432\u043e\u0434\u0438\u0442\u0441\u044f \u0435\u0449\u0435 \u0434\u043e \u043f\u043e\u043b\u043d\u043e\u0439 \u0438\u043d\u0438\u0446\u0438\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 \u0427\u0435\u0440\u0442\u0435\u0436\u043d\u043e\u0433\u043e \u0420\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u0430 AutoCAD\u0430, \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u043d\u0435 \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 COMMAND \u0432 \u0444\u0430\u0439\u043b\u0435 &#171;acad.lsp&#187; (\u0432\u043d\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 DEFUN).<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260910\"><\/a><br \/>\n\u0421:\u0425\u0425\u0425 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &#8212; \u0414\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043a\u043e\u043c\u0430\u043d\u0434 \u0432 AutoCAD.<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0434\u043e\u0431\u0430\u0432\u0438\u0442\u044c \u043d\u043e\u0432\u044b\u0435 \u043a\u043e\u043c\u0430\u043d\u0434\u044b \u0432 AutoCAD, \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044e DEFUN, \u0447\u0442\u043e\u0431\u044b \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u044c \u044d\u0442\u0438 \u043a\u043e\u043c\u0430\u043d\u0434\u044b \u043a\u0430\u043a \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u0414\u043b\u044f \u0442\u043e\u0433\u043e \u0447\u0442\u043e\u0431\u044b \u0438\u043c\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u043a\u0430\u043a \u043a\u043e\u043c\u0430\u043d\u0434\u0430\u043c\u0438 AutoCAD\u0430, \u0442\u0430\u043a\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0434\u043e\u043b\u0436\u043d\u044b \u0443\u0434\u043e\u0432\u043b\u0435\u0442\u0432\u043e\u0440\u044f\u0442\u044c \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u043c \u043f\u0440\u0430\u0432\u0438\u043b\u0430\u043c:<\/p>\n<p align=\"JUSTIFY\">1. \u0418\u043c\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0434\u043e\u043b\u0436\u043d\u043e \u0431\u044b\u0442\u044c \u0444\u043e\u0440\u043c\u044b &#171;\u0421:\u0425\u0425\u0425&#187;, \u0433\u0434\u0435 \u0432\u0441\u0435 \u0431\u0443\u043a\u0432\u044b &#8212; \u0437\u0430\u0433\u043b\u0430\u0432\u043d\u044b\u0435. \u0427\u0430\u0441\u0442\u044c \u0438\u043c\u0435\u043d\u0438 &#171;\u0421:&#187; \u0434\u043e\u043b\u0436\u043d\u0430 \u0432\u0441\u0435\u0433\u0434\u0430 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c; \u0447\u0430\u0441\u0442\u044c \u0438\u043c\u0435\u043d\u0438 &#171;\u0425\u0425\u0425&#187; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043b\u044e\u0431\u044b\u043c \u0438\u043c\u0435\u043d\u0435\u043c \u043a\u043e\u043c\u0430\u043d\u0434\u044b \u043d\u0430 \u0432\u0430\u0448 \u0432\u044b\u0431\u043e\u0440, \u0442\u043e\u043b\u044c\u043a\u043e \u043d\u0435 \u0434\u043e\u043b\u0436\u043d\u0430 \u0434\u0443\u0431\u043b\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u043a\u0430\u043a\u0443\u044e-\u043b\u0438\u0431\u043e \u043a\u043e\u043c\u0430\u043d\u0434\u0443 AutoCADa, \u0432\u043d\u0435\u0448\u043d\u044e\u044e \u0438\u043b\u0438 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u0443\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u044e.<\/p>\n<p align=\"JUSTIFY\">2. \u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0434\u043e\u043b\u0436\u043d\u0430 \u0431\u044b\u0442\u044c \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0430 \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 &#8212; \u043f\u0443\u0441\u0442\u043e\u0439 \u0441\u043f\u0438\u0441\u043e\u043a (\u0445\u043e\u0442\u044f \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b \u0434\u043e\u043f\u0443\u0441\u043a\u0430\u044e\u0442\u0441\u044f).<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0430\u044f \u0437\u0430\u043f\u0438\u0441\u044c \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u044e, \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0430\u044e\u0449\u0443\u044e \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435<\/p>\n<p align=\"JUSTIFY\">\u043a\u0432\u0430\u0434\u0440\u0430\u0442 \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u041f\u043e\u043b\u0438\u043b\u0438\u043d\u0438\u0438:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun C:PSQUARE (\/ pt1 pt2 pt3 pt4 len)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (setq pt1 (getpoint &#171;<\/span><span style=\"font-family: Courier New\">Lower left corner: &#171;)) \/H\u0438\u0436\u043d\u0438\u0439 \u043b\u0435\u0432\u044b\u0439 \u0443\u0433\u043e\u043b: \/<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq len (getdist pt1 &#171;Length of one side: &#171;)) \/\u0414\u043b\u0438\u043d\u0430 \u0441\u0442\u043e\u0440\u043e\u043d\u044b: \/<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq pt2 (polar pt1 0.0 len))<\/p>\n<p align=\"JUSTIFY\">(setq pt3 (polar pt2 (\/ PI 2.0) len))<\/p>\n<p align=\"JUSTIFY\">(setq pt4 (polar pt3 PI len))<\/p>\n<p align=\"JUSTIFY\">(command &#171;PLINE&#187; pt1 pt2 pt3 pt4 &#171;C&#187;)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u044b\u0435 \u0442\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u043c\u043e\u0433\u0443\u0442 \u0432\u044b\u0437\u044b\u0432\u0430\u0442\u044c\u0441\u044f \u043f\u0440\u043e\u0441\u0442\u044b\u043c \u0432\u0432\u043e\u0434\u043e\u043c &#171;\u0425\u0425\u0425&#187; \u0447\u0430\u0441\u0442\u0438 \u0438\u043c\u0435\u043d\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u043a\u043e\u0433\u0434\u0430 \u043f\u043e\u044f\u0432\u0438\u043b\u043e\u0441\u044c \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435 AutoCADa &#171;Command:&#187;. \u0415\u0441\u043b\u0438 &#171;\u0425\u0425\u0425&#187; \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0438\u0437\u0432\u0435\u0441\u0442\u043d\u043e\u0439 \u043a\u043e\u043c\u0430\u043d\u0434\u043e\u0439, AutoCAD \u043f\u044b\u0442\u0430\u0435\u0442\u0441\u044f \u0432\u044b\u0437\u0432\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e AutoLISPa &#171;C:XXX&#187; \u0431\u0435\u0437 \u043f\u0430\u0440\u0430\u043c\u0435\u0442\u0440\u043e\u0432. \u0414\u043b\u044f \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u043d\u043e\u0439 \u0432\u044b\u0448\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 C:PSQUARE \u0434\u0438\u0430\u043b\u043e\u0433 \u0431\u0443\u0434\u0435\u0442 \u0442\u0430\u043a\u0438\u043c:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">Command: PSQUARE<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">Lower left corner: (\u0432\u0432\u043e\u0434 \u0442\u043e\u0447\u043a\u0438)<\/p>\n<p align=\"JUSTIFY\">Length of one side: (\u0432\u0432\u043e\u0434 \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u044f)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u043e\u0441\u043b\u0435 \u0447\u0435\u0433\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u0437\u043e\u0432\u0435\u0442 \u043a\u043e\u043c\u0430\u043d\u0434\u0443 AutoCAD\u0430 PLINE \u0438 \u043e\u0442\u0432\u0435\u0442\u0438\u0442 \u043d\u0430 \u0435\u0435 \u0437\u0430\u043f\u0440\u043e\u0441\u044b \u0434\u043b\u044f \u0432\u044b\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u044f \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0433\u043e \u043a\u0432\u0430\u0434\u0440\u0430\u0442\u0430.<\/p>\n<p align=\"JUSTIFY\">\u0414\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043a\u043e\u043c\u0430\u043d\u0434 \u043a AutoCAD\u0443 \u0442\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c &#8212; \u043e\u0447\u0435\u043d\u044c \u043c\u043e\u0449\u043d\u043e\u0435 \u0441\u0440\u0435\u0434\u0441\u0442\u0432\u043e AutoLISPa. \u041e\u0434\u043d\u0430\u0436\u0434\u044b \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u0430\u044f, \u043d\u043e\u0432\u0430\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u0430 \u043c\u043e\u0436\u0435\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0432\u0441\u0435\u043c\u0438 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u044f\u043c\u0438 AutoLISPa. \u0424\u0430\u043a\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u043d\u043e\u0432\u043e\u0439 \u043a\u043e\u043c\u0430\u043d\u0434\u044b \u043d\u0435 \u0442\u0440\u0435\u0431\u0443\u0435\u0442 \u0437\u0430\u043a\u043b\u044e\u0447\u0430\u0442\u044c \u0438\u043c\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u044b \u0432 \u0441\u043a\u043e\u0431\u043a\u0438, \u0442\u0430\u043a \u0447\u0442\u043e \u043a\u043e\u043c\u0430\u043d\u0434\u044b, \u043a\u043e\u0442\u043e\u0440\u044b\u043c\u0438 \u043e\u043f\u0435\u0440\u0438\u0440\u0443\u0435\u0442 AutoLISP \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044e\u0442\u0441\u044f \u0442\u0430\u043a \u0436\u0435 \u043a\u0430\u043a \u043b\u044e\u0431\u044b\u0435 \u0434\u0440\u0443\u0433\u0438\u0435 \u043a\u043e\u043c\u0430\u043d\u0434\u044b AutoCADa.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260911\"><\/a>(distance<br \/>\n&lt;\u0442\u043e\u0447\u043a\u04301&gt; &lt;\u0442\u043e\u0447\u043a\u04302&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435 \u043c\u0435\u0436\u0434\u0443 2-\u0445 \u043c\u0435\u0440\u043d\u044b\u043c\u0438 \u0442\u043e\u0447\u043a\u0430\u043c\u0438 &lt;\u0442\u043e\u0447\u043a\u04301&gt; &lt;\u0442\u043e\u0447\u043a\u04302&gt;, \u0433\u0434\u0435 2-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430 &#8212; \u044d\u0442\u043e \u0441\u043f\u0438\u0441\u043e\u043a \u0434\u0432\u0443\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(distance &#8216;(1.2 2.5) &#8216;(7.7 2.5))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 6.700000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(distance &#8216;(1.0 2.0) &#8216;(3.0 4.0)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2.828427<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260912\"><\/a>(eq<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04351&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04352&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 \u0438\u0434\u0435\u043d\u0442\u0438\u0447\u043d\u044b \u043b\u0438 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04351&gt; \u0438 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04352&gt;, \u0442.\u0435. \u043e\u043d\u0438 \u0444\u0430\u043a\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u043e\u0442\u043d\u043e\u0441\u044f\u0442\u0441\u044f \u043a \u043e\u0434\u043d\u043e\u043c\u0443 \u043e\u0431\u044a\u0435\u043a\u0442\u0443 (\u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e SETQ). EQ \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422, \u0435\u0441\u043b\u0438 \u043e\u0431\u0430 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0438\u0434\u0435\u043d\u0442\u0438\u0447\u043d\u044b, \u0438\u043d\u0430\u0447\u0435 nil. \u0422\u0438\u043f\u0438\u0447\u043d\u043e\u0435 \u043f\u0440\u0438\u043c\u0435\u043d\u0435\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &#8212; \u0434\u043b\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u044f\u0432\u043b\u044f\u044e\u0442\u0441\u044f \u043b\u0438 \u0434\u0432\u0430 \u0441\u043f\u0438\u0441\u043a\u0430 \u0444\u0430\u043a\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u043e\u0434\u043d\u0438\u043c. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0437\u0430\u0434\u0430\u0434\u0438\u043c\u0441\u044f \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u043c\u0438 \u0434\u043e\u043f\u0443\u0449\u0435\u043d\u0438\u044f\u043c\u0438:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq f1 &#8216;(a b c))<\/p>\n<p align=\"JUSTIFY\">(setq f2 &#8216;(a b c))<\/p>\n<p align=\"JUSTIFY\">(setq f3 f2)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(eq f1 f3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil (f1 \u0438 f3 \u043d\u0435 \u043e\u0434\u043d\u043e \u0438 \u0442\u043e \u0436\u0435)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(eq f3 f2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T (f3 \u0438 f2 \u043e\u0434\u0438\u043d \u0438 \u0442\u043e\u0442 \u0436\u0435 \u0441\u043f\u0438\u0441\u043e\u043a)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u043c\u043e\u0442\u0440\u0438 \u0442\u0430\u043a \u0436\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044e EQUAL \u043d\u0438\u0436\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260913\"><\/a>(equal<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04351&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04352&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 \u0440\u0430\u0432\u043d\u044b \u043b\u0438 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04351&gt; \u0438 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04352&gt;, \u0442.\u0435. \u0438\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043e\u0434\u043d\u043e \u0438 \u0442\u043e \u0436\u0435.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0437\u0430\u0434\u0430\u0434\u0438\u043c\u0441\u044f \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u043c\u0438 \u0434\u043e\u043f\u0443\u0449\u0435\u043d\u0438\u044f\u043c\u0438:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq f1 &#8216;(a b c))<\/p>\n<p align=\"JUSTIFY\">(setq f2 &#8216;(a b c))<\/p>\n<p align=\"JUSTIFY\">(setq f3 f2)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(equal f1 f3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T(\u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435\u043c f1 \u0438 f3 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043e\u0434\u043d\u043e \u0438 \u0442\u043e \u0436\u0435)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(equal f3 f2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T(f3 \u0438 f2 \u0432 \u0442\u043e\u0447\u043d\u043e\u0441\u0442\u0438 \u043e\u0434\u0438\u043d \u0438 \u0442\u043e\u0442 \u0436\u0435 \u0441\u043f\u0438\u0441\u043e\u043a)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041e\u0442\u043c\u0435\u0442\u0438\u043c, \u0447\u0442\u043e \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f, \u043a\u0430\u043a \u0434\u0432\u0430 \u0441\u043f\u0438\u0441\u043a\u0430 EQUAL, \u043e\u043d\u0438 \u043c\u043e\u0433\u0443\u0442 \u043d\u0435 \u0431\u044b\u0442\u044c EQ, \u0430\u0442\u043e\u043c\u044b, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 EQUAL \u0432\u0441\u0435\u0433\u0434\u0430 \u043a \u0442\u043e\u043c\u0443 \u0436\u0435 EQ. \u0414\u043e\u0431\u0430\u0432\u0438\u043c, \u0447\u0442\u043e \u0434\u0432\u0430 \u0441\u043f\u0438\u0441\u043a\u0430, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 EQ, \u0432\u0441\u0435\u0433\u0434\u0430<\/span> EQUAL.<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260914\"><\/a>(eval<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;, \u0433\u0434\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &#8212; \u043b\u044e\u0431\u043e\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u044f\u0437\u044b\u043a\u0430 LISP. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 123)<\/p>\n<p align=\"JUSTIFY\">(setq b &#8216;a)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(eval 4.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 4.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(eval (abs -10))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 10<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(eval a)<\/span> <span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 123<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(eval b)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 123<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260915\"><\/a>(exp<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442 \u0435 \u0432 \u0441\u0442\u0435\u043f\u0435\u043d\u0438 &lt;\u0447\u0438\u0441\u043b\u043e&gt; (\u043d\u0430\u0442\u0443\u0440\u0430\u043b\u044c\u043d\u044b\u0439 \u0430\u043d\u0442\u0438\u043b\u043e\u0433\u0430\u0440\u0438\u0444\u043c), \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(exp 1.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2.718282<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(exp 2.2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 9.025013<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(exp -0.4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.670320<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260916\"><\/a>(expt<br \/>\n&lt;\u043e\u0441\u043d\u043e\u0432\u0430\u043d\u0438\u0435&gt; &lt;\u0441\u0442\u0435\u043f\u0435\u043d\u044c&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &lt;\u043e\u0441\u043d\u043e\u0432\u0430\u043d\u0438\u0435&gt;, \u0432\u043e\u0437\u0432\u0435\u0434\u0435\u043d\u043d\u043e\u0435 \u0432 \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u0443\u044e &lt;\u0441\u0442\u0435\u043f\u0435\u043d\u044c&gt;. \u0415\u0441\u043b\u0438 \u043e\u0431\u0430 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430 \u0446\u0435\u043b\u044b\u0435, \u0442\u043e \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 &#8212; \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e. \u0412 \u043b\u044e\u0431\u043e\u043c \u0434\u0440\u0443\u0433\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435, \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 &#8212; \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(expt 2 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 16<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(expt 3.0 2.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 9.000000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260917\"><\/a>(fix<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435 &lt;\u0447\u0438\u0441\u043b\u0430&gt; \u0432 \u0446\u0435\u043b\u043e\u0435. &lt;\u0427\u0438\u0441\u043b\u043e&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043a\u0430\u043a \u0446\u0435\u043b\u044b\u043c, \u0442\u0430\u043a \u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c. \u0415\u0441\u043b\u0438 \u043e\u043d\u043e \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435, \u0442\u043e \u043e\u043d\u043e \u0443\u0441\u0435\u043a\u0430\u0435\u0442\u0441\u044f \u0434\u043e \u0431\u043b\u0438\u0436\u0430\u0439\u0448\u0435\u0433\u043e \u0446\u0435\u043b\u043e\u0433\u043e \u043f\u0443\u0442\u0435\u043c \u043e\u0442\u0431\u0440\u0430\u0441\u044b\u0432\u0430\u043d\u0438\u044f \u0434\u0440\u043e\u0431\u043d\u043e\u0439 \u0447\u0430\u0441\u0442\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(fix 3) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(fix 3.7)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260918\"><\/a>(float<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435 &lt;\u0447\u0438\u0441\u043b\u0430&gt; \u0432 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435. &lt;\u0427\u0438\u0441\u043b\u043e&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043a\u0430\u043a \u0446\u0435\u043b\u044b\u043c \u0442\u0430\u043a \u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(float 3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(float 3.7)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3.700000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260919\"><\/a>(foreach<br \/>\n&lt;\u0438\u043c\u044f&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f, \u043f\u0440\u043e\u0445\u043e\u0434\u044f \u043f\u043e &lt;\u0441\u043f\u0438\u0441\u043a\u0443&gt;, \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u0442 \u043a\u0430\u0436\u0434\u043e\u043c\u0443 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0443 &lt;\u0438\u043c\u044f&gt; \u0438 \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442 \u043a\u0430\u0436\u0434\u043e\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u0434\u043b\u044f \u043a\u0430\u0436\u0434\u043e\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u0432 \u0441\u043f\u0438\u0441\u043a\u0435. \u041c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0437\u0430\u0434\u0430\u043d\u043e \u043b\u044e\u0431\u043e\u0435 \u0447\u0438\u0441\u043b\u043e &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439&gt;. FOREACH \u0432\u044b\u0434\u0430\u0435\u0442 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e, \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u043d\u043e\u0433\u043e &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f&gt;. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(foreach n &#8216;(a b c) (print n))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(print a)<\/p>\n<p align=\"JUSTIFY\">(print b)<\/p>\n<p align=\"JUSTIFY\">(print c)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u043a\u0440\u043e\u043c\u0435 \u0442\u043e\u0433\u043e, \u0447\u0442\u043e FOREACH \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0442\u043e\u043b\u044c\u043a\u043e \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260920\"><\/a><br \/>\n(gcd &lt;\u0447\u0438\u0441\u043b\u043e1&gt; &lt;\u0447\u0438\u0441\u043b\u043e2&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043d\u0430\u0438\u0431\u043e\u043b\u044c\u0448\u0438\u0439 \u043e\u0431\u0449\u0438\u0439 \u0434\u0435\u043b\u0438\u0442\u0435\u043b\u044c &lt;\u0447\u0438\u0441\u043b\u04301&gt; \u0438 &lt;\u0447\u0438\u0441\u043b\u04302&gt;. &lt;\u0427\u0438\u0441\u043b\u043e1&gt; \u0438 &lt;\u0447\u0438\u0441\u043b\u043e2&gt; \u0434\u043e\u043b\u0436\u043d\u044b \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u044b\u043c\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(gcd 81 57)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(gcd 12 20)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 4<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260921\"><\/a>(getangle<br \/>\n[&lt;\u0442\u043e\u0447\u043a\u0430&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u043e\u0437\u0434\u0430\u0435\u0442 \u043f\u0430\u0443\u0437\u0443 \u0434\u043b\u044f \u0442\u043e\u0433\u043e, \u0447\u0442\u043e\u0431\u044b \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u0432\u0432\u0435\u043b \u0443\u0433\u043e\u043b. &lt;\u041f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt; &#8212; \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u0430\u044f \u0437\u0430\u043f\u0438\u0441\u044c \u0434\u043b\u044f \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u043d\u0438\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0438, \u0430 &lt;\u0442\u043e\u0447\u043a\u0430&gt; &#8212; \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u0430\u044f 2-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0431\u0430\u0437\u043e\u0432\u0430\u044f \u0442\u043e\u0447\u043a\u0430. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0437\u0430\u0434\u0430\u0442\u044c \u0443\u0433\u043e\u043b \u043f\u0443\u0442\u0435\u043c \u043d\u0430\u0431\u043e\u0440\u0430 \u0447\u0438\u0441\u043b\u0430 \u043d\u0430 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u0435 \u0432 \u0442\u0435\u043a\u0443\u0449\u0438\u0445 \u0434\u043b\u044f AutoCADa \u0435\u0434\u0438\u043d\u0438\u0446\u0430\u0445 \u0438\u0437\u043c\u0435\u0440\u0435\u043d\u0438\u044f. \u0417\u0430\u043c\u0435\u0442\u0438\u043c, \u0447\u0442\u043e, \u043d\u0435\u0441\u043c\u043e\u0442\u0440\u044f \u043d\u0430 \u0442\u043e, \u0447\u0442\u043e \u0442\u0435\u043a\u0443\u0449\u0430\u044f \u0435\u0434\u0438\u043d\u0438\u0446\u0430 \u0438\u0437\u043c\u0435\u0440\u0435\u043d\u0438\u044f \u0443\u0433\u043b\u0430 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0433\u0440\u0430\u0434\u0443\u0441, \u0433\u0440\u0430\u0434, \u0438\u043b\u0438 \u043a\u0430\u043a\u0430\u044f \u043b\u0438\u0431\u043e \u0435\u0449\u0435, \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0443\u0433\u043e\u043b \u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445.<\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0442\u0430\u043a \u0436\u0435 &#171;\u043f\u043e\u043a\u0430\u0437\u0430\u0442\u044c&#187; AutoLISP\u0443 \u0443\u0433\u043e\u043b \u043f\u0443\u0442\u0435\u043c \u0443\u043a\u0430\u0437\u0430\u043d\u0438\u044f \u0434\u0432\u0443\u0445 2-\u0445 \u043c\u0435\u0440\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435. AutoCAD \u043d\u0430\u0440\u0438\u0441\u0443\u0435\u0442 &#171;\u0440\u0435\u0437\u0438\u043d\u043e\u0432\u0443\u044e&#187; \u043b\u0438\u043d\u0438\u044e \u043e\u0442 \u043f\u0435\u0440\u0432\u043e\u0439 \u0442\u043e\u0447\u043a\u0438 \u043a \u0442\u0435\u043a\u0443\u0449\u0435\u043c\u0443 \u043f\u043e\u043b\u043e\u0436\u0435\u043d\u0438\u044e \u043a\u0443\u0440\u0441\u043e\u0440\u0430 \u0434\u043b\u044f \u0442\u043e\u0433\u043e \u0447\u0442\u043e\u0431\u044b \u0432\u0438\u0437\u0443\u0430\u043b\u0438\u0437\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0443\u0433\u043e\u043b. \u0424\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 GETANGLE &#8212; &lt;\u0442\u043e\u0447\u043a\u0430&gt; (\u0435\u0441\u043b\u0438 \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f) \u043f\u043e\u0434\u0440\u0430\u0437\u0443\u043c\u0435\u0432\u0430\u0435\u0442\u0441\u044f \u043a\u0430\u043a \u043f\u0435\u0440\u0432\u0430\u044f \u0438\u0437 \u044d\u0442\u0438\u0445 \u0434\u0432\u0443\u0445 \u0442\u043e\u0447\u0435\u043a, \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044f \u0442\u0435\u043c \u0441\u0430\u043c\u044b\u043c \u0432\u0430\u043c &#171;\u043f\u043e\u043a\u0430\u0437\u0430\u0442\u044c&#187; AutoLISP\u0443 \u0443\u0433\u043e\u043b, \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u044f \u043d\u0430 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0443\u044e \u0442\u043e\u0447\u043a\u0443<\/p>\n<p align=\"JUSTIFY\">\u041d\u0438\u0436\u0435 \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u044b \u043f\u0440\u0438\u043c\u0435\u0440\u044b \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GETANGLE.<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq ang (getangle))<\/p>\n<p align=\"JUSTIFY\">(setq ang (getangle &#8216;(1.0 3.5))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq ang (getangle &#171;Which way? &#171;)) \/&#187;\u0412 \u043a\u0430\u043a\u0443\u044e \u0441\u0442\u043e\u0440\u043e\u043d\u0443? &#171;\/<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (setq ang (getangle &#8216;(1.0 <\/span><span style=\"font-family: Courier New\">3.5) &#171;Which way? &#171;)) \/&#187;\u0412 \u043a\u0430\u043a\u0443\u044e \u0441\u0442\u043e\u0440\u043e\u043d\u0443? &#171;\/<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0434\u0440\u0443\u0433\u043e\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 LISPa, \u043a\u0430\u043a \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GETANGLE. \u041f\u0440\u0438 \u043f\u043e\u043f\u044b\u0442\u043a\u0435 \u0441\u0434\u0435\u043b\u0430\u0442\u044c \u0442\u0430\u043a, \u043f\u043e\u044f\u0432\u0438\u0442\u0441\u044f \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435 &#171;Can&#8217;t reenter AutoLISP &#187; \/&#187;H\u0435 \u043c\u043e\u0433\u0443 \u0432\u043e\u0439\u0442\u0438 \u0432 AutoLISP&#187;\/. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 GETORIENT INI<\/span>TGET.<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260922\"><\/a>(getcorner<br \/>\n&lt;\u0442\u043e\u0447\u043a\u0430&gt; [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">GETCORNER \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0442\u043e\u0447\u043a\u0443, \u0442\u0430\u043a \u0436\u0435 \u043a\u0430\u043a GETPOINT. \u041e\u0434\u043d\u0430\u043a\u043e \u0434\u043b\u044f GETCORNER \u0442\u0440\u0435\u0431\u0443\u0435\u0442\u0441\u044f &lt;\u0431\u0430\u0437\u043e\u0432\u0430\u044f \u0442\u043e\u0447\u043a\u0430&gt; \u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0442\u0440\u043e\u0438\u0442 \u043f\u0440\u044f\u043c\u043e\u0443\u0433\u043e\u043b\u044c\u043d\u0438\u043a \u043e\u0442 &lt;\u0431\u0430\u0437\u043e\u0432\u043e\u0439 \u0442\u043e\u0447\u043a\u0438&gt; \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f \u043a\u0430\u043a \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u043f\u0435\u0440\u0435\u0434\u0432\u0438\u0433\u0430\u0435\u0442 \u043a\u0443\u0440\u0441\u043e\u0440 \u043f\u043e \u044d\u043a\u0440\u0430\u043d\u0443. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 GETROINT \u0438 INITGET \u0434\u043b\u044f \u0443\u0442\u043e\u0447\u043d\u0435\u043d\u0438\u044f.<\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0434\u0440\u0443\u0433\u043e\u0435 LISP-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 GETCORNER.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260923\"><\/a>(getdist<br \/>\n[&lt;\u0442\u043e\u0447\u043a\u0430&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u043e\u0437\u0434\u0430\u0435\u0442 \u043f\u0430\u0443\u0437\u0443 \u0434\u043b\u044f \u0442\u043e\u0433\u043e, \u0447\u0442\u043e\u0431\u044b \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u0432\u0432\u0435\u043b \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435. [&lt;\u041f\u0440\u043e\u043c\u043f\u0442&gt;] &#8212; \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u0430\u044f \u0437\u0430\u043f\u0438\u0441\u044c \u0434\u043b\u044f \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u043d\u0438\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0438, &lt;\u0442\u043e\u0447\u043a\u0430&gt; &#8212; \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u0430\u044f \u0431\u0430\u0437\u043e\u0432\u0430\u044f \u0442\u043e\u0447\u043a\u0430. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0443\u043a\u0430\u0437\u0430\u0442\u044c \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435, \u043d\u0430\u0431\u0440\u0430\u0432 \u0447\u0438\u0441\u043b\u043e \u043d\u0430 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u0435 \u0432 \u0442\u0435\u043a\u0443\u0449\u0438\u0445 \u0434\u043b\u044f AutoCADa \u0435\u0434\u0438\u043d\u0438\u0446\u0430\u0445 \u0438\u0437\u043c\u0435\u0440\u0435\u043d\u0438\u044f. \u0417\u0430\u043c\u0435\u0442\u0438\u043c, \u043a\u0430\u043a\u0438\u043c\u0438 \u0431\u044b \u043d\u0438 \u0431\u044b\u043b\u0438 \u0442\u0435\u043a\u0443\u0449\u0438\u0435 \u0435\u0434\u0438\u043d\u0438\u0446 \u0438\u0437\u043c\u0435\u0440\u0435\u043d\u0438\u044f (\u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0444\u0443\u0442\u044b \u0438\u043b\u0438 \u0434\u044e\u0439\u043c\u044b), \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435 \u043a\u0430\u043a \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0442\u0430\u043a \u0436\u0435 &#171;\u043f\u043e\u043a\u0430\u0437\u0430\u0442\u044c&#187; AutoLISP\u0443 \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435 , \u0443\u043a\u0430\u0437\u0430\u0432 \u0434\u0432\u0435 \u0442\u043e\u0447\u043a\u0438 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435. AutoCAD \u0440\u0438\u0441\u0443\u0435\u0442 &#171;\u0440\u0435\u0437\u0438\u043d\u043e\u0432\u0443\u044e&#187; \u043b\u0438\u043d\u0438\u044e \u043e\u0442 \u043f\u0435\u0440\u0432\u043e\u0439 \u0442\u043e\u0447\u043a\u0438 \u0434\u043e \u0442\u0435\u043a\u0443\u0449\u0435\u0433\u043e \u043f\u043e\u043b\u043e\u0436\u0435\u043d\u0438\u044f \u043a\u0443\u0440\u0441\u043e\u0440\u0430 \u0434\u043b\u044f \u0442\u043e\u0433\u043e, \u0447\u0442\u043e\u0431\u044b \u0432\u0438\u0437\u0443\u0430\u043b\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435. \u0424\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 GETDIST &lt;\u0442\u043e\u0447\u043a\u0430&gt; \u043f\u043e\u0434\u0440\u0430\u0437\u0443\u043c\u0435\u0432\u0430\u0435\u0442\u0441\u044f \u043a\u0430\u043a \u043f\u0435\u0440\u0432\u044b\u0439 \u0438\u0437 \u044d\u0442\u0438\u0445 \u0434\u0432\u0443\u0445 \u0442\u043e\u0447\u0435\u043a, \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044f \u0432\u0430\u043c &#171;\u043f\u043e\u043a\u0430\u0437\u0430\u0442\u044c&#187; AutoLISP\u0443 \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435, \u043f\u0443\u0442\u0435\u043c \u0443\u043a\u0430\u0437\u0430\u043d\u0438\u044f \u0432 \u043b\u044e\u0431\u0443\u044e \u0434\u0440\u0443\u0433\u0443\u044e \u0442\u043e\u0447\u043a\u0443.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0438\u0436\u0435 \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u044b \u043f\u0440\u0438\u043c\u0435\u0440\u044b \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GETDIST:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq dist (getdist))<\/p>\n<p align=\"JUSTIFY\">(setq dist (getdist &#8216;(1.0 3.5))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq dist (getdist &#171;How far? &#171;)) \/&#187;\u041a\u0430\u043a \u0434\u0430\u043b\u0435\u043a\u043e? &#171;\/<\/p>\n<p align=\"JUSTIFY\">(setq dist (getdist &#8216;(1.0 3.5) &#171;How far? &#171;)) \/&#187;\u041a\u0430\u043a \u0434\u0430\u043b\u0435\u043a\u043e? &#171;\/<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0434\u0440\u0443\u0433\u043e\u0435 LISP-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043a\u0430\u043a \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 GETDIST. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 INITGET.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172682\"><\/a><a name=\"_Ref465173475\"><\/a><a name=\"_Toc465260924\"><\/a><span style=\"font-family: Arial\">(getint<br \/>\n[&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043e\u0436\u0438\u0434\u0430\u0435\u0442 \u0432\u0432\u043e\u0434\u0430 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c \u0446\u0435\u043b\u043e\u0433\u043e \u0447\u0438\u0441\u043b\u0430 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0435\u0433\u043e. &lt;\u041f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt; &#8212; \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u0430\u044f \u0437\u0430\u043f\u0438\u0441\u044c \u0434\u043b\u044f \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u043d\u0438\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq num (getint))<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq num (getint &#171;Enter a number: &#171;)) <\/span><span style=\"font-family: Courier New\"> \/&#187;\u0412\u0432\u0435\u0434\u0438\u0442\u0435 \u0447\u0438\u0441\u043b\u043e: &#171;\/<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0434\u0440\u0443\u0433\u043e\u0435 LISP-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 GETINT. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 INITGET.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260925\"><\/a>(getkword<br \/>\n[&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u043f\u0440\u0430\u0448\u0438\u0432\u0430\u0435\u0442 \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0435 \u0441\u043b\u043e\u0432\u043e \u0443 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f. \u0421\u043f\u0438\u0441\u043e\u043a \u0438\u043c\u0435\u044e\u0449\u0438\u0445 \u0441\u043c\u044b\u0441\u043b \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432 \u0437\u0430\u0434\u0430\u0435\u0442\u0441\u044f, \u043f\u0440\u0435\u0436\u0434\u0435 \u0447\u0435\u043c \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f GETKWORD, \u043f\u043e\u043b\u044c\u0437\u0443\u044f\u0441\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 INITGET (\u043e\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u043d\u0438\u0436\u0435). GETKWORD \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0435 \u0441\u043b\u043e\u0432\u043e, \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0435\u0435 \u0432\u0432\u0435\u0434\u0435\u043d\u043d\u043e\u043c\u0443 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c \u043a\u0430\u043a \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0443\u044e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443. AutoCAD \u043f\u0435\u0440\u0435\u0441\u043f\u0440\u043e\u0441\u0438\u0442, \u0435\u0441\u043b\u0438 \u0432\u0432\u0435\u0434\u0435\u043d\u043d\u043e\u0435 \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043e\u0434\u043d\u0438\u043c \u0438\u0437 \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u0445 \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432. \u041f\u0443\u0441\u0442\u043e\u0439 \u0432\u0432\u043e\u0434 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil (\u0435\u0441\u043b\u0438 \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442\u0441\u044f \u0432\u0432\u043e\u0434\u0438\u0442\u044c \u043f\u0443\u0441\u0442\u043e\u0439 \u0432\u0432\u043e\u0434). \u0415\u0441\u043b\u0438 \u043d\u0435 \u0431\u044b\u043b\u043e \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u043e \u043d\u0438 \u043e\u0434\u043d\u043e\u0433\u043e \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0433\u043e \u0441\u043b\u043e\u0432\u0430, \u0442\u0430\u043a\u0436\u0435 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(initget 1 &#171;Yes No&#187;)<\/p>\n<p align=\"JUSTIFY\">(setq x (getkword &#171;Are you sure? (Yes or No) &#171;))<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> \/&#187;\u0412\u044b \u0443\u0432\u0435\u0440\u0435\u043d\u044b? (\u0414\u0430 \u0438\u043b\u0438 H\u0435\u0442) &#171;\/<\/span><\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0437\u0430\u043f\u0440\u043e\u0441\u0438\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u0438 \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442 \u0432 \u0441\u0438\u043c\u0432\u043e\u043b \u0425 \u043b\u0438\u0431\u043e &#171;Yes&#187;, \u043b\u0438\u0431\u043e &#171;No&#187;, \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0435\u0433\u043e \u043e\u0442\u0432\u0435\u0442\u0430. \u0415\u0441\u043b\u0438 \u0432\u0432\u043e\u0434 \u043d\u0435 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u043d\u0438 \u043e\u0434\u043d\u043e\u043c\u0443 \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u043c\u0443 \u0441\u043b\u043e\u0432\u0443, \u0438\u043b\u0438 \u0436\u0435 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u043e\u0442\u0432\u0435\u0442\u0438\u043b \u043f\u0443\u0441\u0442\u044b\u043c \u0432\u0432\u043e\u0434\u043e\u043c, AutoCAD \u043f\u043e\u043f\u0440\u043e\u0441\u0438\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u043f\u043e\u0432\u0442\u043e\u0440\u0438\u0442\u044c \u0432\u0432\u043e\u0434 \u0435\u0449\u0435 \u0440\u0430\u0437.<\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0434\u0440\u0443\u0433\u043e\u0435 LISP-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 GETKWORD.<\/p>\n<p align=\"JUSTIFY\">\u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 INITGET.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260926\"><\/a><br \/>\n(getorient [&lt;\u0442\u043e\u0447\u043a\u0430&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0412 AutoLISPe \u0443\u0433\u043b\u044b \u0432\u0441\u0435\u0433\u0434\u0430 \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0442\u0441\u044f \u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445 \u0441 \u043d\u0443\u043b\u0435\u0432\u044b\u043c \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435\u043c \u0441\u043b\u0435\u0432\u0430 \u043d\u0430\u043f\u0440\u0430\u0432\u043e (\u0432\u043e\u0441\u0442\u043e\u043a) \u0438 \u0443\u0433\u043b\u044b \u043e\u0442\u043a\u043b\u0430\u0434\u044b\u0432\u0430\u044e\u0442\u0441\u044f \u043f\u0440\u043e\u0442\u0438\u0432 \u0447\u0430\u0441\u043e\u0432\u043e\u0439 \u0441\u0442\u0440\u0435\u043b\u043a\u0438. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c, \u0434\u043e\u043b\u0436\u043d\u044b \u0438\u043c\u0435\u0442\u044c \u043c\u0435\u0441\u0442\u044c \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u044f, \u0435\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u0445\u043e\u0447\u0435\u0442 \u0432\u044b\u0431\u0440\u0430\u0442\u044c \u043e\u0442\u0441\u0447\u0435\u0442 \u0432 \u0433\u0440\u0430\u0434\u0443\u0441\u0430\u0445 \u0438\u043b\u0438 \u0436\u0435\u043b\u0430\u0435\u0442 \u0438\u0437\u043c\u0435\u043d\u0438\u0442\u044c \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043e\u0442\u0441\u0447\u0435\u0442\u0430 \u0443\u0433\u043b\u043e\u0432, \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u0443 UNITS \u0438\u043b\u0438 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u044b\u0435 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0435 ANGBASE \u0438 A<\/span>NGDIR.<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">GETRIENT \u043f\u043e\u0445\u043e\u0436\u0430 \u043d\u0430 GETANGLE-\u0444\u0443\u043d\u043a\u0446\u0438\u044e, \u043d\u043e \u043e\u0442\u043b\u0438\u0447\u0430\u0435\u0442\u0441\u044f \u043e\u0442 \u043d\u0435\u0435 \u0442\u0435\u043c, \u0447\u0442\u043e \u0438\u0437\u043c\u0435\u0440\u044f\u0435\u0442 \u0443\u0433\u043b\u044b \u0432 \u0433\u0440\u0430\u0434\u0443\u0441\u0430\u0445 \u0438 \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043e\u0442\u0441\u0447\u0435\u0442\u0430 \u0443\u0433\u043b\u043e\u0432 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442\u0441\u044f \u0434\u0440\u0443\u0433\u0438\u043c \u0441\u043f\u043e\u0441\u043e\u0431\u043e\u043c, \u0447\u0435\u043c \u0432 GETANGLE. GETANGLE \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f, \u0435\u0441\u043b\u0438 \u0432\u0430\u043c \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c \u0441\u0443\u043c\u043c\u0430\u0440\u043d\u044b\u0439 \u0443\u0433\u043e\u043b (\u043e\u0442\u043d\u043e\u0441\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0439 \u0443\u0433\u043e\u043b), \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f \u043a\u0430\u043a GETORIENT \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u0434\u043e\u0441\u0442\u0438\u0436\u0435\u043d\u0438\u044f \u043e\u0440\u0438\u0435\u043d\u0442\u0430\u0446\u0438\u0438 (\u0430\u0431\u0441\u043e\u043b\u044e\u0442\u043d\u044b\u0439 \u0443\u0433\u043e\u043b).<\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0435\u0434\u043f\u043e\u043b\u043e\u0436\u0438\u043c, \u0447\u0442\u043e \u0431\u044b\u043b\u0430 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0430 \u043a\u043e\u043c\u0430\u043d\u0434\u0430 AutoCADa UNITS \u0434\u043b\u044f \u0432\u044b\u0431\u043e\u0440\u0430 \u043e\u0442\u0441\u0447\u0435\u0442\u0430 \u0432 \u0433\u0440\u0430\u0434\u0443\u0441\u0430\u0445 \u0438 \u043d\u0443\u043b\u0435\u0432\u043e\u0435 \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435 -90 (\u0441\u0435\u0432\u0435\u0440), \u043e\u0442\u0441\u0447\u0435\u0442 \u0433\u0440\u0430\u0434\u0443\u0441\u043e\u0432 \u0432 \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0438 \u0447\u0430\u0441\u043e\u0432\u043e\u0439 \u0441\u0442\u0440\u0435\u043b\u043a\u0438. \u0412 \u0442\u0430\u0431\u043b\u0438\u0446\u0435 \u0443\u043a\u0430\u0437\u0430\u043d\u044b \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u044e\u0442 GETANGLE \u0438 GETORIENT (\u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445), \u0435\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c \u0432\u0432\u0435\u0434\u0435\u043d\u044b \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u044b\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f (\u0432 \u0433\u0440\u0430\u0434\u0443\u0441\u0430\u0445):<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"496\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"38%\" height=\"22\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u0432\u0435\u0434\u0435\u043d\u043e (\u0433\u0440\u0430\u0434\u0443\u0441\u044b)<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"29%\" height=\"22\">\n<p align=\"JUSTIFY\">GETANGLE<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"33%\" height=\"22\">\n<p align=\"CENTER\">GETORIENT<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"38%\">\n<p align=\"CENTER\">0<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"29%\">\n<p align=\"CENTER\">0.000000<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"33%\">\n<p align=\"CENTER\">1.570796<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"38%\">\n<p align=\"CENTER\">-90<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"29%\">\n<p align=\"CENTER\">1.570796<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"33%\">\n<p align=\"CENTER\">3.141593<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"38%\">\n<p align=\"CENTER\">180<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"29%\">\n<p align=\"CENTER\">3.141593<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"33%\">\n<p align=\"CENTER\">4.712389<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"38%\">\n<p align=\"CENTER\">90<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"29%\">\n<p align=\"CENTER\">4.712389<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"33%\">\n<p align=\"CENTER\">0.000000<\/p>\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u0430\u043a \u0432\u0438\u0434\u043d\u043e \u0438\u0437 \u0442\u0430\u0431\u043b\u0438\u0446\u044b, GETANGLE \u043f\u0440\u0435\u0434\u043f\u043e\u0447\u0438\u0442\u0430\u0435\u0442 \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043f\u0440\u0438\u0440\u0430\u0449\u0435\u043d\u0438\u044f \u0443\u0433\u043b\u0430, \u043d\u043e \u0438\u0433\u043d\u043e\u0440\u0438\u0440\u0443\u0435\u0442 \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043d\u0443\u043b\u044f \u0433\u0440\u0430\u0434\u0443\u0441\u043e\u0432. \u0422\u0430\u043a, \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c GETANGLE \u043f\u0440\u0438 \u043f\u043e\u0432\u043e\u0440\u043e\u0442\u0435 \u0432\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u043c\u043e\u0433\u043e \u0431\u043b\u043e\u043a\u0430, \u0442.\u043a. \u0432\u0432\u0435\u0434\u0435\u043d\u0438\u0435 \u043d\u0443\u043b\u044f \u0433\u0440\u0430\u0434\u0443\u0441\u043e\u0432 \u0431\u0443\u0434\u0435\u0442 \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0442\u044c \u043d\u043e\u043b\u044c \u0440\u0430\u0434\u0438\u0430\u043d. \u0421 \u0434\u0440\u0443\u0433\u043e\u0439 \u0441\u0442\u043e\u0440\u043e\u043d\u044b, GETORIENT \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0435\u0442 \u043a\u0430\u043a \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043d\u0443\u043b\u044f \u0433\u0440\u0430\u0434\u0443\u0441\u043e\u0432, \u0442\u0430\u043a \u0438 \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u043f\u0440\u0438\u0440\u0430\u0449\u0435\u043d\u0438\u044f \u0443\u0433\u043b\u0430. \u0422\u0430\u043a, \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c GETORIENT \u0434\u043b\u044f \u0432\u0432\u0435\u0434\u0435\u043d\u0438\u044f \u0442\u0430\u043a\u0438\u0445 \u0443\u0433\u043b\u043e\u0432, \u043a\u0430\u043a \u0443\u0433\u043e\u043b \u0431\u0430\u0437\u043e\u0432\u043e\u0439 \u043b\u0438\u043d\u0438\u0438 \u0434\u043b\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u044b \u0422\u0415\u0425\u0422. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u0430\u044f \u0432\u044b\u0448\u0435 \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043a\u0430 UNITS \u0443\u043a\u0430\u0436\u0435\u0442 \u043d\u0430\u043f\u0440\u0430\u0432\u043b\u0435\u043d\u0438\u0435 \u0431\u0430\u0437\u043e\u0432\u043e\u0439 \u043b\u0438\u043d\u0438\u0438 \u043e\u0431\u044b\u0447\u043d\u043e\u0439 \u0433\u043e\u0440\u0438\u0437\u043e\u043d\u0442\u0430\u043b\u044c\u043d\u043e\u0439 \u0441\u0442\u0440\u043e\u043a\u0438 \u0442\u0435\u043a\u0441\u0442\u0430 \u043d\u0430 90 \u0433\u0440\u0430\u0434\u0443\u0441\u043e\u0432.<\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0434\u0440\u0443\u0433\u043e\u0435 LISP-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043e\u0442\u0432\u0435\u0442\u0430 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 GETORIENT. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 GETANGLE \u0438 INITGET.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260927\"><\/a>(getpoint<br \/>\n[&lt;\u0442\u043e\u0447\u043a\u0430&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u043f\u0440\u0430\u0448\u0438\u0432\u0430\u0435\u0442 \u043e\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u0442\u043e\u0447\u043a\u0443 &lt;\u0442\u043e\u0447\u043a\u0430&gt;. \u0424\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &#8212; \u0431\u0430\u0437\u043e\u0432\u0430\u044f [&lt;\u0442\u043e\u0447\u043a\u0430&gt;] \u0438 [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;] &#8212; \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u0430\u044f \u0437\u0430\u043f\u0438\u0441\u044c \u0434\u043b\u044f \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u043d\u0438\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0438. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0442\u043e\u0447\u043a\u0443 \u043f\u0443\u0442\u0435\u043c \u0443\u043a\u0430\u0437\u0430\u043d\u0438\u044f \u0435\u0435 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u0438\u043b\u0438 \u0437\u0430\u043f\u0438\u0441\u0430\u0432 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b \u0432 \u0442\u0435\u043a\u0443\u0449\u0438\u0445<\/span> <span style=\"font-family: Times New Roman\">\u0435\u0434\u0438\u043d\u0438\u0446\u0430\u0445 \u0438\u0437\u043c\u0435\u0440\u0435\u043d\u0438\u044f. \u0415\u0441\u043b\u0438 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u0442\u043e\u0447\u043a\u0430&gt;, AutoCAD \u043d\u0430\u0440\u0438\u0441\u0443\u0435\u0442 &#171;\u0440\u0435\u0437\u0438\u043d\u043e\u0432\u0443\u044e&#187; \u043b\u0438\u043d\u0438\u044e \u043e\u0442 \u044d\u0442\u043e\u0439 \u0442\u043e\u0447\u043a\u0438 \u0434\u043e \u0442\u0435\u043a\u0443\u0449\u0435\u0433\u043e \u043f\u043e\u043b\u043e\u0436\u0435\u043d\u0438\u044f \u043a\u0443\u0440\u0441\u043e\u0440\u0430.<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq p (getpoint))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq p (getpoint &#171;Where? &#171;)) \/&#187;\u0413\u0434\u0435? &#171;\/<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq p (getpoint &#8216;(1.5 2.0) &#171;<\/span><span style=\"font-family: Courier New\">Second point: &#171;)) \/&#187;\u0412\u0442\u043e\u0440\u0430\u044f \u0442\u043e\u0447\u043a\u0430: &#171;\/<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041e\u0431\u044b\u0447\u043d\u043e, GETPOINT \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2-\u0445 \u043c\u0435\u0440\u043d\u0443\u044e \u0442\u043e\u0447\u043a\u0443 (\u0441\u043f\u0438\u0441\u043e\u043a \u0438\u0437 \u0434\u0432\u0443\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b). \u0418\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044e INIGET \u0434\u043b\u044f \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043a\u0438 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044c\u043d\u043e\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430 &#171;3-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430&#187;, \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0437\u0430\u0441\u0442\u0430\u0432\u0438\u0442\u044c GETPOINT \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0442\u044c 3-\u0445 \u043c\u0435\u0440\u043d\u0443\u044e \u0442\u043e\u0447\u043a\u0443 (\u0441\u043f\u0438\u0441\u043e\u043a \u0438\u0437 \u0442\u0440\u0435\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b).<\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0438\u043d\u043e\u0435 LISP-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 GETPOINT. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 GETCORNER \u0438 INITGET.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260928\"><\/a><br \/>\n(getreal [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u043f\u0440\u0430\u0448\u0438\u0432\u0430\u0435\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u0432\u0432\u0435\u0441\u0442\u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0435\u0433\u043e. &lt;\u041f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;- \u043d\u0435\u043e\u0431\u044f\u0437\u0430\u0442\u0435\u043b\u044c\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0434\u043b\u044f \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u043d\u0438\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u0432 \u0432\u0438\u0434\u0435 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0438.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq val (getreal))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq val (geyrial &#171;Scale factor: &#171;)) \/&#187;\u041c\u0430\u0441\u0448\u0442\u0430\u0431\u043d\u044b\u0439 \u0444\u0430\u043a\u0442\u043e\u0440: &#171;\/<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0438\u043d\u043e\u0435 LISP-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 GETREAL. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 INITGET.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260929\"><\/a>(getstring<br \/>\n[&lt;cr&gt;] [&lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u043f\u0440\u0430\u0448\u0438\u0432\u0430\u0435\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u0432\u0432\u0435\u0441\u0442\u0438 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0443\u044e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u044d\u0442\u043e\u0442 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443. \u0415\u0441\u043b\u0438 &lt;cr&gt; \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0438 \u043d\u0435 nil, \u0432\u0432\u043e\u0434\u0438\u043c\u044b\u0439 \u043f\u043e\u0442\u043e\u043a \u043c\u043e\u0436\u0435\u0442 \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0442\u044c \u043f\u0440\u043e\u0431\u0435\u043b\u044b (\u0438 \u0434\u043e\u043b\u0436\u0435\u043d, \u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u0435\u043b\u044c\u043d\u043e, \u043e\u043a\u0430\u043d\u0447\u0438\u0432\u0430\u0442\u044c\u0441\u044f RETURN). \u0418\u043d\u0430\u0447\u0435 \u0432\u0432\u043e\u0434 \u0442\u0435\u043a\u0441\u0442\u0430 (\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u043e\u0439 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u044b) \u0431\u0443\u0434\u0435\u0442 \u043f\u0440\u0435\u0440\u0432\u0430\u043d \u043f\u0440\u043e\u0431\u0435\u043b\u043e\u043c RETURN. &lt;\u041f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430&gt; &#8212; \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0434\u043b\u044f \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u043d\u0438\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u0432 \u0432\u0438\u0434\u0435 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq s (getstring))<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> (setq s (getstring &#171;What&#8217;s your fist name? &#171;)) \/&#187;\u0412\u0430\u0448\u0435 \u0438\u043c\u044f?<\/span><span style=\"font-family: Courier New\"> &#171;\/<\/span><\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq s (getstring T &#171;What&#8217;s your full name? &#171;)) \/&#187;\u0412\u0430\u0448\u0435 \u043f\u043e\u043b\u043d\u043e\u0435 \u0438\u043c\u044f? &#171;\/<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u0434\u043e\u043b\u0436\u0435\u043d \u0432\u0432\u0435\u0441\u0442\u0438 \u043e\u0434\u043d\u0443 \u0438\u0437 \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u044c\u043d\u044b\u0445 \u043e\u043f\u0446\u0438\u0439 (\u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432), \u0432\u043c\u0435\u0441\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GETSTRING, \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f GETWORD, \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u0430\u044f \u0432\u044b\u0448\u0435.<\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0432\u0435\u0441\u0442\u0438 \u0438\u043d\u043e\u0435 LISP-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043a\u0430\u043a \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 GETSTRING.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260930\"><\/a>(getvar<br \/>\n&lt;\u0438\u043c\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u043e\u0439 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 AutoCADa. \u0418\u043c\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 \u0434\u043e\u043b\u0436\u043d\u043e \u0431\u044b\u0442\u044c \u0437\u0430\u043a\u043b\u044e\u0447\u0435\u043d\u043e \u0432 \u043a\u0430\u0432\u044b\u0447\u043a\u0438 (&#171;\u0438\u043c\u044f&#187;).<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u043f\u0440\u0435\u0434\u043f\u043e\u043b\u043e\u0436\u0438\u043c, \u0447\u0442\u043e \u0440\u0430\u0434\u0438\u0443\u0441 \u0441\u043e\u043f\u0440\u044f\u0436\u0435\u043d\u0438\u044f \u0431\u044b\u043b \u043d\u0435\u0434\u0430\u0432\u043d\u043e \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d \u0432 0.25 \u0435\u0434\u0438\u043d\u0438\u0446:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(getvar &#171;FILLETRAD&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.250000<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0432\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0435 GETVAR \u0441 \u043d\u0435\u0438\u0437\u0432\u0435\u0441\u0442\u043d\u044b\u043c AutoCAD\u0443 \u0438\u043c\u0435\u043d\u0435\u043c \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439, \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442 nil. \u0421\u043f\u0438\u0441\u043e\u043a \u0442\u0435\u043a\u0443\u0449\u0438\u0445 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u044b\u0445 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0445 AutoCADa \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u0439\u0442\u0438 \u0432 \u043f\u0440\u0438\u043b\u043e\u0436\u0435\u043d\u0438\u0438 \u0410 \u0440\u0443\u043a\u043e\u0432\u043e\u0434\u0441\u0442\u0432\u0430 \u043f\u043e AutoCAD\u0443. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044e SETVAR.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260931\"><\/a>(graphscr)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0435\u0440\u0435\u043a\u043b\u044e\u0447\u0430\u0435\u0442 \u044d\u043a\u0440\u0430\u043d \u0441 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u043e\u0433\u043e \u0440\u0435\u0436\u0438\u043c\u0430 \u0432 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u0432 \u0441\u0438\u0441\u0442\u0435\u043c\u0430\u0445 \u0441 \u043e\u0434\u043d\u0438\u043c \u044d\u043a\u0440\u0430\u043d\u043e\u043c (\u0442\u0430\u043a\u0436\u0435 \u043a\u0430\u043a \u0444\u0443\u043d\u043a\u0446\u0438\u043e\u043d\u0430\u043b\u044c\u043d\u0430\u044f \u043a\u043b\u0430\u0432\u0438\u0448\u0430 &#171;FLIP SCREEN&#187; \u0432 AutoCADe). GRAPHSCR \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a \u0436\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044e TEXTSCR.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260932\"><\/a>(if<br \/>\n&lt;\u0442\u0435\u043a\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435-\u0442\u043e\u0433\u0434\u0430&gt; [&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435-\u0438\u043d\u0430\u0447\u0435&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0438\u0441\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043f\u043e \u0443\u0441\u043b\u043e\u0432\u0438\u044e. \u0415\u0441\u043b\u0438 &lt;\u0442\u0435\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u043d\u0435 nil, \u0442\u043e\u0433\u0434\u0430 \u0438\u0441\u043f\u043e\u043b\u043d\u044f\u0435\u0442\u0441\u044f &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435-\u0442\u043e\u0433\u0434\u0430&gt;, \u0438\u043d\u0430\u0447\u0435 \u0438\u0441\u043f\u043e\u043b\u043d\u044f\u0435\u0442\u0441\u044f &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435-\u0438\u043d\u0430\u0447\u0435&gt;. \u041f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435-\u0438\u043d\u0430\u0447\u0435&gt; \u043d\u0435 \u043e\u0431\u044f\u0437\u0430\u0442\u0435\u043b\u044c\u043d\u043e. IF \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u043e\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f; \u0435\u0441\u043b\u0438 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435-\u0438\u043d\u0430\u0447\u0435&gt; \u043e\u0442\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0438 &lt;\u0442\u0435\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; nil, IF \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(if (= 1 3) &#171;Yes!!&#187; &#171;no.&#187;) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;no.&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(if (= 2 (+ 1 1) &#171;Yes!!&#187;) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;Yes!<\/span>!&#187;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(if (= 2 (+ 3 4) &#171;Yes!!&#187;) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260933\"><\/a>(initget<br \/>\n[&lt;\u0431\u0438\u0442\u044b&gt;] [&lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0440\u0430\u0437\u043b\u0438\u0447\u043d\u044b\u0435 \u043e\u043f\u0446\u0438\u0438 \u0434\u043b\u044f \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u043c\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438 GETxxx (\u043a\u0440\u043e\u043c\u0435 GETSTRING \u0438 GETVAR). INITGET \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. &lt;\u0411\u0438\u0442\u044b&gt; &#8212; \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &#8212; \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0441\u043e \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u043c\u0438 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f\u043c\u0438<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"779\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"15%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">INIGET \u0431\u0438\u0442\u044b<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0417\u043d\u0430\u0447\u0435\u043d\u0438\u044f<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\">\u0417\u0430\u043f\u0440\u0435\u0449\u0435\u043d \u0432\u0432\u043e\u0434 \u043d\u0435\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\">2<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0417\u0430\u043f\u0440\u0435\u0449\u0435\u043d \u0432\u0432\u043e\u0434 0<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\">4<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0417\u0430\u043f\u0440\u0435\u0449\u0435\u043d \u0432\u0432\u043e\u0434 \u043e\u0442\u0440\u0438\u0446\u0430\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\">8<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041d\u0435 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u0438\u0440\u0443\u044e\u0442\u0441\u044f \u043f\u0440\u0435\u0434\u0435\u043b\u044b, \u0434\u0430\u0436\u0435 \u043f\u0440\u0438 \u0432\u043a\u043b\u044e\u0447\u0435\u043d\u043d\u043e\u043c <\/span>LIMCHECK<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\">16<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u043e\u0437\u0432\u0440\u0430\u0449\u0435\u043d\u0438\u0435 3-\u0445 \u043c\u0435\u0440\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a, \u043f\u0440\u0435\u0434\u043f\u043e\u0447\u0442\u0438\u0442\u0435\u043b\u044c\u043d\u0435\u0435, \u0447\u0435\u043c 2-\u0445 \u043c\u0435\u0440\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\">32<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0438\u043c\u0435\u043d\u044f\u0435\u0442\u0441\u044f \u043f\u0443\u043d\u043a\u0442\u0438\u0440 \u0434\u043b\u044f \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f &#171;\u0440\u0435\u0437\u0438\u043d\u043e\u0432\u043e\u0439&#187; \u043b\u0438\u043d\u0438\u0438 \u0438\u043b\u0438 \u0440\u0430\u043c\u043a\u0438<\/p>\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0411\u0438\u0442\u044b \u043c\u043e\u0433\u0443\u0442 \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u0442\u044c\u0441\u044f \u0432\u043c\u0435\u0441\u0442\u0435 \u0432 \u043b\u044e\u0431\u043e\u0439 \u043a\u043e\u043c\u0431\u0438\u043d\u0430\u0446\u0438\u0438, \u0447\u0442\u043e\u0431\u044b \u0441\u0444\u043e\u0440\u043c\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043e\u0442 0 \u0434\u043e 63. (\u041f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435 \u0432\u0435\u0440\u0441\u0438\u0438 AutoLISP\u0430 \u043c\u043e\u0433\u0443\u0442 \u0432\u043a\u043b\u044e\u0447\u0430\u0442\u044c \u0434\u043e\u043f\u043e\u043b\u043d\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0435 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044c\u043d\u044b\u0435 \u0431\u0438\u0442\u044b, \u0442\u0430\u043a \u0447\u0442\u043e \u0438\u0437\u0431\u0435\u0433\u0430\u0439\u0442\u0435 \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0442\u044c \u043d\u0435\u0437\u0430\u0434\u043e\u043a\u0443\u043c\u0435\u043d\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0435 \u0431\u0438\u0442\u044b).<\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c, \u0432\u0432\u043e\u0434\u044f, \u0437\u0430\u0431\u044b\u043b \u043e\u0434\u043d\u043e \u0438\u043b\u0438 \u0431\u043e\u043b\u0435\u0435 \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u0445 \u0443\u0441\u043b\u043e\u0432\u0438\u0439 (\u0442\u0430\u043a, \u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0432\u0432\u0435\u043b 0, \u043a\u043e\u0433\u0434\u0430 \u0432\u0432\u043e\u0434 0 \u0437\u0430\u043f\u0440\u0435\u0449\u0435\u043d), AutoCAD \u0432\u044b\u0441\u0432\u0435\u0442\u0438\u0442 \u043e\u0448\u0438\u0431\u043a\u0443 \u0438 \u043f\u0440\u0435\u0434\u043b\u043e\u0436\u0438\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044e \u043f\u043e\u0432\u0442\u043e\u0440\u0438\u0442\u044c \u0432\u0432\u043e\u0434.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(initget (+ 1 2 4))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq age (getint &#171;How old are you? &#171;)) \/&#187;\u0421\u043a\u043e\u043b\u044c\u043a\u043e \u0412\u0430\u043c \u043b\u0435\u0442? &#171;\/<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0441\u043f\u0440\u043e\u0441\u0438\u0442 \u0432\u043e\u0437\u0440\u0430\u0441\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f, \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u043f\u043e\u0432\u0442\u043e\u0440\u044f\u044f \u0437\u0430\u043f\u0440\u043e\u0441, \u0435\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u043e\u0442\u0432\u0435\u0442\u0438\u043b \u043f\u0443\u0441\u0442\u044b\u043c \u0432\u0432\u043e\u0434\u043e\u043c, \u0432\u0432\u0435\u043b \u043e\u0442\u0440\u0438\u0446\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0438\u043b\u0438 \u043d\u0443\u043b\u0435\u0432\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435. \u0415\u0441\u043b\u0438 \u043d\u0435\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430 &lt;\u0431\u0438\u0442\u044b&gt;, \u043f\u043e\u0434\u0440\u0430\u0437\u0443\u043c\u0435\u0432\u0430\u0435\u0442\u0441\u044f 0 (\u043d\u0435\u0442 \u0443\u0441\u043b\u043e\u0432\u0438\u0439). \u0421\u043f\u0435\u0446\u0438\u0430\u043b\u044c\u043d\u044b\u0435 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044c\u043d\u044b\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u043e\u0431\u0435\u0441\u043f\u0435\u0447\u0438\u0432\u0430\u044e\u0442\u0441\u044f \u0442\u0435\u043c\u0438 GETxxx \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438, \u0434\u043b\u044f \u043a\u043e\u0442\u043e\u0440\u044b\u0445 \u043e\u043d\u0438 \u0438\u043c\u0435\u044e\u0442 \u0441\u043c\u044b\u0441\u043b, \u043a\u0430\u043a \u043f\u043e\u043a\u0430\u0437\u0430\u043d\u043e \u0432 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0439 \u0442\u0430\u0431\u043b\u0438\u0446\u0435.<\/p>\n<p align=\"JUSTIFY\">\u041a\u043e\u043d\u0442\u0440\u043e\u043b\u044c\u043d\u044b\u0439 \u0431\u0438\u0442 \u0441\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435\u043c 32 \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0435\u0442\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438 GETPOINT, GETCORNER, GETDIST, GETANGLE \u0438 GETORIENT \u043a\u043e\u0433\u0434\u0430 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u0431\u0430\u0437\u043e\u0432\u0430\u044f \u0442\u043e\u0447\u043a\u0430&gt;, \u0438 \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0440\u0435\u0436\u0438\u043c \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f \u043f\u0443\u043d\u043a\u0442\u0438\u0440\u043d\u043e\u0439 (\u0438\u043b\u0438 \u043f\u043e-\u0434\u0440\u0443\u0433\u043e\u043c\u0443 \u043f\u043e\u0434\u0441\u0432\u0435\u0447\u0435\u043d\u043d\u043e\u0439) \u043b\u0438\u043d\u0438\u0438 \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 &#171;\u0440\u0435\u0437\u0438\u043d\u043e\u0432\u043e\u0439&#187; \u043b\u0438\u043d\u0438\u0438 \u0438\u043b\u0438 \u0440\u0430\u043c\u043a\u0438, \u043e\u0442\u0440\u0438\u0441\u043e\u0432\u044b\u0432\u0430\u0435\u043c\u044b\u0445 \u043a\u0443\u0440\u0441\u043e\u0440\u043e\u043c \u043e\u0442 \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0439 \u0431\u0430\u0437\u043e\u0432\u043e\u0439 \u0442\u043e\u0447\u043a\u0438. \u0415\u0441\u043b\u0438 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u0430\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f POPUPS \u0440\u0430\u0432\u043d\u0430 \u043d\u0443\u043b\u044e, \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u044f \u0442\u0435\u043c \u0441\u0430\u043c\u044b\u043c, \u0447\u0442\u043e \u0434\u0440\u0430\u0439\u0432\u0435\u0440 \u0434\u0438\u0441\u043f\u043b\u0435\u044f \u043d\u0435 \u043f\u043e\u0434\u0434\u0435\u0440\u0436\u0438\u0432\u0430\u0435\u0442 \u0443\u043b\u0443\u0447\u0448\u0435\u043d\u043d\u044b\u0439 \u0438\u043d\u0442\u0435\u0440\u0444\u0435\u0439\u0441 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f, \u0442\u043e AutoCAD \u043f\u0440\u043e\u0438\u0433\u043d\u043e\u0440\u0438\u0440\u0443\u0435\u0442 \u044d\u0442\u043e\u0442 \u0431\u0438\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 INITGET.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"824\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"18%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u0438<\/p>\n<\/td>\n<td colspan=\"5\" valign=\"TOP\" width=\"82%\">\n<p align=\"CENTER\"><span style=\"font-family: Times New Roman\">\u041a\u043e\u043d\u0442\u0440\u043e\u043b\u044c\u043d\u044b\u0435 \u0431\u0438\u0442\u044b <\/span>INITGET <span style=\"font-family: Times New Roman\">\u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u044e\u0442\u0441\u044f<\/span><\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\"><\/td>\n<td valign=\"TOP\" width=\"13%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0435 \u043f\u0443\u0441\u0442\u043e\u0439<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"7%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0435 0<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0435 \u043e\u0442\u0440\u0438\u0446.<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"17%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0435\u0442 \u043f\u0440\u0435\u0434\u0435\u043b\u043e\u0432<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"32%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u043f\u0443\u043d\u043a\u0442\u0438\u0440<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETING<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"7%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"17%\"><\/td>\n<td valign=\"TOP\" width=\"32%\"><\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETREAL<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"7%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"17%\"><\/td>\n<td valign=\"TOP\" width=\"32%\"><\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETDIST<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"7%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"17%\"><\/td>\n<td valign=\"TOP\" width=\"32%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETANGL<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"7%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\"><\/td>\n<td valign=\"TOP\" width=\"17%\"><\/td>\n<td valign=\"TOP\" width=\"32%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETORIENT<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"7%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\"><\/td>\n<td valign=\"TOP\" width=\"17%\"><\/td>\n<td valign=\"TOP\" width=\"32%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETCORNER<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"7%\"><\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"17%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"32%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETKWORD<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\">\n<p align=\"CENTER\">*<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"7%\"><\/td>\n<td valign=\"TOP\" width=\"13%\"><\/td>\n<td valign=\"TOP\" width=\"17%\"><\/td>\n<td valign=\"TOP\" width=\"32%\"><\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETSTRING<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\"><\/td>\n<td valign=\"TOP\" width=\"7%\"><\/td>\n<td valign=\"TOP\" width=\"13%\"><\/td>\n<td valign=\"TOP\" width=\"17%\"><\/td>\n<td valign=\"TOP\" width=\"32%\"><\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"18%\">\n<p align=\"JUSTIFY\">GETVAR<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"13%\"><\/td>\n<td valign=\"TOP\" width=\"7%\"><\/td>\n<td valign=\"TOP\" width=\"13%\"><\/td>\n<td valign=\"TOP\" width=\"17%\"><\/td>\n<td valign=\"TOP\" width=\"32%\"><\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 INITGET-\u0444\u0443\u043d\u043a\u0446\u0438\u0438 &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 \u0441\u043f\u0438\u0441\u043e\u043a \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0431\u0443\u0434\u0443\u0442 \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0442\u044c\u0441\u044f \u0432 \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c \u0437\u0430\u043f\u0440\u043e\u0441\u0435 GETxxx, \u0435\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u043f\u0440\u043e\u0438\u0437\u0432\u0435\u043b \u0432\u0432\u043e\u0434 \u043d\u0435\u043f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u043e\u0433\u043e \u0442\u0438\u043f\u0430 (\u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0442\u043e\u0447\u043a\u0443 \u0434\u043b\u044f GETPOINT). \u0415\u0441\u043b\u0438 \u0432\u0432\u043e\u0434 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u043e\u0434\u043d\u043e\u043c\u0443 \u0438\u0437 \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432 \u0438\u0437 \u044d\u0442\u043e\u0433\u043e \u0441\u043f\u0438\u0441\u043a\u0430, \u044d\u0442\u043e \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0435 \u0441\u043b\u043e\u0432\u043e \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f GETxxx \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 \u043a\u0430\u043a \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0442\u0438\u043f\u0430 STRING (\u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430). \u041f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u043c\u043e\u0436\u0435\u0442 \u0442\u0435\u0441\u0442\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0435 \u0441\u043b\u043e\u0432\u0430 \u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0442\u044c \u0436\u0435\u043b\u0430\u0435\u043c\u044b\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f \u0434\u043b\u044f \u043a\u0430\u0436\u0434\u043e\u0433\u043e \u0438\u0437 \u043d\u0438\u0445. \u0415\u0441\u043b\u0438 \u0432\u0432\u043e\u0434 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u043d\u0435\u0434\u043e\u0437\u0432\u043e\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0442\u0438\u043f\u0430 \u0438 \u043d\u0435 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u043d\u0438 \u043e\u0434\u043d\u043e\u043c\u0443 \u0438\u0437 \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432, AutoCAD \u043f\u0440\u0435\u0434\u043b\u043e\u0436\u0438\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044e \u043f\u043e\u0432\u0442\u043e\u0440\u0438\u0442\u044c \u0432\u0432\u043e\u0434.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0421\u043f\u0438\u0441\u043e\u043a \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0442\u0430\u043a\u043e\u0439 \u0444\u043e\u0440\u043c\u044b :&#187;Key1 KEy2 KEY3,ABBREV3&#8243;. \u041e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0435 \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0435 \u0441\u043b\u043e\u0432\u0430 \u043e\u0442\u0434\u0435\u043b\u044f\u044e\u0442\u0441\u044f \u043f\u0440\u043e\u0431\u0435\u043b\u0430\u043c\u0438. \u0421\u043e\u043a\u0440\u0430\u0449\u0435\u043d\u0438\u0435 \u043d\u0435\u043e\u0431\u044f\u0437\u0430\u0442\u0435\u043b\u044c\u043d\u043e \u0438 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u044b \u0434\u0432\u0430 \u0441\u043f\u043e\u0441\u043e\u0431\u0430 \u0441\u043f\u0435\u0446\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f. \u041d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u0430\u044f \u0434\u043b\u044f \u0432\u0432\u043e\u0434\u0430 \u0447\u0430\u0441\u0442\u044c \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0433\u043e \u0441\u043b\u043e\u0432\u0430 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0432\u044b\u0434\u0435\u043b\u0435\u043d\u0430 \u0437\u0430\u0433\u043b\u0430\u0432\u043d\u044b\u043c\u0438 \u0431\u0443\u043a\u0432\u0430\u043c\u0438, \u043e\u0441\u0442\u0430\u043b\u044c\u043d\u0430\u044f \u0447\u0430\u0441\u0442\u044c \u0441\u0442\u0440\u043e\u0447\u043d\u044b\u043c\u0438 \u0438\u043b\u0438 \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u0430\u044f \u0447\u0430\u0441\u0442\u044c \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043f\u043e\u0432\u0442\u043e\u0440\u0435\u043d\u0430 \u0447\u0435\u0440\u0435\u0437 \u0437\u0430\u043f\u044f\u0442\u0443\u044e \u043f\u043e\u0441\u043b\u0435 \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0433\u043e \u0441\u043b\u043e\u0432\u0430. \u0412\u0442\u043e\u0440\u043e\u0439 \u0441\u043f\u043e\u0441\u043e\u0431 \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u0435\u0442\u0441\u044f \u0432 \u0441\u043b\u0443\u0447\u0430\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f \u0438\u043d\u043e\u0441\u0442\u0440\u0430\u043d\u043d\u043e\u0433\u043e \u044f\u0437\u044b\u043a\u0430, \u0433\u0434\u0435 \u043f\u0435\u0440\u0435\u0445\u043e\u0434 \u0438\u0437 \u043f\u0440\u043e\u043f\u0438\u0441\u043d\u044b\u0445 \u0432 \u0437\u0430\u0433\u043b\u0430\u0432\u043d\u044b\u0435 \u0431\u0443\u043a\u0432\u044b \u0441\u043b\u043e\u0436\u0435\u043d \u0438\u043b\u0438 \u043d\u0435\u0432\u043e\u0437\u043c\u043e\u0436\u0435\u043d . \u0412 \u043e\u0431\u043e\u0438\u0445 \u0441\u043b\u0443\u0447\u0430\u044f\u0445 \u0434\u043b\u0438\u043d\u0430 \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u043e\u0439 \u0447\u0430\u0441\u0442\u0438 &#8212; \u043c\u0438\u043d\u0438\u043c\u0430\u043b\u044c\u043d\u0430\u044f \u0434\u043b\u0438\u043d\u0430, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0434\u043e\u043b\u0436\u043d\u0430 \u0431\u044b\u0442\u044c \u0434\u043b\u044f \u0442\u043e\u0447\u043d\u043e\u0433\u043e \u0440\u0430\u0437\u043b\u0438\u0447\u0435\u043d\u0438\u044f. (\u0414\u043b\u044f \u043c\u0435\u0442\u043e\u0434\u0430 \u0441 \u0440\u0430\u0437\u0434\u0435\u043b\u0435\u043d\u0438\u0435\u043c \u0437\u0430\u043f\u044f\u0442\u043e\u0439 \u043f\u043e\u0434\u0440\u0430\u0437\u0443\u043c\u0435\u0432\u0430\u0435\u0442\u0441\u044f, \u0447\u0442\u043e \u0441\u043e\u043a\u0440\u0430\u0449\u0435\u043d\u0438\u0435 &#8212; \u044d\u0442\u043e \u043d\u0430\u0447\u0430\u043b\u043e \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0433\u043e<\/span> <span style=\"font-family: Times New Roman\">\u0441\u043b\u043e\u0432\u0430.)<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">&#171;LTYPE,LT&#187;<\/span><span style=\"font-family: Times New Roman\"> \u0438 <\/span><span style=\"font-family: Courier New\">&#171;LType&#187;<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u044b\u0435 \u0441\u043f\u0435\u0446\u0438\u0444\u0438\u043a\u0430\u0446\u0438\u0438. \u0411\u0443\u0434\u0435\u0442 \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u044c\u0441\u044f \u043b\u044e\u0431\u043e\u0439 \u0432\u0432\u043e\u0434 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u0438\u0437 &#171;LTYPE&#187;, &#171;LTYP&#187;, &#171;LTY&#187; \u0438\u043b\u0438 &#171;LT&#187;, \u043d\u043e &#171;L&#187; \u043d\u0435\u0434\u043e\u0441\u0442\u0430\u0442\u043e\u0447\u043d\u043e, \u043d\u0435 \u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0442 \u0438 &#171;LTSCALE&#187; &#171;LTYPEX&#187;.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0420\u0430\u0441\u0441\u043c\u043e\u0442\u0440\u0438\u043c \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0443\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u044e, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u0443\u044e \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun getnum (\/ x)<\/p>\n<p align=\"JUSTIFY\">(initget 1 &#171;Pi Two-pi&#187;)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq x (getreal &#171;pi\/Two-pi\/&lt;\u0447\u0438\u0441\u043b\u043e&gt;:&#187;))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(cond ((eq x &#171;Pi&#187;) pi)<\/p>\n<p align=\"JUSTIFY\">((eq x &#171;Two-pi:&#187;) (* 2.0 pi))<\/p>\n<p align=\"JUSTIFY\">(T x)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0417\u0434\u0435\u0441\u044c INITGET \u043f\u0440\u0435\u043f\u044f\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u043f\u0443\u0441\u0442\u043e\u043c\u0443 \u0432\u0432\u043e\u0434\u0443 \u0438 \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0441\u043f\u0438\u0441\u043e\u043a \u0438\u0437 \u0434\u0432\u0443\u0445 \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432 &#171;Pi&#187; \u0438 &#171;Two-pi&#187;. \u0417\u0430\u0442\u0435\u043c \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f GETREAL \u0434\u043b\u044f \u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f \u0432\u0435\u0449\u0435\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0433\u043e \u0447\u0438\u0441\u043b\u0430 \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0438 &#171;Pi\/Two-pi\/&lt;\u0447\u0438\u0441\u043b\u043e&gt;:&#187; \u0438 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u043f\u043e\u043c\u0435\u0449\u0430\u0435\u0442\u0441\u044f \u0432 \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0439 \u0441\u0438\u043c\u0432\u043e\u043b \u0425. \u0415\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u0432\u0432\u043e\u0434\u0438\u0442 \u0447\u0438\u0441\u043b\u043e, \u044d\u0442\u043e \u0447\u0438\u0441\u043b\u043e \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 GETNUM. \u041e\u0434\u043d\u0430\u043a\u043e, \u0435\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u0432\u0432\u043e\u0434\u0438\u0442 \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0435 \u0441\u043b\u043e\u0432\u043e &#171;Pi&#187; (\u0438\u043b\u0438 \u043f\u0440\u043e\u0441\u0442\u043e &#171;P&#187;), GETPOINT \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043a\u043b\u044e\u0447\u0435\u0432\u043e\u0435 \u0441\u043b\u043e\u0432\u043e &#171;Pi&#187;. \u0424\u0443\u043d\u043a\u0446\u0438\u044f<\/span> <span style=\"font-family: Times New Roman\">COND \u0444\u0438\u043a\u0441\u0438\u0440\u0443\u0435\u0442 \u044d\u0442\u043e \u0438 \u0432 \u044d\u0442\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 pi. \u041a\u043b\u044e\u0447\u0435\u0432\u043e\u0435 \u0441\u043b\u043e\u0432\u043e &#171;Two-pi&#187; \u0442\u0440\u0430\u043a\u0442\u0443\u0435\u0442\u0441\u044f \u0430\u043d\u0430\u043b\u043e\u0433\u0438\u0447\u043d\u043e.<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u0421\u043f\u0438\u0441\u043e\u043a \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u0445 \u0441\u0438\u0433\u043d\u0430\u043b\u043e\u0432 \u0438 \u043a\u043b\u044e\u0447\u0435\u0432\u044b\u0445 \u0441\u043b\u043e\u0432, \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u043c\u044b\u0435 INITGET, \u043f\u0440\u0438\u043c\u0435\u043d\u0438\u043c\u044b \u0442\u043e\u043b\u044c\u043a\u043e \u043a \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c\u0443 \u0437\u0430 INITGET \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u043c\u043e\u043c\u0443 GETxxx \u0438 \u0437\u0430\u0442\u0435\u043c \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u0441\u0431\u0440\u0430\u0441\u044b\u0432\u0430\u044e\u0442\u0441\u044f. \u042d\u0442\u043e \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 Getxxx-\u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0438\u0437\u0431\u0435\u0436\u0430\u0442\u044c \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u043e\u0441\u0442\u0438 \u043f\u0440\u0438 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c \u0432\u044b\u0437\u043e\u0432\u0435 \u043e\u0447\u0438\u0449\u0430\u0442\u044c \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u044c\u043d\u044b\u0435 \u0441\u043e\u0441\u0442\u043e\u044f\u043d\u0438\u044f.<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260934\"><\/a>(insers<br \/>\n&lt;\u0442\u043e\u0447\u043a\u04301&gt; &lt;\u0442\u043e\u0447\u043a\u04302&gt; &lt;\u0442\u043e\u0447\u043a\u04303&gt; &lt;\u0442\u043e\u0447\u043a\u04304&gt; [&lt;onseg&gt;])<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f INTERS \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 \u0434\u0432\u0430 \u043e\u0442\u0440\u0435\u0437\u043a\u0430 \u043d\u0430 \u043f\u0435\u0440\u0435\u0441\u0435\u0447\u0435\u043d\u0438\u0435 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0442\u043e\u0447\u043a\u0443 \u043f\u0435\u0440\u0435\u0441\u0435\u0447\u0435\u043d\u0438\u044f \u0438\u043b\u0438 nil, \u0435\u0441\u043b\u0438 \u043e\u043d\u0438 \u043d\u0435 \u043f\u0435\u0440\u0435\u0441\u0435\u043a\u0430\u044e\u0442\u0441\u044f. &lt;\u0422\u043e\u0447\u043a\u04301&gt; \u0438 &lt;\u0442\u043e\u0447\u043a\u04302&gt; \u043a\u0440\u0430\u0439\u043d\u0438\u0435 \u0442\u043e\u0447\u043a\u0438 \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u043e\u0442\u0440\u0435\u0437\u043a\u0430, &lt;\u0442\u043e\u0447\u043a\u04303&gt; &lt;\u0442\u043e\u0447\u043a\u04304&gt; &#8212; \u043a\u0440\u0430\u0439\u043d\u0438\u0435 \u0442\u043e\u0447\u043a\u0438 \u0432\u0442\u043e\u0440\u043e\u0433\u043e \u043e\u0442\u0440\u0435\u0437\u043a\u0430. \u0415\u0441\u043b\u0438 \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;onseg&gt; \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0438 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f nil, \u0442\u043e \u043e\u0442\u0440\u0435\u0437\u043a\u0438 \u0431\u0443\u0434\u0443\u0442 \u0432\u043e\u0441\u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u044c\u0441\u044f \u0431\u0435\u0441\u043a\u043e\u043d\u0435\u0447\u043d\u043e\u0439 \u0434\u043b\u0438\u043d\u044b \u0438 INTERS \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0442\u044c \u0442\u043e\u0447\u043a\u0443 \u043f\u0435\u0440\u0435\u0441\u0435\u0447\u0435\u043d\u0438\u044f \u0434\u0430\u0436\u0435, \u0435\u0441\u043b\u0438 \u043e\u043d\u0430 \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0437\u0430 \u043a\u0440\u0430\u0439\u043d\u0438\u043c\u0438 \u0442\u043e\u0447\u043a\u0430\u043c\u0438 \u043e\u0434\u043d\u043e\u0433\u043e \u0438\u043b\u0438 \u043e\u0431\u043e\u0438\u0445 \u043e\u0442\u0440\u0435\u0437\u043a\u043e\u0432. \u0415\u0441\u043b\u0438 \u0436\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;onseg&gt; \u043e\u0442\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0438\u043b\u0438 \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f nil, \u0442\u043e \u0442\u043e\u0447\u043a\u0430 \u043f\u0435\u0440\u0435\u0441\u0435\u0447\u0435\u043d\u0438\u044f \u0434\u043e\u043b\u0436\u043d\u0430 \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u043d\u0430 \u043e\u0431\u043e\u0438\u0445 \u043e\u0442\u0440\u0435\u0437\u043a\u0430\u0445 \u0438\u043b\u0438 INTERS \u0432\u0435\u0440\u043d\u0435\u0442 ni<\/span>l.<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a &#8216;(1.0 1.0) b &#8216;(9.0 9.0))<\/p>\n<p align=\"JUSTIFY\">(setq c &#8216;(4.0 1.0) c &#8216;(4.0 2.0))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(inters a b c d)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">inters a b c d T) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">inters a b c d nil)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (4.000000 4.000000)<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260935\"><\/a>(itoa<br \/>\n&lt;\u0446\u0435\u043b\u043e\u0435&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u0446\u0435\u043b\u043e\u0433\u043e \u0447\u0438\u0441\u043b\u0430 \u0432 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0443\u044e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(itoa 33) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;33&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(itoa -17)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;-17&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260936\"><\/a>(lambda<br \/>\n&lt;\u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 &#171;\u0430\u043d\u043e\u043d\u0438\u043c\u043d\u0443\u044e&#187; \u0444\u0443\u043d\u043a\u0446\u0438\u044e. \u041e\u043d\u0430 \u043e\u0431\u044b\u0447\u043d\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f, \u043a\u043e\u0433\u0434\u0430 \u043f\u0440\u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0438 \u043d\u043e\u0432\u0430\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043d\u0435 \u0438\u043c\u0435\u043d\u0443\u0435\u0442\u0441\u044f. \u042d\u0442\u043e \u0442\u0430\u043a \u0436\u0435 \u0434\u0435\u043b\u0430\u0435\u0442 \u0437\u0430\u043c\u044b\u0441\u0435\u043b \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0438\u0441\u0442\u0430 \u0431\u043e\u043b\u0435\u0435 \u043e\u0447\u0435\u0432\u0438\u0434\u043d\u044b\u043c, \u0437\u0430 \u0441\u0447\u0435\u0442 \u0442\u043e\u0433\u043e, \u0447\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0442\u0430\u043c \u0436\u0435, \u0433\u0434\u0435 \u043e\u043d\u0430 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f. LAMBDA \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f&gt; \u0438 \u0447\u0430\u0441\u0442\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0432 \u0441\u0432\u044f\u0437\u0438 \u0441 APPLY \u0438\/\u0438\u043b\u0438 MAPCAR \u0434\u043b\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043d\u0430\u0434 \u0441\u043f\u0438\u0441\u043a\u043e\u043c.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(apply &#8216;(lambda (x y z)<\/p>\n<p align=\"JUSTIFY\">(* x (-y z))<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">&#8216;(5 20 14)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> ) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 30<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u0438:<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(mapcar &#8216;(lambda (x)<\/p>\n<p align=\"JUSTIFY\">(setq counter (1+ counter))<\/p>\n<p align=\"JUSTIFY\">(* x 5)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">&#8216;(24 -6 10.2)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> ) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (10 20 -30 51.000000)<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260937\"><\/a>(last<br \/>\n&lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0441\u043f\u0438\u0441\u043a\u0430. &lt;\u0421\u043f\u0438\u0441\u043e\u043a&gt; \u043d\u0435 \u0434\u043e\u043b\u0436\u0435\u043d \u0431\u044b\u0442\u044c \u0440\u0430\u0432\u0435\u043d nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(last &#8216;(a b c d e))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 E<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(last &#8216;(a b c (d e)))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (D E)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u0430\u043a \u0432\u0438\u0434\u043d\u043e, LAST \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043b\u0438\u0431\u043e \u0430\u0442\u043e\u043c, \u043b\u0438\u0431\u043e \u0441\u043f\u0438\u0441\u043e\u043a.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430 \u043f\u0435\u0440\u0432\u044b\u0439 \u0432\u0437\u0433\u043b\u044f\u0434 LAST \u043c\u043e\u0436\u0435\u0442 \u044f\u0432\u043b\u044f\u0442\u044c\u0441\u044f \u0445\u043e\u0440\u043e\u0448\u0438\u043c \u043f\u0443\u0442\u0435\u043c \u0434\u043b\u044f \u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b Y \u0442\u043e\u0447\u043a\u0438. \u0425\u043e\u0442\u044f \u044d\u0442\u043e \u0442\u0430\u043a \u0434\u043b\u044f 2-\u0445 \u043c\u0435\u0440\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a (\u0441\u043f\u0438\u0441\u043e\u043a \u0438\u0437 2-\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b). LAST \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0442\u044c \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0443 Z \u0432 \u0441\u043b\u0443\u0447\u0430\u0435 3-\u0445 \u043c\u0435\u0440\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438. \u0427\u0442\u043e\u0431\u044b \u0432\u0430\u0448\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0440\u0430\u0431\u043e\u0442\u0430\u043b\u0438, \u043a\u0430\u043a \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u043f\u0440\u0438 \u0437\u0430\u0434\u0430\u043d\u0438\u0438 \u0438 2-\u0445 \u043c\u0435\u0440\u043d\u044b\u0445 \u0438 3-\u0445 \u043c\u0435\u0440\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a, \u043c\u044b \u0440\u0435\u043a\u043e\u043c\u0435\u043d\u0434\u0443\u0435\u043c \u0432\u0430\u043c \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c CADR \u0434\u043b\u044f \u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b Y \u0438 CADDR \u0434\u043b\u044f \u0438\u0437\u0432\u043b\u0435\u0447\u0435\u043d\u0438\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b Z.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260938\"><\/a>(length<br \/>\n&lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e, \u043e\u0437\u043d\u0430\u0447\u0430\u044e\u0449\u0435\u0435 \u0447\u0438\u0441\u043b\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u0432 &lt;\u0441\u043f\u0438\u0441\u043a\u0435&gt;.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(length &#8216;(a b c d))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 4<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(length &#8216;(a b (c d)))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(length &#8216;())<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260939\"><\/a><br \/>\n(list &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0431\u0435\u0440\u0435\u0442 \u043b\u044e\u0431\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439 (&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;) \u0438 \u043e\u0440\u0433\u0430\u043d\u0438\u0437\u0443\u0435\u0442 \u0438\u0437 \u043d\u0438\u0445 \u0441\u0442\u0440\u043e\u043a\u0443, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u044f \u0441\u043f\u0438\u0441\u043e\u043a.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(list &#8216;a &#8216;b &#8216;c)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B C)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(list &#8216;a &#8216;(b c) &#8216;d)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A (B C) D)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(list 3.9 6.7) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (3.90000 6.70000)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412 AutoLISP \u044d\u0442\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0447\u0430\u0441\u0442\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044e\u0442\u0441\u044f \u0434\u043b\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 2-\u0445 \u0438 3-\u0445 \u043c\u0435\u0440\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a (\u0441\u043f\u0438\u0441\u043e\u043a \u0438\u0437 2-\u0445 \u0438\u043b\u0438 3-\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b).<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260940\"><\/a>(listp<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T, \u0435\u0441\u043b\u0438 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; \u0441\u043f\u0438\u0441\u043e\u043a, \u0438\u043d\u0430\u0447\u0435 nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(listp &#8216;(a b c))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(listp &#8216;a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(listp 4.343)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260941\"><\/a>(load<br \/>\n&lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u0433\u0440\u0443\u0436\u0430\u0435\u0442 \u0444\u0430\u0439\u043b \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439 AutoLISP\u0430 \u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u044d\u0442\u0438 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f. &lt;\u0418\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; &#8212; \u044d\u0442\u043e \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u0442 \u0441\u043e\u0431\u043e\u0439 \u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430 \u0431\u0435\u0437 \u0440\u0430\u0441\u0448\u0438\u0440\u0435\u043d\u0438\u044f (\u043f\u043e\u0434\u0440\u0430\u0437\u0443\u043c\u0435\u0432\u0430\u0435\u0442\u0441\u044f \u0440\u0430\u0441\u0448\u0438\u0440\u0435\u043d\u0438\u0435 &#171;.lsp&#187;). &lt;\u0418\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; \u043c\u043e\u0436\u0435\u0442 \u0432\u043a\u043b\u044e\u0447\u0430\u0442\u044c \u043f\u0440\u0435\u0444\u0438\u043a\u0441 \u0434\u0438\u0440\u0435\u043a\u0442\u043e\u0440\u0438\u0438, \u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440 &#171;<\/span>\/<span style=\"font-family: Times New Roman\">function\/test1&#8243;. \u041d\u0430 \u0441\u0438\u0441\u0442\u0435\u043c\u0430\u0445 MS-DOS\/PS-DOS \u0434\u043e\u043f\u0443\u0441\u043a\u0430\u0435\u0442\u0441\u044f \u0442\u0430\u043a \u0436\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0431\u0443\u043a\u0432\u0443 \u0443\u0441\u0442\u0440\u043e\u0439\u0441\u0442\u0432\u0430 \u0432\u0432\u043e\u0434\u0430\/\u0432\u044b\u0432\u043e\u0434\u0430 \u0438 \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u043e\u0431\u0440\u0430\u0442\u043d\u043e\u0439 \u043a\u043e\u0441\u043e\u0439 \u0447\u0435\u0440\u0442\u043e\u0439 \u0432\u043c\u0435\u0441\u0442\u043e \u043f\u0440\u044f\u043c\u043e\u0439 \u043a\u043e\u0441\u043e\u0439 \u0447\u0435\u0440\u0442\u044b (\u043d\u043e \u043f\u043e\u043c\u043d\u0438\u0442\u0435, \u0447\u0442\u043e\u0431\u044b \u0432\u0432\u0435\u0441\u0442\u0438 \u0432 \u0441\u0442\u0440\u043e\u043a\u0443 \u043e\u0434\u043d\u0443 \u043e\u0431\u0440\u0430\u0442\u043d\u0443\u044e \u0447\u0435\u0440\u0442\u0443 \u0432\u044b \u0434\u043e\u043b\u0436\u043d\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c<\/span> &#171;\\\\&#187;).<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u044f \u0443\u0441\u043f\u0435\u0448\u043d\u043e \u0437\u0430\u0432\u0435\u0440\u0448\u0435\u043d\u0430, LOAD \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u043e\u0439 \u0432 \u0444\u0430\u0439\u043b\u0435. \u0415\u0441\u043b\u0438 \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u044f \u043d\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0430, LOAD \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430 \u0432 \u0432\u0438\u0434\u0435 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u043e\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u043f\u0440\u0435\u0434\u043f\u043e\u043b\u043e\u0436\u0438\u043c, \u0447\u0442\u043e \u0444\u0430\u0439\u043b &#171;\/fred\/test1.lsp&#187; \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 DEFUN, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0449\u0443\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u044e MY-FUNC, \u0438 \u0447\u0442\u043e \u0444\u0430\u0439\u043b &#171;test2.lsp&#187; \u043d\u0435 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(load &#171;\/fred\/test1&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 MY-FUNC<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(load &#171;test2&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;test2&#187;<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f LOAD \u043d\u0435 \u043c\u043e\u0436\u0435\u0442 \u0432\u044b\u0437\u044b\u0432\u0430\u0442\u044c\u0441\u044f \u0438\u0437 \u0434\u0440\u0443\u0433\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 LISP. \u041e\u043d\u0430 \u0434\u043e\u043b\u0436\u043d\u0430 \u0432\u044b\u0437\u044b\u0432\u0430\u0442\u044c\u0441\u044f \u043d\u0435\u043f\u043e\u0441\u0440\u0435\u0434\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u0441 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b (\u0438\u043b\u0438 \u0438\u0437 \u043c\u0435\u043d\u044e \u0438\u043b\u0438 \u0441\u043a\u0440\u0438\u043f\u0442-\u0444\u0430\u0439\u043b\u0430), \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f \u043a\u0430\u043a \u043d\u0438 \u043e\u0434\u043d\u0430 \u0434\u0440\u0443\u0433\u0430\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f LISP \u043d\u0435 \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0432 \u043f\u0440\u043e\u0446\u0435\u0441\u0441\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041a\u0430\u0436\u0434\u044b\u0439 \u0440\u0430\u0437, \u043a\u043e\u0433\u0434\u0430 \u0420\u0435\u0434\u0430\u043a\u0442\u043e\u0440 \u0427\u0435\u0440\u0442\u0435\u0436\u0435\u0439 AutoCAD \u043d\u0430\u0447\u0438\u043d\u0430\u0435\u0442 \u043e\u0447\u0435\u0440\u0435\u0434\u043d\u043e\u0439 \u0441\u0435\u0430\u043d\u0441, AutoLISP \u0437\u0430\u0433\u0440\u0443\u0436\u0430\u0435\u0442 \u0444\u0430\u0439\u043b &#171;acad.lsp&#187;, \u0435\u0441\u043b\u0438 \u043e\u043d \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u043f\u043e\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0438 \u0447\u0430\u0441\u0442\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u043c\u044b\u0435 \u043a\u043e\u043c\u0430\u043d\u0434\u044b \u0432 \u044d\u0442\u043e\u0442 \u0444\u0430\u0439\u043b, \u0438 \u043e\u043d\u0438 \u0431\u0443\u0434\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u043d\u044f\u0442\u044c\u0441\u044f \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438, \u043a\u043e\u0433\u0434\u0430 \u0432\u044b \u0431\u0443\u0434\u0435\u0442\u0435 \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0447\u0435\u0440\u0442\u0435\u0436\u0438.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260942\"><\/a>(log<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043d\u0430\u0442\u0443\u0440\u0430\u043b\u044c\u043d\u044b\u0439 \u043b\u043e\u0433\u0430\u0440\u0438\u0444\u043c &lt;\u0447\u0438\u0441\u043b\u0430&gt; \u043a\u0430\u043a \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(log 4.5)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 1.504077<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(log 1.22)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.198850<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260943\"><\/a>(logand<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt; &#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f \u043f\u043e\u0431\u0438\u0442\u043e\u0432\u043e\u0433\u043e \u0418 \u043d\u0430\u0434 \u0441\u043f\u0438\u0441\u043a\u043e\u043c &lt;\u0447\u0438\u0441\u0435\u043b&gt;. \u042d\u0442\u0438 &lt;\u0447\u0438\u0441\u043b\u0430&gt; \u0434\u043e\u043b\u0436\u043d\u044b \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u044b\u0435 \u0438 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 &#8212; \u0442\u0430\u043a \u0436\u0435 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(logand 7 15 3) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 3<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(logand 2 3 15)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(logand 8 3 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260944\"><\/a>(logior<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt; &#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f \u043f\u043e\u0431\u0438\u0442\u043e\u0432\u043e\u0433\u043e \u0418\u041b\u0418 \u043d\u0430\u0434 \u0441\u043f\u0438\u0441\u043a\u043e\u043c &lt;\u0447\u0438\u0441\u0435\u043b&gt;. &lt;\u0427\u0438\u0441\u043b\u0430&gt; \u0434\u043e\u043b\u0436\u043d\u044b \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u044b\u0435 \u0438 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0442\u0430\u043a \u0436\u0435 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(logior 1 2 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 7<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(logior 9 3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 11<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260945\"><\/a>(lsh<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e1&gt; &lt;\u0447\u0438\u0441\u043b\u043e \u0431\u0438\u0442&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u043e\u0431\u0438\u0442\u043e\u0432\u044b\u0439 \u0441\u0434\u0432\u0438\u0433 &lt;\u0447\u0438\u0441\u043b\u04301&gt; \u043d\u0430 &lt;\u0447\u0438\u0441\u043b\u043e \u0431\u0438\u0442&gt;. &lt;\u0427\u0438\u0441\u043b\u043e1&gt; \u0438 &lt;\u0447\u0438\u0441\u043b\u043e \u0431\u0438\u0442&gt; \u0434\u043e\u043b\u0436\u043d\u044b \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u044b\u043c\u0438 \u0438 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 &#8212; \u0442\u043e\u0436\u0435 \u0446\u0435\u043b\u043e\u0435.<\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 &lt;\u0447\u0438\u0441\u043b\u043e \u0431\u0438\u0442&gt; \u043f\u043e\u043b\u043e\u0436\u0438\u0442\u0435\u043b\u044c\u043d\u043e, \u0442\u043e &lt;\u0447\u0438\u0441\u043b\u043e1&gt; \u0441\u0434\u0432\u0438\u0433\u0430\u0435\u0442\u0441\u044f \u0432\u043b\u0435\u0432\u043e; \u0435\u0441\u043b\u0438 \u043e\u0442\u0440\u0438\u0446\u0430\u0442\u0435\u043b\u044c\u043d\u043e &#8212; \u0442\u043e \u0432\u043f\u0440\u0430\u0432\u043e. \u0412 \u043a\u0430\u0436\u0434\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 &#171;\u043d\u0443\u043b\u0435\u0432\u044b\u0435&#187; \u0431\u0438\u0442\u044b \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u044e\u0442\u0441\u044f, \u0430 \u0441\u0434\u0432\u0438\u0433\u0430\u0435\u043c\u044b\u0435 \u0431\u0438\u0442\u044b \u0441\u0431\u0440\u0430\u0441\u044b\u0432\u0430\u044e\u0442\u0441\u044f. \u0415\u0441\u043b\u0438 &#171;\u0435\u0434\u0438\u043d\u0438\u0447\u043d\u044b\u0439&#187; \u0431\u0438\u0442 \u0441\u0434\u0432\u0438\u0433\u0430\u0435\u0442\u0441\u044f \u0432 \u0432\u044b\u0441\u0448\u0438\u0439 (16-\u0439) \u0440\u0430\u0437\u0440\u044f\u0434 \u0446\u0435\u043b\u043e\u0433\u043e \u0447\u0438\u0441\u043b\u0430, \u0437\u043d\u0430\u043a \u0447\u0438\u0441\u043b\u0430 \u043c\u0435\u043d\u044f\u0435\u0442\u0441\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(lsh 2 1)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 4<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(lsh 2 -1)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 1<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(lsh 40 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 160<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(lsh 16384 1)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 -32768<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260946\"><\/a>(mopcar<br \/>\n&lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a1&gt;&#8230;&lt;\u0441\u043f\u0438\u0441\u043e\u043an&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u0438&gt; \u043d\u0430\u0434 \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u043c\u0438 \u043e\u0442 &lt;\u0441\u043f\u0438\u0441\u043a\u04301&gt; \u0434\u043e &lt;\u0441\u043f\u0438\u0441\u043a\u0430 n&gt; \u0432\u0432\u043e\u0434\u0438\u043c\u044b\u043c\u0438 \u043a\u0430\u043a \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u0432 &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044e&gt;. \u0427\u0438\u0441\u043b\u043e &lt;\u0441\u043f\u0438\u0441\u043a\u043e\u0432&gt; \u0434\u043e\u043b\u0436\u043d\u043e \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c \u0447\u0438\u0441\u043b\u0443 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432, \u0442\u0440\u0435\u0431\u0443\u044e\u0449\u0438\u0445\u0441\u044f \u0434\u043b\u044f &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u0438&gt;.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(mapcar &#8216;1+ &#8216;(10 20 30))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (11 21 31)<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u044d\u0442\u043e \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e:<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(1+ 10)<\/p>\n<p align=\"JUSTIFY\">(1+ 20)<\/p>\n<p align=\"JUSTIFY\">(1+ 30)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u0440\u043e\u043c\u0435 \u0442\u043e\u0433\u043e, \u0447\u0442\u043e MAPCAR \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u043f\u0438\u0441\u043e\u043a \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u043e\u0432. \u0422\u0430\u043a \u0436\u0435:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(mapcar &#8216;+ &#8216;(10 20 30) &#8216;(4 3 2))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (14 23 32)<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u044d\u0442\u043e \u0442\u043e \u0436\u0435 \u0441\u0430\u043c\u043e\u0435, \u0447\u0442\u043e \u0438:<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(+ 10 4)<\/p>\n<p align=\"JUSTIFY\">(+ 20 3)<\/p>\n<p align=\"JUSTIFY\">(+ 30 2)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f LAMBDA \u043c\u043e\u0436\u0435\u0442 \u0437\u0430\u0434\u0430\u0432\u0430\u0442\u044c &#171;\u0430\u043d\u043e\u043d\u0438\u043c\u043d\u0443\u044e&#187; \u0444\u0443\u043d\u043a\u0446\u0438\u044e \u0434\u043b\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 MAPCAR. \u042d\u0442\u043e \u043f\u043e\u043b\u0435\u0437\u043d\u043e \u043a\u043e\u0433\u0434\u0430 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0438\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u044b \u0438\u043b\u0438 \u043f\u0435\u0440\u0435\u0434\u0430\u044e\u0442\u0441\u044f \u043a\u0430\u043a\u0438\u043c-\u043b\u0438\u0431\u043e \u0438\u043d\u044b\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(mapcar &#8216;(lambda (x) (+ x 3)) &#8216;(10 20 30))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (13 23 33)<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u0438:<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(mapcar &#8216;(lambda (x y z)<\/p>\n<p align=\"JUSTIFY\">(* x (- y z))<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">&#8216;(5 6) &#8216;(20 30) &#8216;(14 5.0)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> )<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (30 150.0<\/span>00000)<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260947\"><\/a>(max<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043d\u0430\u0438\u0431\u043e\u043b\u044c\u0448\u0435\u0435 \u0438\u0437 \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u0445 &lt;\u0447\u0438\u0441\u0435\u043b&gt;. \u041a\u0430\u0436\u0434\u043e\u0435 &lt;\u0447\u0438\u0441\u043b\u043e&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c \u0438\u043b\u0438 \u0446\u0435\u043b\u044b\u043c.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(max 4.07 -144)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 4.070000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(max -88 19 5 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 19<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260948\"><\/a>(member<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u0435\u0442 &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; &#8212; \u0432\u0441\u0442\u0440\u0435\u0447\u0430\u0435\u0442\u0441\u044f \u043b\u0438 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0447\u0430\u0441\u0442\u044c &lt;\u0441\u043f\u0438\u0441\u043a\u0430&gt;, \u043d\u0430\u0447\u0438\u043d\u0430\u044e\u0449\u0443\u044e\u0441\u044f \u0441 \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u043d\u0430\u0439\u0434\u0435\u043d\u043d\u043e\u0433\u043e &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f&gt;. \u0415\u0441\u043b\u0438 \u0432 &lt;\u0441\u043f\u0438\u0441\u043a\u0435&gt; \u043d\u0435\u0442 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f&gt;, MEMBER \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">member &#8216;c &#8216;(a b c d e))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (C D <\/span>E)<\/p>\n<p align=\"JUSTIFY\">(<span style=\"font-family: Courier New\">member &#8216;q &#8216;(a b c d e))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260949\"><\/a>(menucmd<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0434\u0430\u0435\u0442 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u044c LISP-\u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430\u043c \u043f\u0435\u0440\u0435\u043a\u043b\u044e\u0447\u0430\u0442\u044c\u0441\u044f \u0441\u0440\u0435\u0434\u0438 \u043f\u043e\u0434\u0441\u0442\u0440\u0430\u043d\u0438\u0446 \u0432 \u043c\u0435\u043d\u044e AutoCAD . \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c, LISP-\u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430 \u043c\u043e\u0436\u0435\u0442 \u0441\u043e\u0433\u043b\u0430\u0441\u043e\u0432\u0430\u043d\u043d\u043e \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0441 \u0437\u0430\u0433\u0440\u0443\u0436\u0435\u043d\u043d\u044b\u043c\u0438 \u0444\u0430\u0439\u043b\u0430\u043c\u0438 \u043c\u0435\u043d\u044e, \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u044f \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0435 \u043f\u043e\u0434\u043c\u0435\u043d\u044e \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f, \u043a\u043e\u0433\u0434\u0430 \u0442\u0440\u0435\u0431\u0443\u0435\u0442\u0441\u044f \u0432\u0432\u043e\u0434 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f. MENUCMD \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0432 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0439 \u0444\u043e\u0440\u043c\u0435:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0440\u0430\u0437\u0434\u0435\u043b = \u043f\u043e\u0434\u043c\u0435\u043d\u044e<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0433\u0434\u0435 \u0440\u0430\u0437\u0434\u0435\u043b \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442 \u0440\u0430\u0437\u0434\u0435\u043b \u043c\u0435\u043d\u044e. \u0414\u043e\u043f\u0443\u0441\u0442\u0438\u043c\u044b\u0435 \u0438\u043c\u0435\u043d\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">S \u0434\u043b\u044f \u044d\u043a\u0440\u0430\u043d\u043d\u043e\u0433\u043e (SCREEN) \u043c\u0435\u043d\u044e<\/p>\n<p align=\"JUSTIFY\">B \u0434\u043b\u044f \u043a\u043d\u043e\u043f\u043e\u0447\u043d\u043e\u0433\u043e (BUTTONS) \u043c\u0435\u043d\u044e<\/p>\n<p align=\"JUSTIFY\">I \u0434\u043b\u044f \u043f\u0438\u043a\u0442\u043e\u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u043e\u0433\u043e (ICON) \u043c\u0435\u043d\u044e<\/p>\n<p align=\"JUSTIFY\">P1-P10 \u0434\u043b\u044f \u043f\u0430\u0434\u0430\u044e\u0449\u0435\u0433\u043e (POP) \u043c\u0435\u043d\u044e \u0441 1 \u043f\u043e 10<\/p>\n<p align=\"JUSTIFY\">\u04221-\u04224 \u0434\u043b\u044f \u043c\u0435\u043d\u044e \u043f\u043b\u0430\u043d\u0448\u0435\u0442\u0430 (TABLET) \u0441 1 \u043f\u043e 4<\/p>\n<p align=\"JUSTIFY\">\u04101 \u0434\u043b\u044f \u0434\u043e\u0431\u0430\u0432\u043e\u0447\u043d\u043e\u0433\u043e (AUX1) \u043c\u0435\u043d\u044e<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u043f\u043e\u0434\u043c\u0435\u043d\u044e \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442, \u043a\u0430\u043a\u043e\u0435 \u043f\u043e\u0434\u043c\u0435\u043d\u044e \u0430\u043a\u0442\u0438\u0432\u0438\u0437\u0438\u0440\u043e\u0432\u0430\u0442\u044c. \u0418\u043c\u0435\u043d\u0435\u043c \u0434\u043e\u043b\u0436\u043d\u0430 \u0431\u044b\u0442\u044c \u043b\u0438\u0431\u043e \u043e\u0434\u043d\u0430 \u0438\u0437 \u043c\u0435\u0442\u043e\u043a \u043f\u043e\u0434\u043c\u0435\u043d\u044e (\u0431\u0435\u0437 &#171;**&#187;) \u0432 \u0442\u0435\u043a\u0443\u0449\u0435\u043c \u0437\u0430\u0433\u0440\u0443\u0436\u0435\u043d\u043d\u043e\u043c \u0444\u0430\u0439\u043b\u0435 \u0438\u043b\u0438 \u0438\u043c\u044f \u043e\u0434\u043d\u043e\u0433\u043e \u0438\u0437 \u0440\u0430\u0437\u0434\u0435\u043b\u043e\u0432 \u0413\u043b\u0430\u0432\u043d\u043e\u0433\u043e \u043c\u0435\u043d\u044e.<\/p>\n<p align=\"JUSTIFY\">\u0414\u043b\u044f \u0434\u0430\u043b\u044c\u043d\u0435\u0439\u0448\u0435\u0439 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u0438 \u0441\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u041f\u0440\u0438\u043b\u043e\u0436\u0435\u043d\u0438\u0435 \u0411 \u0420\u0443\u043a\u043e\u0432\u043e\u0434\u0441\u0442\u0432\u0430 AutoCAD. \u0417\u0430\u043c\u0435\u0442\u0438\u043c, \u0447\u0442\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u043c\u044b\u0439 \u0434\u043b\u044f \u0441\u0441\u044b\u043b\u043a\u0438 \u043d\u0430 \u043f\u043e\u0434\u043c\u0435\u043d\u044e \u0437\u043d\u0430\u043a &#171;$&#187; \u0432 \u0444\u0430\u0439\u043b\u0435 \u043c\u0435\u043d\u044e \u0437\u0434\u0435\u0441\u044c \u043d\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(menucmd &#171;S=OSNARP&#187;)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0431\u0443\u0434\u0435\u0442 \u043e\u0437\u043d\u0430\u0447\u0430\u0442\u044c, \u0447\u0442\u043e \u043f\u043e\u0434\u043c\u0435\u043d\u044e &#171;OSNAP&#187; \u043f\u043e\u044f\u0432\u0438\u0442\u0441\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 (\u0438\u043c\u0435\u0435\u0442\u0441\u044f \u0432 \u0432\u0438\u0434\u0443, \u0447\u0442\u043e \u0442\u0430\u043a\u043e\u0435 \u043f\u043e\u0434\u043c\u0435\u043d\u044e \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442 \u0432 \u0442\u0435\u043a\u0443\u0449\u0435\u043c \u0444\u0430\u0439\u043b\u0435 \u043c\u0435\u043d\u044e).<\/p>\n<p align=\"JUSTIFY\">\u0422\u0430\u043a \u0436\u0435:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(menucmd &#171;B=MY-BUTTONS&#187;)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0431\u0443\u0434\u0435\u0442 \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0442\u044c \u043f\u043e\u0434\u043c\u0435\u043d\u044e &#171;MY-BUTTONS&#187; \u043a\u043d\u043e\u043f\u043e\u0447\u043d\u043e\u043c\u0443 \u043c\u0435\u043d\u044e.<\/p>\n<p align=\"JUSTIFY\">\u0427\u0442\u043e \u043a\u0430\u0441\u0430\u0435\u0442\u0441\u044f \u043f\u0438\u043a\u0442\u043e\u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0445 \u0438 \u043f\u0430\u0434\u0430\u044e\u0449\u0438\u0445 \u043c\u0435\u043d\u044e, \u0442\u043e \u0434\u043b\u044f \u043d\u0438\u0445 \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c\u043e \u0438\u043c\u044f \u043f\u043e\u0434\u043c\u0435\u043d\u044e &#171;*&#187; \u0438 \u043e\u0437\u043d\u0430\u0447\u0430\u0435\u0442 \u043e\u043d\u043e \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u043d\u0438\u0435 \u043f\u043e\u0434\u043c\u0435\u043d\u044e \u0438\u0437 \u0442\u0435\u043a\u0443\u0449\u0435\u0433\u043e \u0440\u0430\u0437\u0434\u0435\u043b\u0430 \u043c\u0435\u043d\u044e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(menucmd &#171;P1=NUMERIC&#187;)<\/p>\n<p align=\"JUSTIFY\">(menucmd &#171;P1=*&#187;)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0432\u044b\u0431\u0435\u0440\u0435\u0442 \u043f\u043e\u0434\u043c\u0435\u043d\u044e &#171;NUMERIC&#187; \u0438\u0437 \u043f\u0430\u0434\u0430\u044e\u0449\u0435\u0433\u043e \u043c\u0435\u043d\u044e 1 \u0438 \u0432\u044b\u0441\u0432\u0435\u0442\u0438\u0442 \u0435\u0433\u043e \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">MENUCMD \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260950\"><\/a>(min<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0447\u0438\u0441\u043b\u043e&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043d\u0430\u0438\u043c\u0435\u043d\u044c\u0448\u0435\u0435 \u0438\u0437 \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u0445 &lt;\u0447\u0438\u0441\u0435\u043b&gt;. \u041a\u0430\u0436\u0434\u043e\u0435 &lt;\u0447\u0438\u0441\u043b\u043e&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c \u0438\u043b\u0438 \u0446\u0435\u043b\u044b\u043c.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(min 683 -10.0) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442-10.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(min 73 2 48 5) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u04422<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260951\"><\/a>(minusp<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T, \u0435\u0441\u043b\u0438 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0438\u043b\u0438 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0438\u043c\u0435\u044e\u0449\u0435\u0435 \u043e\u0442\u0440\u0438\u0446\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435, \u0438\u043d\u0430\u0447\u0435 \u043e\u043d\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. \u041e\u043d\u0430 \u043d\u0435 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0430 \u0434\u043b\u044f \u0434\u0440\u0443\u0433\u0438\u0445 \u0442\u0438\u043f\u043e\u0432 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432&gt;.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(minus -1) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442<\/span> T<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(minusp -4.293) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442<\/span> T<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(minusp 830.2) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442<\/span> nil<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260952\"><\/a>(not<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422, \u0435\u0441\u043b\u0438 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 &#8212; nil, \u0438\u043d\u0430\u0447\u0435 nil. \u041e\u0431\u044b\u0447\u043d\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f NULL \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u0441\u043f\u0438\u0441\u043a\u043e\u0432, \u0430 NOT \u0434\u043b\u044f \u0434\u0440\u0443\u0433\u0438\u0445 \u0442\u0438\u043f\u043e\u0432 \u0434\u0430\u043d\u043d\u044b\u0445 \u0432 \u0441\u0432\u044f\u0437\u0438 \u0441 \u043a\u0430\u043a\u0438\u043c-\u043b\u0438\u0431\u043e \u0442\u0438\u043f\u043e\u043c \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0439.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 123)<\/p>\n<p align=\"JUSTIFY\">(setq b &#171;string&#187;)<\/p>\n<p align=\"JUSTIFY\">(setq c nil)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(not a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(not b)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(not c)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(not &#8216;())<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260953\"><\/a>(nth<br \/>\n&lt;n&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;\u044d\u043d\u043d\u044b\u0439&#187; \u044d\u043b\u0435\u043c\u0435\u043d\u0442 &lt;\u0441\u043f\u0438\u0441\u043a\u0430&gt;, \u0433\u0434\u0435 &lt;n&gt; &#8212; \u043d\u043e\u043c\u0435\u0440 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 (\u043d\u043e\u043b\u044c &#8212; \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442). \u0415\u0441\u043b\u0438 &lt;n&gt; \u0431\u043e\u043b\u044c\u0448\u0435, \u0447\u0435\u043c \u043d\u043e\u043c\u0435\u0440 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 &lt;\u0441\u043f\u0438\u0441\u043a\u0430&gt;, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(nth 3 &#8216;(a b c d e)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 D<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(nth 0 &#8216;(a b c d e)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 A<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(nth 5 &#8216;(a b c d e)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260954\"><\/a>(null<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422, \u0435\u0441\u043b\u0438 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442\u0441\u044f \u0432 nil, \u0438\u043d\u0430\u0447\u0435 nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 123)<\/p>\n<p align=\"JUSTIFY\">(setq b &#171;string&#187;)<\/p>\n<p align=\"JUSTIFY\">(setq c nil)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(null a) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(null b<\/span><span style=\"font-family: Times New Roman\">) \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(null c) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(null &#8216;()) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172713\"><\/a><a name=\"_Ref465173541\"><\/a><a name=\"_Toc465260955\"><\/a><span style=\"font-family: Arial\">(number<\/span><span style=\"font-family: Arial\">p<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422, \u0435\u0441\u043b\u0438 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; &#8212; \u0446\u0435\u043b\u043e\u0435 \u0438\u043b\u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e, \u0438\u043d\u0430\u0447\u0435 nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 123)<\/p>\n<p align=\"JUSTIFY\">(setq b &#8216;a)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(numberp 4) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(numberp 3.8348) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(numberp &#171;Howdy&#187;) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(numberp &#8216;a) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(numberp a) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(numberp b) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(numberp (eval b)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260956\"><\/a><br \/>\n(open &lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; &lt;\u0440\u0435\u0436\u0438\u043c&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043e\u0442\u043a\u0440\u044b\u0432\u0430\u0435\u0442 \u0444\u0430\u0439\u043b \u0434\u043b\u044f \u0434\u043e\u0441\u0442\u0443\u043f\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0412\u0432\u043e\u0434\u0430\/\u0412\u044b\u0432\u043e\u0434\u0430 (I\/O) AutoLISP. \u041e\u043d\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430 \u0434\u043b\u044f \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f \u0434\u0440\u0443\u0433\u0438\u043c\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438 \u0412\u0432\u043e\u0434\u0430\/\u0412\u044b\u0432\u043e\u0434\u0430, \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u043e\u043d\u0430 \u0434\u043e\u043b\u0436\u043d\u0430 \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0442\u044c\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 SETQ<\/p>\n<p align=\"JUSTIFY\">\u0441\u0438\u043c\u0432\u043e\u043b\u0443.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a (open &#171;file.ext&#187; &#171;r&#187;))<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">&lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; &#8212; \u044d\u0442\u043e \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430, \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u044e\u0449\u0430\u044f \u0438\u043c\u044f \u0438 \u0440\u0430\u0441\u0448\u0438\u0440\u0435\u043d\u0438\u0435 \u043e\u0442\u043a\u0440\u044b\u0432\u0430\u0435\u043c\u043e\u0433\u043e \u0444\u0430\u0439\u043b\u0430. &lt;\u0420\u0435\u0436\u0438\u043c&gt; &#8212; \u044d\u0442\u043e \u0444\u043b\u0430\u0433 \u0447\u0442\u0435\u043d\u0438\u044f\/\u0437\u0430\u043f\u0438\u0441\u0438. \u042d\u0442\u043e \u0434\u043e\u043b\u0436\u043d\u0430 \u0431\u044b\u0442\u044c \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430, \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0430\u044f \u0438\u0437 \u043e\u0434\u043d\u043e\u0439 \u0431\u0443\u043a\u0432\u044b, \u043d\u0430\u0431\u0440\u0430\u043d\u043d\u043e\u0439 \u043d\u0430 \u043d\u0438\u0436\u043d\u0435\u043c \u0440\u0435\u0433\u0438\u0441\u0442\u0440\u0435. \u0414\u043e\u043f\u0443\u0441\u0442\u0438\u043c\u044b\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u0431\u0443\u043a\u0432 \u0440\u0435\u0436\u0438\u043c\u0430 \u043e\u043f\u0438\u0441\u044b\u0432\u0430\u044e\u0442\u0441\u044f \u0432 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0439 \u0442\u0430\u0431\u043b\u0438\u0446\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"812\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\"><span style=\"font-family: Times New Roman\">\u0420\u0435\u0436\u0438\u043c <\/span>OPEN<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u041e\u043f\u0438\u0441\u0430\u043d\u0438\u0435<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\">&#171;r&#187;<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041e\u0442\u043a\u0440\u044b\u0442\u044c \u0434\u043b\u044f \u0447\u0442\u0435\u043d\u0438\u044f. \u0415\u0441\u043b\u0438 &lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; \u043d\u0435 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f nil.<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\">\n<p align=\"CENTER\">&#171;w&#187;<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041e\u0442\u043a\u0440\u044b\u0442\u044c \u0434\u043b\u044f \u0437\u0430\u043f\u0438\u0441\u0438. \u0415\u0441\u043b\u0438 &lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; \u043d\u0435 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442, \u0441\u043e\u0437\u0434\u0430\u0435\u0442\u0441\u044f \u043d\u043e\u0432\u044b\u0439 \u0444\u0430\u0439\u043b \u0438 \u043e\u0442\u043a\u0440\u044b\u0432\u0430\u0435\u0442\u0441\u044f. \u0415\u0441\u043b\u0438 &lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430<\/span>&gt; <span style=\"font-family: Times New Roman\">\u0443\u0436\u0435 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442, \u043d\u0430\u0445\u043e\u0434\u044f\u0449\u0438\u0435\u0441\u044f \u0432 \u043d\u0435\u043c \u0434\u0430\u043d\u043d\u044b\u0435 \u0431\u0443\u0434\u0443\u0442 \u043f\u0435\u0440\u0435\u0437\u0430\u043f\u0438\u0441\u0430\u043d\u044b. <\/span><\/p>\n<p align=\"JUSTIFY\">\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"15%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">&#171;\u0430&#187;<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"85%\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041e\u0442\u043a\u0440\u044b\u0442\u044c \u0434\u043b\u044f \u0434\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u044f. \u0415\u0441\u043b\u0438 &lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; \u043d\u0435 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442, \u0441\u043e\u0437\u0434\u0430\u0435\u0442\u0441\u044f \u043d\u043e\u0432\u044b\u0439 \u0444\u0430\u0439\u043b \u0438 \u043e\u0442\u043a\u0440\u044b\u0432\u0430\u0435\u0442\u0441\u044f. \u0415\u0441\u043b\u0438 &lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; \u0443\u0436\u0435 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442, \u043e\u043d \u0431\u0443\u0434\u0435\u0442 \u043e\u0442\u043a\u0440\u044b\u0442 \u0438 \u043f\u043e\u043c\u0435\u0449\u0435\u043d \u0442\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c, \u0447\u0442\u043e \u043b\u044e\u0431\u044b\u0435 \u043d\u043e\u0432\u044b\u0435 \u0434\u0430\u043d\u043d\u044b\u0435 \u0431\u0443\u0434\u0443\u0442 \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0442\u044c\u0441\u044f \u0432 \u0444\u0430\u0439\u043b \u0432\u0441\u043b\u0435\u0434 \u0437\u0430 \u0443\u0436\u0435 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u043c\u0438. \u0412 \u0441\u0438\u0441\u0442\u0435\u043c\u0430\u0445 DOS \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u044b \u0438 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0435 \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440\u044b \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u044e\u0442 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0435 \u0444\u0430\u0439\u043b\u044b \u0441 \u043c\u0430\u0440\u043a\u0435\u0440\u043e\u043c \u043a\u043e\u043d\u0446\u0430 \u0444\u0430\u0439\u043b\u0430 (CTRL Z, \u0434\u0435\u0441\u044f\u0442\u0438\u0447\u043d\u044b\u0439 \u043a\u043e\u0434 ASCII 26) \u0432 \u043a\u043e\u043d\u0446\u0435 \u0442\u0435\u043a\u0441\u0442\u0430. \u0427\u0438\u0442\u0430\u044f \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0439 \u0444\u0430\u0439\u043b, DOS \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u043e\u0441\u0442\u043e\u044f\u043d\u0438\u0435 \u043a\u043e\u043d\u0446\u0430 \u0444\u0430\u0439\u043b\u0430, \u0435\u0441\u043b\u0438 \u0432\u0441\u0442\u0440\u0435\u0442\u0438\u0442 \u043c\u0430\u0440\u043a\u0435\u0440 CTRL Z, \u0434\u0430\u0436\u0435 \u0435\u0441\u043b\u0438 \u043f\u043e\u0441\u043b\u0435 \u043c\u0430\u0440\u043a\u0435\u0440\u0430 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u044e\u0442 \u0435\u0449\u0435 \u0434\u0430\u043d\u043d\u044b\u0435. \u0415\u0441\u043b\u0438 \u0432\u044b \u043d\u0430\u043c\u0435\u0440\u0435\u043d\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0440\u0435\u0436\u0438\u043c &#171;\u0430&#187; \u0444\u0443\u043d\u043a\u0446\u0438\u0438 <\/span>O<span style=\"font-family: Times New Roman\">PEN \u0434\u043b\u044f \u0434\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u044f \u0434\u0430\u043d\u043d\u044b\u0445 \u0432 \u0444\u0430\u0439\u043b\u044b, \u0441\u043e\u0437\u0434\u0430\u043d\u043d\u044b\u0435 \u0434\u0440\u0443\u0433\u0438\u043c\u0438 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430\u043c\u0438, \u0443\u0434\u043e\u0441\u0442\u043e\u0432\u0435\u0440\u044c\u0442\u0435\u0441\u044c, \u0447\u0442\u043e \u0434\u0440\u0443\u0433\u0430\u044f \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430 \u043d\u0435 \u0432\u0441\u0442\u0430\u0432\u0438\u043b\u0430 \u043c\u0430\u0440\u043a\u0435\u0440\u044b CTRL Z \u0432 \u043a\u043e\u043d\u0446\u0435 \u0441\u0432\u043e\u0438\u0445 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0445 \u0444\u0430\u0439\u043b\u043e\u0432. <\/span><\/p>\n<p align=\"JUSTIFY\">\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0435\u0434\u043f\u043e\u043b\u043e\u0436\u0438\u043c, \u0447\u0442\u043e \u043f\u043e\u0438\u043c\u0435\u043d\u043e\u0432\u0430\u043d\u043d\u044b\u0435 \u0444\u0430\u0439\u043b\u044b \u0432 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u043c \u043f\u0440\u0438\u043c\u0435\u0440\u0435 \u043d\u0435 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0442:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq f (open &#171;new.tst&#187; &#171;w&#187;)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &lt;File #nnn&gt;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq f (open &#171;nosuch.fil&#187; &#171;r&#187;)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq f (open &#171;longfile&#187; &#171;a&#187;)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &lt;File #nnn&gt;<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">&lt;\u0438\u043c\u044f \u0444\u0430\u0439\u043b\u0430&gt; \u043c\u043e\u0436\u0435\u0442 \u0432\u043a\u043b\u044e\u0447\u0430\u0442\u044c \u043f\u0440\u0435\u0444\u0438\u043a\u0441 \u0434\u0438\u0440\u0435\u043a\u0442\u043e\u0440\u0438\u0438, \u043a\u0430\u043a, \u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, &#171;\/test\/func3&#187;. \u041d\u0430 \u0441\u0438\u0441\u0442\u0435\u043c\u0430\u0445 MS-DOS\/PS-DOS \u0434\u043e\u043f\u0443\u0441\u043a\u0430\u0435\u0442\u0441\u044f \u0442\u0430\u043a \u0436\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0431\u0443\u043a\u0432\u0443 \u0443\u0441\u0442\u0440\u043e\u0439\u0441\u0442\u0432\u0430 \u0432\u0432\u043e\u0434\u0430\/\u0432\u044b\u0432\u043e\u0434\u0430 \u0438 \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u043e\u0431\u0440\u0430\u0442\u043d\u043e\u0439 \u043a\u043e\u0441\u043e\u0439 \u0447\u0435\u0440\u0442\u043e\u0439 \u0432\u043c\u0435\u0441\u0442\u043e \u043f\u0440\u044f\u043c\u043e\u0439 \u043a\u043e\u0441\u043e\u0439 \u0447\u0435\u0440\u0442\u044b (\u043d\u043e \u043f\u043e\u043c\u043d\u0438\u0442\u0435, \u0447\u0442\u043e\u0431\u044b \u0432\u0432\u0435\u0441\u0442\u0438 \u0432 \u0441\u0442\u0440\u043e\u043a\u0443 \u043e\u0434\u043d\u0443 \u043e\u0431\u0440\u0430\u0442\u043d\u0443\u044e \u0447\u0435\u0440\u0442\u0443 \u0432\u044b \u0434\u043e\u043b\u0436\u043d\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c &#171;\\\\&#187;).<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq f (open &#171;new.tst&#187; &#171;w&#187;)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &lt;File #nnn&gt;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq f (open &#171;nosuch.fil&#187; &#171;r&#187;)) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260957\"><\/a>(or<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043b\u043e\u0433\u0438\u0447\u0435\u0441\u043a\u043e\u0435 \u0418\u041b\u0418 \u0441\u043f\u0438\u0441\u043a\u0430 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439. OR \u043e\u0446\u0435\u043d\u0438\u0432\u0430\u0435\u0442 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0441\u043b\u0435\u0432\u0430 \u043d\u0430\u043f\u0440\u0430\u0432\u043e \u0434\u043e \u0442\u0435\u0445 \u043f\u043e\u0440, \u043f\u043e\u043a\u0430 \u043d\u0435 \u0432\u0441\u0442\u0440\u0435\u0442\u0438\u0442\u0441\u044f \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435, \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u043c\u043e\u0435 \u043d\u0435 \u0432 nil. \u0415\u0441\u043b\u0438 \u0442\u0430\u043a\u043e\u0435 \u043d\u0430\u0439\u0434\u0435\u043d\u043e, OR \u043f\u0440\u0435\u043a\u0440\u0430\u0449\u0430\u0435\u0442 \u0434\u0430\u043b\u044c\u043d\u0435\u0439\u0448\u0443\u044e \u043e\u0446\u0435\u043d\u043a\u0443 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T. \u0415\u0441\u043b\u0438 \u0432\u0441\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f nil, OR \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(or nil 45 &#8216;()) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(or nil &#8216;()) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260958\"><\/a>(osnap<br \/>\n&lt;\u0442\u043e\u0447\u043a\u0430&gt; &lt;\u0441\u0442\u0440\u043e\u043a\u0430-\u0440\u0435\u0436\u0438\u043c&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0442\u043e\u0447\u043a\u0443, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u043e\u043c \u043f\u0440\u0438\u043c\u0435\u043d\u0435\u043d\u0438\u044f \u043e\u0431\u044a\u0435\u043a\u0442\u043d\u043e\u0439 \u043f\u0440\u0438\u0432\u044f\u0437\u043a\u0438, \u0437\u0430\u0434\u0430\u0432\u0430\u0435\u043c\u043e\u0439 \u0432 &lt;\u0441\u0442\u0440\u043e\u043a\u0435-\u0440\u0435\u0436\u0438\u043c&gt; \u0434\u043b\u044f \u0442\u043e\u0447\u043a\u0438 &lt;\u0442\u043e\u0447\u043a\u0430&gt;. &lt;\u0441\u0442\u0440\u043e\u043a\u0430-\u0440\u0435\u0436\u0438\u043c&gt; &#8212; \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430, \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0430\u044f \u0438\u0437 \u043e\u0434\u043d\u043e\u0433\u043e \u0438\u043b\u0438 \u0431\u043e\u043b\u0435\u0435 \u0438\u0434\u0435\u043d\u0442\u0438\u0444\u0438\u043a\u0430\u0442\u043e\u0440\u043e\u0432 \u043e\u0431\u044a\u0435\u043a\u0442\u043d\u043e\u0439 \u043f\u0440\u0438\u0432\u044f\u0437\u043a\u0438, \u043a\u0430\u043a, \u043d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, &#171;midpoint&#187;, &#171;center&#187; \u0438 \u0442.\u0434., \u0440\u0430\u0437\u0434\u0435\u043b\u0435\u043d\u043d\u044b\u0445 \u0437\u0430\u043f\u044f\u0442\u044b\u043c\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq pt2 (osnap pt1 &#171;midp&#187;))<\/p>\n<p align=\"JUSTIFY\">(setq pt2 (osnap pt1 &#171;midp,endp,center&#187;))<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u0442\u043e\u0447\u043a\u0430&gt; &#8212; 2-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430 (\u0441\u043f\u0438\u0441\u043e\u043a \u0438\u0437 \u0434\u0432\u0443\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b), \u0442\u043e \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0435\u043d\u0430 2-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430. \u0415\u0441\u043b\u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u0442\u043e\u0447\u043a\u0430&gt; &#8212; 3-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430 (\u0441\u043f\u0438\u0441\u043e\u043a \u0438\u0437 \u0442\u0440\u0435\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b), \u0442\u043e \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0435\u043d\u0430 3-\u0445 \u043c\u0435\u0440\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430. \u0415\u0441\u043b\u0438 \u043d\u0438 \u043e\u0434\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438, \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0435\u0439 \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u043c\u0443 &lt;\u0440\u0435\u0436\u0438\u043c\u0443&gt; \u043e\u0431\u044a\u0435\u043a\u0442\u043d\u043e\u0439 \u043f\u0440\u0438\u0432\u044f\u0437\u043a\u0438 \u043d\u0435 \u043d\u0430\u0439\u0434\u0435\u043d\u043e, \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0442\u044c\u0441\u044f nil.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260959\"><\/a><br \/>\npi<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u043e \u043d\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044f, \u044d\u0442\u043e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430 pi. \u0415\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u0440\u0438\u043d\u044f\u0442\u043e 3.1415926.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260960\"><\/a>(polar<br \/>\n&lt;\u0442\u043e\u0447\u043a\u0430&gt; &lt;\u0443\u0433\u043e\u043b&gt; &lt;\u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0442\u043e\u0447\u043a\u0443, \u043d\u0430\u0445\u043e\u0434\u044f\u0449\u0443\u044e\u0441\u044f \u043f\u043e\u0434 \u0443\u0433\u043b\u043e\u043c &lt;\u0443\u0433\u043e\u043b&gt; \u0438 \u043d\u0430 \u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435 &lt;\u0440\u0430\u0441\u0441\u0442\u043e\u044f\u043d\u0438\u0435&gt; \u043e\u0442 \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0439 &lt;\u0442\u043e\u0447\u043a\u0438&gt;. \u0422\u043e\u0447\u043a\u0438 &#8212; \u0441\u043f\u0438\u0441\u043e\u043a \u0434\u0432\u0443\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b \u0438 &lt;\u0443\u0433\u043e\u043b&gt; \u0432\u044b\u0440\u0430\u0436\u0430\u0435\u0442\u0441\u044f \u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(polar &#8216;(1.0 1.0) 0.785398 1.414214)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (2.000000 2.000000)<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260961\"><\/a>(prin1<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u0432\u043e\u0434\u0438\u0442 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u043d\u0430 \u044d\u043a\u0440\u0430\u043d \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;. &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043b\u044e\u0431\u044b\u043c \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435\u043c; \u043d\u0435 \u0442\u0440\u0435\u0431\u0443\u0435\u0442\u0441\u044f, \u0447\u0442\u043e\u0431\u044b \u043e\u043d\u043e \u0431\u044b\u043b\u043e \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u043e\u0439 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u043e\u0439. \u0415\u0441\u043b\u0438 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 &lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt; (\u0438 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0430\u0439\u043b\u0430, \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0433\u043e \u0434\u043b\u044f \u0437\u0430\u043f\u0438\u0441\u0438), &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0432 \u0444\u0430\u0439\u043b \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f, \u043a\u0430\u043a \u043e\u043d\u043e \u043f\u043e\u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435. \u041f\u0435\u0447\u0430\u0442\u0430\u0435\u0442\u0441\u044f \u0442\u043e\u043b\u044c\u043a\u043e \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u043e\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;; \u043d\u0435 \u0432\u043a\u043b\u044e\u0447\u0430\u0435\u0442\u0441\u044f \u043d\u0438\u043a\u0430\u043a\u0438\u0445 \u043f\u0440\u043e\u0431\u0435\u043b\u043e\u0432 \u0438 \u043f\u0435\u0440\u0435\u0445\u043e\u0434\u043e\u0432 \u043d\u0430 \u043d\u043e\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 123)<\/p>\n<p align=\"JUSTIFY\">(setq b &#8216;(a))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(prin1 &#8216;a)<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442 \u0410 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0410<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(prin1 a)<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442 123 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 123<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(prin1 b)<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442 (\u0410) \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (\u0410)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(prin1 &#171;Hello&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442 &#171;hello&#187; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;Hell<\/span>o&#187;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u0430\u0436\u0434\u044b\u0439 \u0438\u0437 \u0432\u044b\u0448\u0435 \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0435\u0440\u043e\u0432 \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442\u0441\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435, \u0442.\u043a. \u043d\u0435 \u0431\u044b\u043b \u0443\u043a\u0430\u0437\u0430\u043d &lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;. \u041f\u0440\u0435\u0434\u043f\u043e\u043b\u043e\u0436\u0438\u043c, \u0447\u0442\u043e F &#8212; \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c\u044b\u0439 \u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430 \u0434\u043b\u044f \u0444\u0430\u0439\u043b\u0430, \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0433\u043e \u0434\u043b\u044f \u0437\u0430\u043f\u0438\u0441\u0438:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(prin1 &#171;Hello&#187; f)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0437\u0430\u043f\u0438\u0448\u0435\u0442 &#171;Hello&#187; \u0432 \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u044b\u0439 \u0444\u0430\u0439\u043b \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442 &#171;Hello&#187;.<\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &#8212; \u044d\u0442\u043e \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430, \u0432\u043a\u043b\u044e\u0447\u0430\u044e\u0449\u0430\u044f \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b, PRIN1 \u0438\u043d\u0442\u0435\u0440\u043f\u0440\u0435\u0442\u0438\u0440\u0443\u0435\u0442 \u044d\u0442\u0438 \u0441\u0438\u043c\u0432\u043e\u043b\u044b, \u043a\u0430\u043a \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435, \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u044f \u043f\u0435\u0440\u0435\u0434 \u043d\u0438\u043c\u0438 \u0437\u043d\u0430\u043a &#171;\\&#187;:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\\\u0435 \u0434\u043b\u044f \u0432\u044b\u0445\u043e\u0434\u0430 (escape)<\/p>\n<p align=\"JUSTIFY\">\\n \u0434\u043b\u044f \u043f\u0435\u0440\u0435\u0445\u043e\u0434\u0430 \u043d\u0430 \u043d\u043e\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 (newline)<\/p>\n<p align=\"JUSTIFY\">\\r \u0434\u043b\u044f \u0432\u0432\u043e\u0434\u0430 (return)<\/p>\n<p align=\"JUSTIFY\">\\t \u0434\u043b\u044f \u0442\u0430\u0431\u0443\u043b\u044f\u0446\u0438\u0438 (tab)<\/p>\n<p align=\"JUSTIFY\">\\nnn \u0434\u043b\u044f \u0441\u0438\u043c\u0432\u043e\u043b\u0430, \u0432\u043e\u0441\u044c\u043c\u0435\u0440\u0438\u0447\u043d\u044b\u0439 \u043a\u043e\u0434 \u043a\u043e\u0442\u043e\u0440\u043e\u0433\u043e nnn.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u0430\u043a:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(prin1 (chr 2))<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442 &#171;\\002&#187; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;\\002&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(prin1 (chr 10))<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442 &#171;\\n&#187; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;\\n&#187;<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">PRIN1 \u043c\u043e\u0436\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0438 \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432, \u0442\u043e\u0433\u0434\u0430 \u043e\u043d\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (\u0438 \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442) \u0441\u0438\u043c\u0432\u043e\u043b, \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u044b\u0439 \u043f\u0443\u0441\u0442\u043e\u0439 \u0441\u0442\u0440\u043e\u043a\u043e\u0439 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432. \u0415\u0441\u043b\u0438 \u0412\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0435 PRIN1 (\u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432) \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u043e\u0439 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u0442\u043e \u043a\u043e\u0433\u0434\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u0432\u0435\u0440\u0448\u0438\u0442 \u0441\u0432\u043e\u044e \u0440\u0430\u0431\u043e\u0442\u0443, \u0432\u0441\u0435 \u0447\u0442\u043e \u0431\u0443\u0434\u0435\u0442 \u0432\u044b\u0432\u0435\u0434\u0435\u043d\u043e \u043d\u0430 \u044d\u043a\u0440\u0430\u043d &#8212; \u044d\u0442\u043e \u043f\u0443\u0441\u0442\u0430\u044f \u0441\u0442\u0440\u043e\u043a\u0430, \u0442\u0435\u043c \u0441\u0430\u043c\u044b\u043c \u043e\u0431\u0435\u0441\u043f\u0435\u0447\u0438\u0432\u0430\u044f &#171;\u0442\u0438\u0445\u0438\u0439&#187; \u0432\u044b\u0445\u043e\u0434 \u0438\u0437 \u0444\u0443\u043d\u043a\u0446\u0438\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u043f\u0443\u0441\u0442\u044c:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun C:SETUP ()<\/p>\n<p align=\"JUSTIFY\">(setvar &#171;LUNITS&#187; 4)<\/p>\n<p align=\"JUSTIFY\">(setvar &#171;BLIPMODE&#187; 0)<\/p>\n<p align=\"JUSTIFY\">(prin1)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">Command:SETUP<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0438\u0441\u043f\u043e\u043b\u043d\u0438\u0442 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u0443\u044e \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c \u043a\u043e\u043c\u0430\u043d\u0434\u0443, \u043e\u0442\u0432\u0435\u0447\u0430\u044f \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441\u044b \u0444\u0443\u043d\u043a\u0446\u0438\u0438 SETVAR, \u0438 \u0432\u0435\u0440\u043d\u0435\u0442\u0441\u044f \u043a \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0435 AutoCAD\u0430 &#171;Command:&#187;, \u043d\u0435 \u0432\u044b\u0432\u043e\u0434\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d \u043d\u0438\u043a\u0430\u043a\u0438\u0445 \u043b\u0438\u0448\u043d\u0438\u0445 \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0439.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260962\"><\/a>(princ<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u043e\u0445\u043e\u0436\u0430 \u043d\u0430 PRIN1 \u043a\u0440\u043e\u043c\u0435 \u0442\u043e\u0433\u043e, \u0447\u0442\u043e \u0443\u043f\u0440\u0430\u0432\u043b\u044f\u044e\u0449\u0438\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b \u0432 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0438&gt; \u043f\u0435\u0447\u0430\u0442\u0430\u044e\u0442\u0441\u044f \u0431\u0435\u0437 \u0440\u0430\u0441\u0448\u0438\u0440\u0435\u043d\u0438\u044f. \u0412\u043e\u043e\u0431\u0449\u0435 PRIN1 \u0441\u043e\u0437\u0434\u0430\u043d\u0430 \u0434\u043b\u044f \u043f\u0435\u0447\u0430\u0442\u0438 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439 \u043f\u0443\u0442\u0435\u043c, \u0441\u043e\u0432\u043c\u0435\u0441\u0442\u0438\u043c\u044b\u043c \u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 LOAD, \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f \u043a\u0430\u043a PRINC \u0431\u0443\u0434\u0435\u0442 \u043f\u0435\u0447\u0430\u0442\u0430\u0442\u044c \u0438\u0445 \u0442\u0430\u043a\u0438\u043c \u043f\u0443\u0442\u0435\u043c, \u0447\u0442\u043e\u0431\u044b \u043e\u043d\u0438 \u043c\u043e\u0433\u043b\u0438 \u0441\u0447\u0438\u0442\u044b\u0432\u0430\u0442\u044c\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438 \u0442\u0438\u043f\u0430 READ-LINE.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260963\"><\/a>(print<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u043e\u0445\u043e\u0436\u0430 \u043d\u0430 PRIN1, \u043a\u0440\u043e\u043c\u0435 \u0442\u043e\u0433\u043e \u0447\u0442\u043e &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442\u0441\u044f \u0441 \u043d\u043e\u0432\u043e\u0439 \u0441\u0442\u0440\u043e\u043a\u0438, \u0430 \u043f\u043e\u0441\u043b\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f&gt; \u0441\u0442\u0430\u0432\u0438\u0442\u0441\u044f \u043f\u0440\u043e\u0431\u0435\u043b.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260964\"><\/a>(progn<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442 \u043a\u0430\u0436\u0434\u043e\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u043f\u043e\u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u0435\u043b\u044c\u043d\u043e \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c PROGN \u0434\u043b\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u043d\u0435\u0441\u043a\u043e\u043b\u044c\u043a\u0438\u0445 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439 \u0442\u0430\u043c, \u0433\u0434\u0435 \u0434\u043e\u043f\u0443\u0441\u043a\u0430\u0435\u0442\u0441\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u0435 \u0442\u043e\u043b\u044c\u043a\u043e \u043e\u0434\u043d\u043e\u0433\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(if (= a b) (progn<\/p>\n<p align=\"JUSTIFY\">(setq a (+ a 10))<\/p>\n<p align=\"JUSTIFY\">(setq b (- b 10))<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f IF \u043d\u043e\u0440\u043c\u0430\u043b\u044c\u043d\u043e \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u043e\u0434\u043d\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 &#171;then&#187; \/\u0442\u043e\u0433\u0434\u0430\/, \u0435\u0441\u043b\u0438 \u0443\u0441\u043b\u043e\u0432\u0438\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442\u0441\u044f \u0438 \u043d\u0435 \u0440\u0430\u0432\u043d\u043e nil. \u0412 \u044d\u0442\u043e\u043c \u043f\u0440\u0438\u043c\u0435\u0440\u0435 \u043c\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043b\u0438 PROGN, \u0447\u0442\u043e\u0431\u044b \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u043b\u043e\u0441\u044c \u0434\u0432\u0430 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u0432\u043c\u0435\u0441\u0442\u043e \u043e\u0434\u043d\u043e\u0433\u043e.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260965\"><\/a><br \/>\n(prompt &lt;\u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0435\u0442 \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435 \u0432 \u043f\u043e\u043b\u0435 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043e\u043a \u044d\u043a\u0440\u0430\u043d\u0430 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. &lt;\u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435&gt; &#8212; \u0441\u0442\u0440\u043e\u043a\u0430 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432. \u0412 \u0441\u0438\u0441\u0442\u0435\u043c\u0435 AutoCAD \u0441 \u0434\u0432\u0443\u043c\u044f \u044d\u043a\u0440\u0430\u043d\u0430\u043c\u0438 PROMT \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0435\u0442 &lt;\u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435&gt; \u043d\u0430 \u043e\u0431\u043e\u0438\u0445 \u044d\u043a\u0440\u0430\u043d\u0430\u0445 \u0438 \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u043f\u0440\u0435\u0434\u043f\u043e\u0447\u0442\u0438\u0442\u0435\u043b\u044c\u043d\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c PRINC.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(prompt &#171;\u041d\u043e\u0432\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435: &#171;)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0435\u0442 &#171;\u041d\u043e\u0432\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435: &#187; \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 (\u044d\u043a\u0440\u0430\u043d\u0430\u0445) \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260966\"><\/a>(quote<br \/>\n&lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043d\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u044f \u0435\u0433\u043e. \u042d\u0442\u043e \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0442\u0430\u043a \u0436\u0435 \u0437\u0430\u043f\u0438\u0441\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">&#8216;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(quote a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0410<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(quote \u0441at<\/span><span style=\"font-family: Times New Roman\">) \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 C\u0410T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(quote (a b))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (\u0410 B)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">&#8216;a<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0410<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">&#8216;cat<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 C\u0410T<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">&#8216;(a b)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0410<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"color: #006666\">(\u041f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0435 \u0442\u0440\u0438 \u043f\u0440\u0438\u043c\u0435\u0440\u0430 \u043d\u0435 \u0431\u0443\u0434\u0443\u0442 \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c,<br \/>\n\u0435\u0441\u043b\u0438 \u0438\u0445 \u043d\u0430\u0431\u0440\u0430\u0442\u044c \u043d\u0435\u043f\u043e\u0441\u0440\u0435\u0434\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u0441 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 AutoCAD. \u041f\u043e\u043c\u043d\u0438\u0442\u0435,<br \/>\n\u0447\u0442\u043e \u0442\u0430\u043a\u043e\u0439 \u0432\u0432\u043e\u0434 \u0434\u043e\u043b\u0436\u0435\u043d \u043d\u0430\u0447\u0438\u043d\u0430\u0442\u044c\u0441\u044f \u0441 &#171;(&#187; \u0438\u043b\u0438 &#171;!&#187; \u0441 \u0446\u0435\u043b\u044c\u044e \u0438\u043d\u0442\u0435\u0440\u043f\u0440\u0435\u0442\u0430\u0446\u0438\u0438 \u0438\u0445 \u043a\u0430\u043a<br \/>\n\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0439 LISP.)<\/span><\/p>\n<p><i>\u00a0<\/i><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260967\"><\/a>(read<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p><i><\/i><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0435\u0440\u0432\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u0438\u043b\u0438 \u0430\u0442\u043e\u043c \u0438\u0437 \u0434\u0430\u043d\u043d\u043e\u0439 &lt;\u0441\u0442\u0440\u043e\u043a\u0438&gt;. &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; \u043d\u0435 \u0434\u043e\u043b\u0436\u043d\u0430 \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0442\u044c \u043f\u0440\u043e\u0431\u0435\u043b\u044b.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(read &#171;hello&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 HELLO<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(read &#171;hi&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 HI<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(read &#171;(a)&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A)<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260968\"><\/a><br \/>\n(read-char [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0447\u0438\u0442\u044b\u0432\u0430\u0435\u0442 \u0435\u0434\u0438\u043d\u0438\u0447\u043d\u044b\u0439 \u0441\u0438\u043c\u0432\u043e\u043b \u0438\u0437 \u0431\u0443\u0444\u0435\u0440\u0430 \u0432\u0432\u043e\u0434\u0430 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b \u0438\u043b\u0438 \u0438\u0437 \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0433\u043e \u0444\u0430\u0439\u043b\u0430 \u0437\u0430\u0434\u0430\u0432\u0430\u0435\u043c\u043e\u0433\u043e &lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0430\u0439\u043b\u0430&gt;. \u041e\u043d\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (\u0446\u0435\u043b\u043e\u0435) ASCII \u043a\u043e\u0434 \u0441\u0447\u0438\u0442\u044b\u0432\u0430\u0435\u043c\u043e\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430.<\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u043d\u0435 \u0437\u0430\u0434\u0430\u043d\u043e &lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044f \u0444\u0430\u0439\u043b\u0430&gt; \u0438 \u0432 \u0431\u0443\u0444\u0435\u0440\u0435 \u0432\u0432\u043e\u0434\u0430 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b \u043d\u0435\u0442 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432, READ-CHAR \u0436\u0434\u0435\u0442, \u0447\u0442\u043e\u0431\u044b \u0432\u044b \u0432\u0432\u0435\u043b\u0438 \u0447\u0442\u043e-\u043b\u0438\u0431\u043e \u0441 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b (\u0437\u0430\u043a\u0430\u043d\u0447\u0438\u0432\u0430\u044e\u0449\u0435\u0435\u0441\u044f RETURN).<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c, \u0447\u0442\u043e \u0431\u0443\u0444\u0435\u0440 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b \u043f\u0443\u0441\u0442:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(read-char)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0431\u0443\u0434\u0435\u0442 \u0436\u0434\u0430\u0442\u044c \u043a\u0430\u043a\u043e\u0433\u043e-\u043b\u0438\u0431\u043e \u0432\u0432\u043e\u0434\u0430. \u0415\u0441\u043b\u0438 \u0432\u044b \u043d\u0430\u0431\u0440\u0430\u043b\u0438 &#171;\u0410\u0412\u0421&#187;, \u0437\u0430\u0432\u0435\u0440\u0448\u0438\u0432 \u0432\u0432\u043e\u0434 RETURN, READ-CHAR \u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442 65 (\u043a\u043e\u0434 AS0CII \u0431\u0443\u043a\u0432\u044b &#171;\u0410&#187; (\u043b\u0430\u0442\u0438\u043d\u0441\u043a\u043e\u0439)). \u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435 \u0442\u0440\u0438 \u043e\u0431\u0440\u0430\u0449\u0435\u043d\u0438\u044f \u043a READ-CHAR \u0432\u043e\u0437\u0432\u0440\u0430\u0442\u044f\u0442 66,67 \u0438 10 (\u043f\u0435\u0440\u0435\u0445\u043e\u0434 \u043d\u0430 \u043d\u043e\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443) \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0435\u043d\u043d\u043e. \u0415\u0441\u043b\u0438 \u0437\u0430\u0442\u0435\u043c \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u0435\u0449\u0435 \u043e\u0434\u043d\u043e \u043e\u0431\u0440\u0430\u0449\u0435\u043d\u0438\u0435 \u043a READ-CHAR, \u043e\u043d\u0430 \u0431\u0443\u0434\u0435\u0442 \u0436\u0434\u0430\u0442\u044c \u0432\u0432\u043e\u0434\u0430.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260969\"><\/a>(read-line<br \/>\n[&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u0447\u0438\u0442\u044b\u0432\u0430\u0435\u0442 \u0441\u0442\u0440\u043e\u043a\u0443 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 \u0441 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b \u0438\u043b\u0438 \u0438\u0437 \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0433\u043e \u0444\u0430\u0439\u043b\u0430, \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0433\u043e &lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0430\u0439\u043b\u0430&gt;; READ-LINE \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil, \u0438\u043d\u0430\u0447\u0435 \u043e\u043d\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435, \u043a\u043e\u0442\u043e\u0440\u043e\u0435 \u0431\u044b\u043b\u043e \u0441\u0447\u0438\u0442\u0430\u043d\u043e. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c, \u0447\u0442\u043e F &#8212; \u044d\u0442\u043e \u0440\u0430\u0437\u0440\u0435\u0448\u0435\u043d\u043d\u044b\u0439 \u0443\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044c \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0433\u043e \u0444\u0430\u0439\u043b\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(read-line f)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0443\u044e \u0432\u0432\u0435\u0434\u0435\u043d\u043d\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 \u0438\u0437 \u0444\u0430\u0439\u043b\u0430 \u0438\u043b\u0438 (\u0435\u0441\u043b\u0438 \u0434\u043e\u0441\u0442\u0438\u0433\u043d\u0443\u0442 \u043a\u043e\u043d\u0435\u0446 \u0444\u0430\u0439\u043b\u0430) nil.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260970\"><\/a><br \/>\n(redraw [&lt;\u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430&gt; [&lt;\u0440\u0435\u0436\u0438\u043c&gt;]])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0414\u0435\u0439\u0441\u0442\u0432\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0437\u0430\u0432\u0438\u0441\u0438\u0442 \u043e\u0442 \u0447\u0438\u0441\u043b\u0430 \u0432\u0432\u0435\u0434\u0435\u043d\u043d\u044b\u0445 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432. \u0415\u0441\u043b\u0438 \u043e\u043d\u0430 \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(redrow)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0431\u0443\u0434\u0435\u0442 \u043d\u0430\u0440\u0438\u0441\u043e\u0432\u0430\u043d \u0432\u0435\u0441\u044c \u0447\u0435\u0440\u0442\u0435\u0436, \u0442\u043e\u0447\u043d\u043e \u0442\u0430\u043a \u0436\u0435, \u043a\u0430\u043a \u044d\u0442\u043e \u0434\u0435\u043b\u0430\u0435\u0442 \u043a\u043e\u043c\u0430\u043d\u0434\u0430 AutoCAD REDRAW. \u0415\u0441\u043b\u0438 \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0441 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u043c &lt;\u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430&gt;:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(redraw &lt;\u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0431\u0443\u0434\u0435\u0442 \u043f\u0435\u0440\u0435\u0440\u0438\u0441\u043e\u0432\u0430\u043d. \u042d\u0442\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u0438\u0434\u0435\u043d\u0442\u0438\u0444\u0438\u043a\u0430\u0446\u0438\u0438 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u043f\u043e\u0441\u043b\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GRCLEAR \u0434\u043b\u044f \u043e\u0447\u0438\u0441\u0442\u043a\u0438 \u044d\u043a\u0440\u0430\u043d\u0430. \u0418\u043c\u0435\u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u043e\u043f\u0438\u0441\u0430\u043d\u044b \u0432 \u0433\u043b\u0430\u0432\u0435 5 \u043d\u0430\u0441\u0442\u043e\u044f\u0449\u0435\u0433\u043e \u0440\u0443\u043a\u043e\u0432\u043e\u0434\u0441\u0442\u0432\u0430. \u041f\u043e\u043b\u043d\u044b\u0439 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044c \u0437\u0430 \u043f\u0435\u0440\u0435\u0440\u0438\u0441\u043e\u0432\u0430\u043d\u0438\u0435\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043e\u0431\u0435\u0441\u043f\u0435\u0447\u0438\u0432\u0430\u0435\u0442\u0441\u044f \u0432\u044b\u0437\u043e\u0432\u043e\u043c REDRAW \u0441 \u0434\u0432\u0443\u043c\u044f \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430\u043c\u0438:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(redraw &lt;\u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430&gt; &lt;\u0440\u0435\u0436\u0438\u043c&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0433\u0434\u0435 &lt;\u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430&gt; &#8212; \u044d\u0442\u043e \u0438\u043c\u044f \u043f\u0435\u0440\u0435\u0440\u0438\u0441\u043e\u0432\u044b\u0432\u0430\u0435\u043c\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0430 &lt;\u0440\u0435\u0436\u0438\u043c&gt;- \u044d\u0442\u043e \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0441 \u043e\u0434\u043d\u0438\u043c \u0438\u0437 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"720\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"25%\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0420\u0435\u0436\u0438\u043c <\/span>REDRAW<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"75%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0414\u0435\u0439\u0441\u0442\u0432\u0438\u0435<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"25%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"75%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0435\u0440\u0435\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"25%\">\n<p align=\"CENTER\">2<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"75%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0435 \u0440\u0438\u0441\u0443\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 (\u0441\u0442\u0438\u0440\u0430\u0435\u0442)<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"25%\">\n<p align=\"CENTER\">3<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"75%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u043e\u0434\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 (\u0435\u0441\u043b\u0438 \u043c\u043e\u0436\u0435\u0442 \u0434\u0438\u0441\u043f\u043b\u0435\u0439)<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"25%\">\n<p align=\"CENTER\">4<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"75%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0435\u0440\u0435\u0441\u0442\u0430\u0435\u0442 \u043f\u043e\u0434\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 ( \u0435\u0441\u043b\u0438 \u043c\u043e\u0436\u0435\u0442 \u0434\u0438\u0441\u043f\u043b\u0435\u0439 )<\/p>\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 &lt;\u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430&gt; &#8212; \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043e\u043a \u0441\u043b\u043e\u0436\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 (\u041f\u043e\u043b\u0438\u043b\u0438\u043d\u0438\u0438 \u0438\u043b\u0438 \u0411\u043b\u043e\u043a\u0430 \u0441 \u0430\u0442\u0440\u0438\u0431\u0443\u0442\u0430\u043c\u0438), \u0432 \u043f\u0440\u043e\u0446\u0435\u0441\u0441\u0435 \u043f\u0435\u0440\u0435\u0440\u0438\u0441\u043e\u0432\u043a\u0438 \u0431\u0443\u0434\u0443\u0442 \u0443\u0447\u0430\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c \u043a\u0430\u043a \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u0442\u0430\u043a \u0438 \u0432\u0441\u0435 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u0435\u0441\u043b\u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u0440\u0435\u0436\u0438\u043c&gt; \u043f\u043e\u043b\u043e\u0436\u0438\u0442\u0435\u043b\u0435\u043d. \u0415\u0441\u043b\u0438 \u0436\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;\u0440\u0435\u0436\u0438\u043c&gt; \u043e\u0442\u0440\u0438\u0446\u0430\u0442\u0435\u043b\u0435\u043d, \u0442\u043e \u0442\u043e\u043b\u044c\u043a\u043e \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0431\u0443\u0434\u0435\u0442 \u0443\u0447\u0430\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c \u0432 \u043f\u0440\u043e\u0446\u0435\u0441\u0441\u0435 REDRAW.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172729\"><\/a><a name=\"_Ref465173563\"><\/a><a name=\"_Toc465260971\"><\/a><span style=\"font-family: Arial\">(r<\/span><span style=\"font-family: Arial\">em<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e1&gt; &lt;\u0447\u0438\u0441\u043b\u043e2&gt;)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0434\u0435\u043b\u0438\u0442 &lt;\u0447\u0438\u0441\u043b\u043e1&gt; \u043d\u0430 &lt;\u0447\u0438\u0441\u043b\u043e2&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043e\u0441\u0442\u0430\u0442\u043e\u043a \u043e\u0442 \u0434\u0435\u043b\u0435\u043d\u0438\u044f (&lt;\u0447\u0438\u0441\u043b\u043e1&gt; mod &lt;\u0447\u0438\u0441\u043b\u043e2&gt;). REM \u043c\u043e\u0436\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0441 \u0446\u0435\u043b\u044b\u043c\u0438 \u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u0430\u043c\u0438 \u0441\u043e \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u044b\u043c\u0438 \u043f\u0440\u0430\u0432\u0438\u043b\u0430\u043c\u0438 \u043f\u0440\u0435\u043e\u0431\u0440\u0430\u0437\u043e\u0432\u0430\u043d\u0438\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(rem 42 12)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442<\/span> 6<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(rem 12.0 16)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 12.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(rem 60 3)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260972\"><\/a>(repeat<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412 \u044d\u0442\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &lt;\u0447\u0438\u0441\u043b\u043e&gt; \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043b\u044e\u0431\u043e\u0439 \u043f\u043e\u043b\u043e\u0436\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0439 \u0446\u0435\u043b\u043e\u0439 \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u043e\u0439. \u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u043a\u0430\u0436\u0434\u043e\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0435 &lt;\u0447\u0438\u0441\u043b\u043e&gt; \u0440\u0430\u0437 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 10)<\/p>\n<p align=\"JUSTIFY\">(setq b 100)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(repeat 4<\/p>\n<p align=\"JUSTIFY\">(setq a (+ a 10)))<\/p>\n<p align=\"JUSTIFY\">(setq b (+ b 10)))<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> ) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 140.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260973\"><\/a><br \/>\n(reverse &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; c \u0435\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430\u043c\u0438, \u0440\u0430\u0441\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u043d\u044b\u043c\u0438 \u0432 \u043e\u0431\u0440\u0430\u0442\u043d\u043e\u043c \u043f\u043e\u0440\u044f\u0434\u043a\u0435.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(reverse &#8216;((a) b c))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (\u0421 \u0412 (\u0410))<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260974\"><\/a>(rtos<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; [&lt;\u0440\u0435\u0436\u0438\u043c&gt; [&lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c&gt;]])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0443\u044e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u0442 &lt;\u0447\u0438\u0441\u043b\u043e&gt; (\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u0430\u044f \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u0430) \u0432 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0438\u0438 \u0441\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f\u043c\u0438 &lt;\u0440\u0435\u0436\u0438\u043c\u0430&gt;, &lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u0438&gt; \u0438 \u0440\u0430\u0437\u043c\u0435\u0440\u043d\u043e\u0439 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 AutoCAD DIMZIN. &lt;\u0420\u0435\u0436\u0438\u043c&gt; \u0438 &lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c&gt; &#8212; \u0446\u0435\u043b\u044b\u0435 \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u044b, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043d\u0430\u0437\u043d\u0430\u0447\u0430\u044e\u0442 \u0440\u0435\u0436\u0438\u043c \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u044f \u0438 \u0435\u0433\u043e \u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c. \u041d\u0438\u0436\u0435 \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u044b \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f &lt;\u0440\u0435\u0436\u0438\u043c\u0430&gt;:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<table border=\"\" width=\"602\" cellspacing=\"1\" cellpadding=\"9\">\n<tbody>\n<tr>\n<td valign=\"TOP\" width=\"27%\">\n<p align=\"CENTER\"><span style=\"font-family: Times New Roman\">\u0420\u0435\u0436\u0438\u043c\u044b <\/span>RTOS<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"73%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"CENTER\">\u0424\u043e\u0440\u043c\u0430\u0442 \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u0438\u044f<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"27%\">\n<p align=\"CENTER\">1<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"73%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u0443\u0447\u043d\u044b\u0439<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"27%\">\n<p align=\"CENTER\">2<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"73%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0414\u0435\u0441\u044f\u0442\u0438\u0447\u043d\u044b\u0439<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"27%\">\n<p align=\"CENTER\">3<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"73%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0418\u043d\u0436\u0435\u043d\u0435\u0440\u043d\u044b\u0439 (\u0444\u0443\u0442\u044b \u0438 \u0434\u0435\u0441\u044f\u0442\u0438\u0447\u043d\u044b\u0435 \u0434\u044e\u0439\u043c\u044b)<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"27%\">\n<p align=\"CENTER\">4<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"73%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u0410\u0440\u0445\u0438\u0442\u0435\u043a\u0442\u0443\u0440\u043d\u044b\u0439 (\u0444\u0443\u0442\u044b \u0438 \u0434\u0440\u043e\u0431\u043d\u044b\u0435 \u0434\u044e\u0439\u043c\u044b)<\/p>\n<\/td>\n<\/tr>\n<tr>\n<td valign=\"TOP\" width=\"27%\">\n<p align=\"CENTER\">5<\/p>\n<\/td>\n<td valign=\"TOP\" width=\"73%\"><span style=\"font-family: Times New Roman\"><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u043e\u0438\u0437\u0432\u043e\u043b\u044c\u043d\u044b\u0435 \u0434\u0440\u043e\u0431\u043d\u044b\u0435 \u0447\u0430\u0441\u0442\u0438<\/p>\n<\/td>\n<\/tr>\n<\/tbody>\n<\/table>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b &lt;\u0440\u0435\u0436\u0438\u043c&gt; \u0438 &lt;\u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c&gt; \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0442 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u044b\u043c \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u043c AutoCAD LUNITS \u0438 LUPREC. \u0415\u0441\u043b\u0438 \u043e\u043f\u0443\u0441\u0442\u0438\u043b\u0438 \u044d\u0442\u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b, \u0442\u043e \u0431\u0443\u0434\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u044b \u0442\u0435\u043a\u0443\u0449\u0438\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f LUNITS \u0438 LUPREC.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041f\u0440\u0438\u043c\u0435\u0440\u044b<\/span> RTOS:<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(rtos 17.5 1 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;1.7500E+01&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(rtos 17.5 2 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;17.50&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(rtos 17.5 3 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;1&#8242;-5.50&#8243;&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(rtos 17.5 4 2) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;1&#8242;-5 1\/2&#8243;&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(rtos 17.5 5 2) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;17 1\/2&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260975\"><\/a><br \/>\n(set &lt;\u0441\u0438\u043c\u0432\u043e\u043b&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u0442 &lt;\u0441\u0438\u043c\u0432\u043e\u043b\u0443&gt; (\u0433\u0434\u0435 &lt;\u0441\u0438\u043c\u0432\u043e\u043b&gt; &#8212; \u0438\u043c\u044f \u0441\u0438\u043c\u0432\u043e\u043b\u0430 \u0441 \u043a\u0430\u0432\u044b\u0447\u043a\u043e\u0439 \u0441\u043f\u0435\u0440\u0435\u0434\u0438) \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u044d\u0442\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(set &#8216;a 5.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 5.000000 \u0438 \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0432 \u0441\u0438\u043c\u0432\u043e\u043b \u0410<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(set (quote b) &#8216;a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0410 \u0438 \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0432 \u0441\u0438\u043c\u0432\u043e\u043b \u0412.<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 SET \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0441 \u0441\u0438\u043c\u0432\u043e\u043b\u044c\u043d\u044b\u043c \u0438\u043c\u0435\u043d\u0435\u043c \u0431\u0435\u0437 \u043a\u0430\u0432\u044b\u0447\u043a\u0438, \u043e\u043d\u0430 \u043c\u043e\u0436\u0435\u0442 \u043f\u0440\u0438\u0441\u0432\u043e\u0438\u0442\u044c \u043d\u043e\u0432\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043a\u043e\u0441\u0432\u0435\u043d\u043d\u043e \u0434\u0440\u0443\u0433\u043e\u043c\u0443 \u0441\u0438\u043c\u0432\u043e\u043b\u0443.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0432\u043e\u0437\u044c\u043c\u0435\u043c \u0432\u044b\u0448\u0435\u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u043d\u044b\u0435 \u043f\u0440\u0438\u043c\u0435\u0440\u044b:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(set b 640)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u0435\u0440\u043d\u0435\u0442 640<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0438 \u043f\u0440\u0438\u0441\u0432\u043e\u0438\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 640 \u0441\u0438\u043c\u0432\u043e\u043b\u0443 \u0410 (\u043f\u043e\u0441\u043a\u043e\u043b\u044c\u043a\u0443 \u044d\u0442\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u0430 \u0412).<\/p>\n<p align=\"JUSTIFY\">\u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 \u043d\u0438\u0436\u0435 SETQ.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172734\"><\/a><a name=\"_Ref465173568\"><\/a><a name=\"_Toc465260976\"><\/a><span style=\"font-family: Arial\"><br \/>\n(setq &lt;\u0441\u0438\u043c\u0432\u043e\u043b1&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04351&gt; [&lt;\u0441\u0438\u043c\u0432\u043e\u043b2&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u04352&gt;]&#8230;)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0432 &lt;\u0441\u0438\u043c\u0432\u043e\u043b1&gt; \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f1&gt;, \u0432 &lt;\u0441\u0438\u043c\u0432\u043e\u043b2&gt; \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f2&gt; \u0438 \u0442.\u0434. \u042d\u0442\u043e \u043e\u0441\u043d\u043e\u0432\u043d\u0430\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u0438\u0441\u0432\u043e\u0435\u043d\u0438\u044f \u0432 AutoLISP\u0435.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq a 5.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 5.000000<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0438 \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 5.000000 \u0441\u0438\u043c\u0432\u043e\u043b\u0443 \u0410. \u041a\u043e\u0433\u0434\u0430 \u0431\u044b \u043d\u0438 \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u043b\u043e\u0441\u044c A, \u043e\u043d\u043e \u0431\u0443\u0434\u0435\u0442 \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0442\u044c\u0441\u044f \u0440\u0430\u0432\u043d\u044b\u043c \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u043c\u0443 \u0447\u0438\u0441\u043b\u0443 5.000000.<\/p>\n<p align=\"JUSTIFY\">\u0414\u0440\u0443\u0433\u0438\u0435 \u043f\u0440\u0438\u043c\u0435\u0440\u044b:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq b 123 c 4.7)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 4.7<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq s &#171;it&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;it&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq x &#8216;(a b))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u0438 SET \u0438 SETQ \u0441\u043e\u0437\u0434\u0430\u044e\u0442 \u0438\u043b\u0438 \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u0443\u044e\u0442 \u0433\u043b\u043e\u0431\u0430\u043b\u044c\u043d\u044b\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b \u0432 \u0442\u0435\u0445 \u0441\u043b\u0443\u0447\u0430\u044f\u0445, \u043a\u043e\u0433\u0434\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043d\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044e\u0442\u0441\u044f \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 DEFUN \u0434\u043b\u044f \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u043d\u0438\u044f \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0443 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0438\u043b\u0438 \u0441\u0438\u043c\u0432\u043e\u043b\u0443, \u043e\u0431\u044a\u044f\u0432\u043b\u0435\u043d\u043d\u043e\u043c\u0443 \u043a\u0430\u043a \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u043e\u043c\u0443 \u0434\u043b\u044f \u044d\u0442\u043e\u0439 DEFUN.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq glo1 123) ;<\/span><span style=\"font-family: Times New Roman\"> \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u0433\u043b\u043e\u0431\u0430\u043b\u044c\u043d\u043e\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430<\/span><\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun demo (arg1 arg2 \/ loc1 loc2)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq arg1 234) ;<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0440\u0438\u0441\u0432\u043e\u0435\u043d\u0438\u0435 \u043d\u043e\u0432\u043e\u0433\u043e \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u043e\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq log1 345) ;<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0440\u0438\u0441\u0432\u043e\u0435\u043d\u0438\u0435 \u043d\u043e\u0432\u043e\u0433\u043e \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u043e\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq glo1 456) ;<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0440\u0438\u0441\u0432\u043e\u0435\u043d\u0438\u0435 \u043d\u043e\u0432\u043e\u0433\u043e \u0433\u043b\u043e\u0431\u0430\u043b\u044c\u043d\u043e\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq glo2 567) ;<\/span><span style=\"font-family: Times New Roman\"> \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u043d\u043e\u0432\u043e\u0433\u043e \u0433\u043b\u043e\u0431\u0430\u043b\u044c\u043d\u043e\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430<\/span><\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0413\u043b\u043e\u0431\u0430\u043b\u044c\u043d\u044b\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b \u0434\u043e\u0441\u0442\u0443\u043f\u043d\u044b \u0438\u043b\u0438 \u0438\u0437\u043c\u0435\u043d\u044f\u0435\u043c\u044b \u043b\u044e\u0431\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 \u0438\u043b\u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u043c\u044b \u0432 \u043b\u044e\u0431\u043e\u043c \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0438. \u041b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b \u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0441\u043e\u0445\u0440\u0430\u043d\u044f\u044e\u0442 \u0441\u0432\u043e\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0442\u043e\u043b\u044c\u043a\u043e \u0432 \u043f\u0440\u043e\u0446\u0435\u0441\u0441\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u0434\u043b\u044f \u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u043e\u043d\u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u044b, \u0438 \u0432 \u043f\u0440\u043e\u0446\u0435\u0441\u0441\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438, \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u043c\u044b\u0445 \u044d\u0442\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439. \u0417\u0430\u043c\u0435\u0442\u0438\u043c, \u0447\u0442\u043e \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043c\u043e\u0433\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f, \u043a\u0430\u043a \u043b\u043e\u043a\u0430\u043b\u044c\u043d\u044b\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b, \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043c\u043e\u0436\u0435\u0442 \u0438\u0437\u043c\u0435\u043d\u044f\u0442\u044c \u0438\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f, \u043d\u043e \u0442\u0430\u043a\u0438\u0435 \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u044f \u0441\u0431\u0440\u0430\u0441\u044b\u0432\u0430\u044e\u0442\u0441\u044f \u043f\u043e\u0441\u043b\u0435 \u0432\u044b\u0445\u043e\u0434\u0430 \u0438\u0437 \u0444\u0443\u043d\u043a\u0446\u0438\u0438.<\/p>\n<p align=\"JUSTIFY\">SET \u0438 SETQ \u0434\u043e\u043f\u0443\u0441\u043a\u0430\u044e\u0442 \u043f\u0440\u0438\u0441\u0432\u043e\u0435\u043d\u0438\u0435 \u043d\u043e\u0432\u044b\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u044b\u043c \u0441\u0438\u043c\u0432\u043e\u043b\u0430\u043c \u0438 \u0438\u043c\u0435\u043d\u0430\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u0439 AutoLISP, \u0441\u0431\u0440\u0430\u0441\u044b\u0432\u0430\u044f \u043f\u0435\u0440\u0432\u043e\u043d\u0430\u0447\u0430\u043b\u044c\u043d\u043e \u043f\u0440\u0438\u0441\u0432\u043e\u0435\u043d\u043d\u044b\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u0438\u043b\u0438 \u0434\u0435\u043b\u0430\u044f \u0438\u0445 \u043d\u0435\u0434\u043e\u0441\u0442\u0443\u043f\u043d\u044b\u043c\u0438. \u041d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0438 \u0442\u0449\u0435\u0442\u043d\u043e \u043f\u044b\u0442\u0430\u044e\u0442\u0441\u044f \u0441\u0434\u0435\u043b\u0430\u0442\u044c \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0435:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq anagle (&#8230;))<\/span><span style=\"font-family: Times New Roman\"> \u041d\u0435\u0432\u0435\u0440\u043d\u043e!<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq length (&#8230;))<\/span><span style=\"font-family: Times New Roman\"> \u041d\u0435\u0432\u0435\u0440\u043d\u043e!<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq max (&#8230;))<\/span><span style=\"font-family: Times New Roman\"> \u041d\u0435\u0432\u0435\u0440\u043d\u043e!<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq t (&#8230;))<\/span><span style=\"font-family: Times New Roman\"> \u041d\u0435\u0432\u0435\u0440\u043d\u043e!<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq pi 3.0))<\/span><span style=\"font-family: Times New Roman\"> \u041d\u0435\u0432\u0435\u0440\u043d\u043e!<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0427\u0442\u043e\u0431\u044b \u0438\u0437\u0431\u0435\u0436\u0430\u0442\u044c \u0432\u0441\u0435\u0445 \u0432\u0438\u0434\u043e\u0432 \u0442\u0430\u043a\u0438\u0445 \u0441\u0442\u0440\u0430\u043d\u043d\u044b\u0445 \u043e\u0448\u0438\u0431\u043e\u043a, \u0431\u0443\u0434\u044c\u0442\u0435 \u0432\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u043d\u044b, \u043a\u043e\u0433\u0434\u0430 \u043f\u0440\u0438\u0434\u0443\u043c\u044b\u0432\u0430\u0435\u0442\u0435 \u0438\u043c\u0435\u043d\u0430 \u0441\u0432\u043e\u0438\u043c \u0441\u0438\u043c\u0432\u043e\u043b\u0430\u043c. \u041d\u0438\u043a\u043e\u0433\u0434\u0430 \u043d\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0439\u0442\u0435 \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u044b\u0439 \u0441\u0438\u043c\u0432\u043e\u043b \u0438\u043b\u0438 \u0438\u043c\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0434\u043b\u044f \u0441\u0432\u043e\u0435\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430! (\u0414\u043b\u044f \u0443\u043d\u0438\u0447\u0442\u043e\u0436\u0435\u043d\u0438\u044f \u0441\u043f\u0438\u0441\u043a\u0430 \u0438\u043c\u0435\u043d \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 \u043d\u0430\u0431\u0435\u0440\u0438\u0442\u0435 &#171;!\u0410\u0422\u041e\u041cLIST&#187; \u043d\u0430 \u0437\u0430\u043f\u0440\u043e\u0441 &#171;Command:&#187; AutoCAD \u043f\u0435\u0440\u0435\u0434 \u0437\u0430\u0433\u0440\u0443\u0437\u043a\u043e\u0439 (LOAD) \u043a\u0430\u043a\u043e\u0439-\u043b\u0438\u0431\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0438 AutoLISP.)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260977\"><\/a>(setvar<br \/>\n&lt;\u0438\u043c\u044f-\u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439&gt; &lt;\u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u0442 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u043e\u0439 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 AutoCAD \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0435 &lt;\u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u044d\u0442\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435. \u0418\u043c\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 \u0434\u043e\u043b\u0436\u043d\u043e \u0431\u044b\u0442\u044c \u0437\u0430\u043a\u043b\u044e\u0447\u0435\u043d\u043e \u0432 \u0434\u0432\u043e\u0439\u043d\u044b\u0435 \u043a\u0430\u0432\u044b\u0447\u043a\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setvar &#171;FILLETRAD&#187; 0.50)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.500000<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0440\u0430\u0434\u0438\u0443\u0441 \u0441\u043e\u043f\u0440\u044f\u0436\u0435\u043d\u0438\u044f \u0432 AutoCAD \u0440\u0430\u0432\u043d\u044b\u043c 0.5 \u0435\u0434\u0438\u043d\u0438\u0446.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043a\u043e\u043c\u0430\u043d\u0434\u044b AutoCAD\u0430 \u0432\u044b\u0431\u0438\u0440\u0430\u044e\u0442 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u044b\u0435 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0435 \u0431\u0435\u0437 \u0432\u0441\u044f\u043a\u0438\u0445 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043e\u043a. \u0415\u0441\u043b\u0438 \u0412\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0435 SETVAR \u0434\u043b\u044f \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u044f \u043d\u043e\u0432\u043e\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u043e\u0439 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 \u0432 \u043f\u0440\u043e\u0446\u0435\u0441\u0441\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u043a\u043e\u043c\u0430\u043d\u0434\u044b, \u044d\u0442\u0430 \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043a\u0430 \u0431\u0443\u0434\u0435\u0442 \u0438\u043c\u0435\u0442\u044c \u0441\u0438\u043b\u0443 \u0442\u043e\u043b\u044c\u043a\u043e \u043a\u043e\u0433\u0434\u0430 \u0412\u044b \u043d\u0430\u0447\u043d\u0435\u0442\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0442\u044c \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0443\u044e \u043a\u043e\u043c\u0430\u043d\u0434\u0443 AutoC<\/span>A<span style=\"font-family: Times New Roman\">D\u0430. \u0421\u043f\u0438\u0441\u043e\u043a \u0442\u0435\u043a\u0443\u0449\u0438\u0445 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u044b\u0445 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0445 AutoCAD \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u0439\u0442\u0438 \u0432 \u043f\u0440\u0438\u043b\u043e\u0436\u0435\u043d\u0438\u0438 \u0410 \u0440\u0443\u043a\u043e\u0432\u043e\u0434\u0441\u0442\u0432\u0430 AutoCAD. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044e GETVAR.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260978\"><\/a>(sin<br \/>\n&lt;\u0443\u0433\u043e\u043b&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u0438\u043d\u0443\u0441 &lt;\u0443\u0433\u043b\u0430&gt; \u043a\u0430\u043a \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e, \u0433\u0434\u0435 &lt;\u0443\u0433\u043e\u043b&gt; \u0432\u044b\u0440\u0430\u0436\u0435\u043d \u0432 \u0440\u0430\u0434\u0438\u0430\u043d\u0430\u0445.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(sin 1.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.841471<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(sin 0.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0.000000<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260979\"><\/a>(sqrt<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043a\u0432\u0430\u0434\u0440\u0430\u0442\u043d\u044b\u0439 \u043a\u043e\u0440\u0435\u043d\u044c &lt;\u0447\u0438\u0441\u043b\u0430&gt; \u043a\u0430\u043a \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(sqrt 4)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2.000000<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(sqrt 2.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 1.414214<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260980\"><\/a>(strcase<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; [&lt;\u043f\u0440\u0438\u0437\u043d\u0430\u043a&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">STRCASE \u0431\u0435\u0440\u0435\u0442 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0443\u044e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443, \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u0443\u044e \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u043c &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0435\u0435 \u043a\u043e\u043f\u0438\u044e, \u043f\u0435\u0440\u0435\u0432\u0435\u0434\u044f \u0432\u0441\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b \u0430\u043b\u0444\u0430\u0432\u0438\u0442\u0430 \u0432 \u0432\u0435\u0440\u0445\u043d\u0438\u0439 \u0438\u043b\u0438 \u043d\u0438\u0436\u043d\u0438\u0439 \u0440\u0435\u0433\u0438\u0441\u0442\u0440 \u0432 \u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e\u0441\u0442\u0438 \u043e\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430 &lt;\u043f\u0440\u0438\u0437\u043d\u0430\u043a&gt;. \u0415\u0441\u043b\u0438 &lt;\u043f\u0440\u0438\u0437\u043d\u0430\u043a&gt; \u043e\u043f\u0443\u0449\u0435\u043d \u0438\u043b\u0438 \u0440\u0430\u0432\u0435\u043d nil, \u0442\u043e \u0432\u0441\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u044b \u0430\u043b\u0444\u0430\u0432\u0438\u0442\u0430 \u0432 &lt;\u0441\u0442\u0440\u043e\u043a\u0435&gt; \u0431\u0443\u0434\u0443\u0442 \u043f\u0435\u0440\u0435\u0432\u0435\u0434\u0435\u043d\u044b \u0432 \u043d\u0438\u0436\u043d\u0438\u0439 \u0440\u0435\u0433\u0438\u0441\u0442\u0440.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(strcase &#171;Sample&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;SAMPLE&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(strcase &#171;Sample&#187; \u0422)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;sample&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260981\"><\/a>(strcat<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u04301&gt; &lt;\u0441\u0442\u0440\u043e\u043a\u04302&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u0442\u0440\u043e\u043a\u0443, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u043e\u043c \u0441\u0446\u0435\u043f\u043b\u0435\u043d\u0438\u044f &lt;\u0441\u0442\u0440\u043e\u043a\u04381&gt;, &lt;\u0441\u0442\u0440\u043e\u043a\u04382&gt; \u0438 \u0442.\u0434.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(strcat &#171;a&#187; &#171;bout&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;about&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(strcat &#171;a&#187; &#171;b&#187; &#171;c&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;abc&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(strcat &#171;a&#187; &#171;&#187; &#171;c&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;ac&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260982\"><\/a>(strlen<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0434\u043b\u0438\u043d\u0443 \u0432 \u0441\u0438\u043c\u0432\u043e\u043b\u0430\u0445 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u043e\u0439 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u044b &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; \u043a\u0430\u043a \u0446\u0435\u043b\u0443\u044e \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u0443.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(stalen &#171;abcd&#187;) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 4<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(stalen &#171;ab&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 2<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(stalen &#171;&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260983\"><\/a>(subst<br \/>\n&lt;\u043d\u043e\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; &lt;\u0441\u0442\u0430\u0440\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u0435\u0442 &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; \u0432 \u043f\u043e\u0438\u0441\u043a\u0435 &lt;\u0441\u0442\u0430\u0440\u044b\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043a\u043e\u043f\u0438\u044e &lt;\u0441\u043f\u0438\u0441\u043a\u0430&gt; \u0441 \u0437\u0430\u043c\u0435\u043d\u043e\u0439 \u043a\u0430\u0436\u0434\u043e\u0433\u043e \u0432\u0441\u0442\u0440\u0435\u0447\u043d\u043e\u0433\u043e &lt;\u0441\u0442\u0430\u0440\u043e\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430&gt; \u043d\u0430 &lt;\u043d\u043e\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;. \u0415\u0441\u043b\u0438 &lt;\u0441\u0442\u0430\u0440\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; \u043d\u0435 \u043d\u0430\u0439\u0434\u0435\u043d \u0432 &lt;\u0441\u043f\u0438\u0441\u043a\u0435&gt;, SUBST \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &lt;\u0441\u043f\u0438\u0441\u043e\u043a&gt; \u043d\u0435\u0438\u0437\u043c\u0435\u043d\u043d\u044b\u043c.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq sample &#8216;(a b (c d) b))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(subst &#8216;qq &#8216;b sample)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A QQ (C D) QQ)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(subst &#8216;qq &#8216;z sample)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B (C D) B)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(subst &#8216;qq &#8216;(c d) sample)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B QQ B)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(subst &#8216;(qq &#8216;rr) &#8216;(c d) sample)<\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B (QQ RR) B)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(subst &#8216;(qq &#8216;rr) &#8216;z sample) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (A B (C D) B)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412 \u0441\u043e\u0447\u0435\u0442\u0430\u043d\u0438\u0438 \u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ASSOC, SUBST \u043e\u0431\u0435\u0441\u043f\u0435\u0447\u0438\u0432\u0430\u0435\u0442 \u0443\u0434\u043e\u0431\u043d\u044b\u0439 \u0441\u043f\u043e\u0441\u043e\u0431 \u0437\u0430\u043c\u0435\u043d\u044b \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u044b, \u043d\u0430\u0439\u0434\u0435\u043d\u043d\u043e\u0439 \u043f\u043e \u043a\u043b\u044e\u0447\u0443 \u0432 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u043e\u043c \u0441\u043f\u0438\u0441\u043a\u0435.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(stq who &#8216;((ferst john) (mid q) (last public)))<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq old<\/p>\n<p align=\"JUSTIFY\">(assoc &#8216;first who)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\"> ) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (FIRST JOHN)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq new &#8216;(first j))<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 (FIRST J)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(setq new old who)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 ((FIRST J) (MID Q) (LAST PUBLIC))<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260984\"><\/a>(substr<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; &lt;\u043d\u0430\u0447\u0430\u043b\u043e&gt; [&lt;\u0434\u043b\u0438\u043d\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u043e\u0434\u0441\u0442\u0440\u043e\u043a\u0443 &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;, \u043d\u0430\u0447\u0438\u043d\u0430\u044e\u0449\u0443\u044e\u0441\u044f \u0441 &lt;\u043d\u0430\u0447\u0430\u043b&gt;\u044c\u043d\u043e\u0433\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u0430 \u0438 \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0449\u0443\u044e \u0447\u0438\u0441\u043b\u043e \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432, \u0437\u0430\u0434\u0430\u043d\u043d\u043e\u0435 \u0432 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0435 &lt;\u0434\u043b\u0438\u043d\u0430&gt;. \u0415\u0441\u043b\u0438 &lt;\u0434\u043b\u0438\u043d\u0430&gt; \u043d\u0435 \u0443\u043a\u0430\u0437\u0430\u043d\u0430, \u0442\u043e \u043f\u043e\u0434\u0441\u0442\u0440\u043e\u043a\u0430 \u043f\u0440\u043e\u0434\u043e\u043b\u0436\u0430\u0435\u0442\u0441\u044f \u0434\u043e \u043a\u043e\u043d\u0446\u0430 &lt;\u0441\u0442\u0440\u043e\u043a\u0438&gt;. &lt;\u041d\u0430\u0447\u0430\u043b\u043e&gt; (\u0438 \u0434\u043b\u0438\u043d\u0430, \u0435\u0441\u043b\u0438 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442) \u0434\u043e\u043b\u0436\u043d\u044b \u0431\u044b\u0442\u044c \u043f\u043e\u043b\u043e\u0436\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c\u0438 \u0446\u0435\u043b\u044b\u043c\u0438 \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u0430\u043c\u0438. \u041f\u0435\u0440\u0432\u044b\u0439 \u0441\u0438\u043c\u0432\u043e\u043b &lt;\u0441\u0442\u0440\u043e\u043a\u0438&gt; &#8212; \u0441\u0438\u043c\u0432\u043e\u043b \u0441 \u043d\u043e\u043c\u0435\u0440\u043e\u043c 1.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(substr &#171;abcde&#187; 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;bcde&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(substr &#171;abcde&#187; 2 1)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;b&#187;<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(substr &#171;abcde&#187; 3 2)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;cd&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260985\"><\/a><br \/>\n(terpri)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442 \u043d\u043e\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435. \u041e\u043d\u0430 \u0442\u0430\u043a\u0436\u0435 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043d\u043e\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443. TERPRI \u043d\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u0432\u0432\u043e\u0434\u0430\/\u0432\u044b\u0432\u043e\u0434\u0430 \u0444\u0430\u0439\u043b\u043e\u0432. \u0414\u043b\u044f \u0437\u0430\u043f\u0438\u0441\u0438 \u043d\u043e\u0432\u043e\u0439 \u0441\u0442\u0440\u043e\u043a\u0438 \u0432 \u0444\u0430\u0439\u043b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0439\u0442\u0435 PRINT \u0438\u043b\u0438 PRI<\/span>NC.<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260986\"><\/a>(textscr)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f TEXTSCR \u043f\u0435\u0440\u0435\u043a\u043b\u044e\u0447\u0430\u0435\u0442 \u044d\u043a\u0440\u0430\u043d \u0441 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u043e\u0433\u043e \u0432 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u043e\u0439 \u0440\u0435\u0436\u0438\u043c \u0432 \u043e\u0434\u043d\u043e-\u044d\u043a\u0440\u0430\u043d\u043d\u044b\u0445 \u0441\u0438\u0441\u0442\u0435\u043c\u0430\u0445 (\u043a\u0430\u043a \u0444\u0443\u043d\u043a\u0446\u0438\u043e\u043d\u0430\u043b\u044c\u043d\u0430\u044f \u043a\u043b\u0430\u0432\u0438\u0448\u0430 &#171;FLIP SCREEN&#187; \u0432 AutoCAD). TEXTSCR \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044e GRAPHSCR.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172745\"><\/a><a name=\"_Ref465173586\"><\/a><a name=\"_Toc465260987\"><\/a><span style=\"font-family: Arial\">(trace<br \/>\n&lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt;..<\/span><span style=\"font-family: Arial\">.)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f &#8212; \u0441\u0440\u0435\u0434\u0441\u0442\u0432\u043e \u043e\u0442\u043b\u0430\u0434\u043a\u0438. \u041e\u043d\u0430 \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0437\u043d\u0430\u043a \u0442\u0440\u0430\u0441\u0441\u0438\u0440\u043e\u0432\u043a\u0438 \u0434\u043b\u044f \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u0445 &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u0439&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u0412 \u0442\u043e \u0432\u0440\u0435\u043c\u044f \u043a\u0430\u043a \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442\u0441\u044f, \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u043f\u043e\u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0442\u043e\u0447\u043a\u0430 \u0432\u0445\u043e\u0434\u0430 \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u044e (\u0441 \u043e\u0442\u0441\u0442\u0443\u043f\u043b\u0435\u043d\u0438\u0435\u043c \u043d\u0430 \u0433\u043b\u0443\u0431\u0438\u043d\u0443 \u0432\u043b\u043e\u0436\u0435\u043d\u043d\u043e\u0441\u0442\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438) \u0438 \u043f\u0435\u0447\u0430\u0442\u0430\u0435\u0442\u0441\u044f \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(trase my-func)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 MY-FUNC<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0438 \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0441\u0438\u043c\u0432\u043e\u043b \u0442\u0440\u0430\u0441\u0441\u0438\u0440\u043e\u0432\u043a\u0438 \u0434\u043b\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 MY-FUNC. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044e UNTRACE.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260988\"><\/a>(type<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 TYPE (\u0442\u0438\u043f) &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430&gt;, \u0433\u0434\u0435 TYPE &#8212; \u043e\u0434\u043d\u043e \u0438\u0437 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 (\u043a\u0430\u043a \u0430\u0442\u043e\u043c):<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">REAL \u0447\u0438\u0441\u043b\u0430 \u0441 \u043f\u043b\u0430\u0432\u0430\u044e\u0449\u0435\u0439 \u0437\u0430\u043f\u044f\u0442\u043e\u0439<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">FILE <span style=\"font-family: Times New Roman\">\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u043e\u0432<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">STR \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u044b\u0435 \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u044b<\/p>\n<p align=\"JUSTIFY\">INT \u0446\u0435\u043b\u044b\u0435 \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u044b<\/p>\n<p align=\"JUSTIFY\">SYM \u0441\u0438\u043c\u0432\u043e\u043b\u044b<\/p>\n<p align=\"JUSTIFY\">LIST \u0441\u043f\u0438\u0441\u043a\u0438 (\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f)<\/p>\n<p align=\"JUSTIFY\">SUBR \u0432\u043d\u0443\u0442\u0440\u0435\u043d\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 AutoLISP<\/p>\n<p align=\"JUSTIFY\">PITCKSET \u043d\u0430\u0431\u043e\u0440\u044b AutoCAD<\/p>\n<p align=\"JUSTIFY\">ENAME \u0438\u043c\u0435\u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 AutoCAD<\/p>\n<p align=\"JUSTIFY\">PAGETB \u0442\u0430\u0431\u043b\u0438\u0446\u0430 \u0434\u0438\u0441\u043f\u0435\u0442\u0447\u0435\u0440\u0430 \u0441\u0442\u0440\u0430\u043d\u0438\u0446<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 123 r 3.45 s &#171;Hello!&#187; x &#8216;(a b c))<\/p>\n<p align=\"JUSTIFY\">(setq f (open &#171;name&#187; &#171;r&#187;))<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(type &#8216;a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 SYM<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(type a)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 INT<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(type f)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 FILE<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(type r)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 REAL<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(type s)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 STR<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(type x) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 LIST<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(type +)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 SUBR<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u043f\u0440\u0438\u043c\u0435\u0440 \u0438\u043b\u043b\u044e\u0441\u0442\u0440\u0438\u0440\u0443\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 TYPE.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun isint (a)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(if (= (type a) &#8216;INT) ; \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043b\u0438 \u0442\u0438\u043f \u0446\u0435\u043b\u044b\u043c?<\/p>\n<p align=\"JUSTIFY\">\u0422 ; \u0435\u0441\u043b\u0438 \u0434\u0430 &#8212; \u0432\u0435\u0440\u043d\u0438 \u0422<\/p>\n<p align=\"JUSTIFY\">nil ; \u0435\u0441\u043b\u0438 \u043d\u0435\u0442 &#8212; \u0432\u0435\u0440\u043d\u0438 nil<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><a name=\"_Toc465260989\"><\/a><br \/>\n(untrace &lt;\u0444\u0443\u043d\u043a\u0446\u0438\u044f&gt;&#8230;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0443\u0431\u0438\u0440\u0430\u0435\u0442 \u0441\u0438\u043c\u0432\u043e\u043b \u0442\u0440\u0430\u0441\u0441\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f \u0434\u043b\u044f \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u044b\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u041e\u043d\u0430 \u0432\u044b\u0431\u043e\u0440\u043e\u0447\u043d\u043e \u0438\u0441\u043a\u043b\u044e\u0447\u0430\u0435\u0442 \u043f\u043e\u0448\u0430\u0433\u043e\u0432\u043e\u0435 \u0442\u0440\u0430\u0441\u0441\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435<\/span>.<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">H\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(untrace my-func)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 MY-FUNC<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0438 \u0443\u0431\u0438\u0440\u0430\u0435\u0442 \u0441\u0438\u043c\u0432\u043e\u043b \u0442\u0440\u0430\u0441\u0441\u0438\u0440\u043e\u0432\u043a\u0438 \u0434\u043b\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 MY-FUNC. \u0421\u043c\u043e\u0442\u0440\u0438\u0442\u0435 \u0442\u0430\u043a\u0436\u0435 TRACE.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260990\"><\/a><br \/>\n(ver)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0443\u044e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043d\u043e\u043c\u0435\u0440\u043e\u043c \u0442\u0435\u043a\u0443\u0449\u0435\u0439 \u0432\u0435\u0440\u0441\u0438\u0438 AutoLISP. \u041e\u043d\u0430 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0430 (\u0441\u043e\u0432\u043c\u0435\u0441\u0442\u043d\u043e \u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 EQUAL \u0434\u043b\u044f \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044f \u0441\u043e\u0432\u043c\u0435\u0441\u0442\u0438\u043c\u043e\u0441\u0442\u0438 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c). \u0424\u043e\u0440\u043c\u0430 \u0441\u0442\u0440\u043e\u043a\u0438:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">&#171;AutoLISP Release X.X&#187;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0433\u0434\u0435 \u0425.\u0425 &#8212; \u043d\u043e\u043c\u0435\u0440 \u0442\u0435\u043a\u0443\u0449\u0435\u0439 \u0432\u0435\u0440\u0441\u0438\u0438. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(ver) \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u044b\u0439 \u0432\u043e\u0437\u0432\u0440\u0430\u0442 &#171;AutoLISP Release 9.0&#187;<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260991\"><\/a><br \/>\n(while &lt;\u0442\u0435\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;&#8230;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442 &lt;\u0442\u0435\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u0438, \u0435\u0441\u043b\u0438 \u043e\u043d\u043e \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f nil, \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u0442 \u0434\u0440\u0443\u0433\u0438\u0435 \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f, \u0437\u0430\u0442\u0435\u043c \u0441\u043d\u043e\u0432\u0430 \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 &lt;\u0442\u0435\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt;. \u042d\u0442\u043e \u043f\u0440\u043e\u0434\u043e\u043b\u0436\u0430\u0435\u0442\u0441\u044f \u0434\u043e \u0442\u0435\u0445 \u043f\u043e\u0440, \u043f\u043e\u043a\u0430 &lt;\u0442\u0435\u0441\u0442-\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435&gt; \u043d\u0435 nil. \u0417\u0430\u0442\u0435\u043c WHILE \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u0430\u043c\u043e\u0435 \u043f\u043e\u0437\u0434\u043d\u0435\u0435 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e &lt;\u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f&gt;.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u0430\u043d\u043e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a 1)<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0442\u043e\u0433\u0434\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(while (&lt;= a 10)<\/p>\n<p align=\"JUSTIFY\">(some-func a)<\/p>\n<p align=\"JUSTIFY\">(setq a (1+ a))<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0431\u0443\u0434\u0435\u0442 \u0432\u044b\u0437\u0432\u0430\u043d\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f SOME-FUNC \u0434\u0435\u0441\u044f\u0442\u044c \u0440\u0430\u0437, \u0441 \u0410 \u0440\u0430\u0432\u043d\u044b\u043c \u043e\u0442 1 \u0434\u043e 10. \u0411\u0443\u0434\u0435\u0442 \u0437\u0430\u0442\u0435\u043c \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0435\u043d\u043e 11, \u0447\u0442\u043e \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435\u043c \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u044f.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172750\"><\/a><a name=\"_Ref465173592\"><\/a><a name=\"_Toc465260992\"><\/a><span style=\"font-family: Arial\">(write-char<br \/>\n&lt;\u0447\u0438\u0441\u043b\u043e&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442 \u043e\u0434\u0438\u043d \u0441\u0438\u043c\u0432\u043e\u043b \u043d\u0430 \u044d\u043a\u0440\u0430\u043d \u0438\u043b\u0438 \u0432 \u043e\u0442\u043a\u0440\u044b\u0442\u044b\u0439 \u0444\u0430\u0439\u043b, \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u0439 &lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0430\u0439\u043b\u0430&gt;. &lt;\u0447\u0438\u0441\u043b\u043e&gt;) &#8212; \u044d\u0442\u043e \u043a\u043e\u0434 ASII \u0441\u0438\u043c\u0432\u043e\u043b\u0430, \u0438 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435\u043c \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u043c\u044b\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(write-char 67)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 67 \u0438 \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442 \u043b\u0430\u0442\u0438\u043d\u0441\u043a\u0443\u044e \u0431\u0443\u043a\u0432\u0443 \u0421 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435.<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0435\u0434\u043f\u043e\u043b\u043e\u0436\u0438\u043c, \u0447\u0442\u043e F &#8212; \u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0433\u043e \u0444\u0430\u0439\u043b\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(write-char 67 f)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 67 \u0438 \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442 \u043b\u0430\u0442\u0438\u043d\u0441\u043a\u0443\u044e \u0431\u0443\u043a\u0432\u0443 \u0421 \u0432 \u044d\u0442\u043e\u0442 \u0444\u0430\u0439\u043b.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260993\"><\/a>((write-line<br \/>\n&lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; [&lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442 \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0443\u044e \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0443 &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt; \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u0438\u043b\u0438 \u0432 \u043e\u0442\u043a\u0440\u044b\u0442\u044b\u0439 \u0444\u0430\u0439\u043b, \u0437\u0430\u0434\u0430\u043d\u043d\u044b\u0439 &lt;\u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0430\u0439\u043b\u0430&gt;. \u041e\u043d\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &lt;\u0441\u0442\u0440\u043e\u043a\u0443&gt;, \u0432\u0437\u044f\u0442\u0443\u044e \u0432 \u043a\u0430\u0432\u044b\u0447\u043a\u0438, \u0438 \u043e\u043f\u0443\u0441\u043a\u0430\u0435\u0442 \u043a\u0430\u0432\u044b\u0447\u043a\u0438, \u043a\u043e\u0433\u0434\u0430 \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0432 \u0444\u0430\u0439\u043b. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u043f\u0440\u0435\u0434\u043f\u043e\u043b\u043e\u0436\u0438\u043c, \u0447\u0442\u043e F \u044d\u0442\u043e \u0434\u043e\u043f\u0443\u0441\u0442\u0438\u043c\u044b\u0439 \u043e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u043e\u0442\u043a\u0440\u044b\u0442\u043e\u0433\u043e \u0444\u0430\u0439\u043b\u0430:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(write-line &#171;Test&#187; f)<\/span><span style=\"font-family: Times New Roman\"> \u0437\u0430\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u0442 Test \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;Test&#187;.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260994\"><\/a>(zerop<br \/>\n&lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 T, \u0435\u0441\u043b\u0438 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442&gt; \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0438\u043b\u0438 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e, \u0440\u0430\u0432\u043d\u043e\u0435 \u043d\u0443\u043b\u044e, \u0438\u043d\u0430\u0447\u0435 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil. \u041e\u043d\u0430 \u043d\u0435 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0430 \u0434\u043b\u044f \u0434\u0440\u0443\u0433\u0438\u0445 \u0442\u0438\u043f\u043e\u0432 &lt;\u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432&gt;.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(zerop 0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(zerop 0.0)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0422<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(zerop 0.0001) <\/span><span style=\"font-family: Times New Roman\">\u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 nil<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260995\"><\/a><br \/>\n(*error* &lt;\u0441\u0442\u0440\u043e\u043a\u0430&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u043e, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c\u0430\u044f \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u044f, \u0442\u0440\u0430\u043a\u0442\u0443\u044e\u0449\u0430\u044f \u043e\u0448\u0438\u0431\u043a\u0438. \u0415\u0441\u043b\u0438 \u043e\u043d\u0430 \u043d\u0435 nil, \u043e\u043d\u0430 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442\u0441\u044f \u043a\u0430\u043a \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u0441\u044f\u043a\u0438\u0439 \u0440\u0430\u0437, \u043a\u043e\u0433\u0434\u0430 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u043f\u0440\u043e\u0432\u0435\u0440\u043a\u0430 \u043e\u0448\u0438\u0431\u043e\u043a AutoLISP. \u041e\u043d\u0430 \u0432\u044b\u0434\u0430\u0435\u0442 \u043e\u0434\u0438\u043d \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &#8212; \u0441\u0442\u0440\u043e\u043a\u0443, \u0441\u043e\u0441\u0442\u043e\u044f\u0449\u0443\u044e \u0438\u0437 \u043e\u043f\u0438\u0441\u0430\u043d\u0438\u044f \u043e\u0448\u0438\u0431\u043a\u0438.<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun *error* (msg)<\/p>\n<p align=\"JUSTIFY\">(princ &#171;error:&#187;)<\/p>\n<p align=\"JUSTIFY\">(princ msg)<\/p>\n<p align=\"JUSTIFY\">(terpri)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0431\u0443\u0434\u0435\u0442 \u0434\u0435\u043b\u0430\u0442\u044c \u0442\u043e \u0436\u0435 \u0441\u0430\u043c\u043e\u0435, \u0447\u0442\u043e \u0438 \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u0430\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0442\u0440\u0430\u043a\u0442\u043e\u0432\u043a\u0438 \u043e\u0448\u0438\u0431\u043e\u043a AutoLISP &#8212; \u043f\u0435\u0447\u0430\u0442\u044c &#171;error:&#187; \u0438 \u043e\u043f\u0438\u0441\u0430\u043d\u0438\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<h2><a name=\"#2\"><\/a>\u041f\u0420\u0418\u041c\u0418\u0422\u0418\u0412\u042b \u0418 \u041c\u0415\u0425\u0410\u041d\u0418\u0417\u041c \u0414\u041e\u0421\u0422\u0423\u041f\u0410<\/h2>\n<p><a href=\"#21\">\u0421\u043f\u0435\u0446\u0438\u0430\u043b\u044c\u043d\u044b\u0435 \u0442\u0438\u043f\u044b \u0434\u0430\u043d\u043d\u044b\u0445 <\/a><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a href=\"#22\">\u041c\u0430\u043d\u0438\u043f\u0443\u043b\u044f\u0446\u0438\u044f<br \/>\n\u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 selection &#8212; set <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#23\">\u0424\u0443\u043d\u043a\u0446\u0438\u0438<br \/>\n\u0438\u043c\u0435\u043d\u0438 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 (entity name) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#24\">\u0424\u0443\u043d\u043a\u0446\u0438\u0438<br \/>\n\u0434\u0430\u043d\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 (entity data) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#25\">\u041f\u0440\u0438\u043c\u0435\u043d\u0435\u043d\u0438\u0435<br \/>\n\u0432 AutoCAD\u0435 \u0438\u043c\u0435\u043d \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0438 \u043d\u0430\u0431\u043e\u0440\u043e\u0432 \u0432\u044b\u0431\u043e\u0440\u0430 <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#26\">\u0414\u043e\u0441\u0442\u0443\u043f<br \/>\n\u043a \u0442\u0430\u0431\u043b\u0438\u0446\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#27\">\u0414\u043e\u0441\u0442\u0443\u043f<br \/>\n\u043a \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u043e\u043c\u0443 \u044d\u043a\u0440\u0430\u043d\u0443 \u0438 \u0443\u0441\u0442\u0440\u043e\u0439\u0441\u0442\u0432\u0430\u043c \u0432\u0432\u043e\u0434\u0430 <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#28\">\u041e\u0431\u0440\u0430\u0437\u0446\u044b<br \/>\n\u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c <\/a><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u0441\u0435\u043e\u0431\u044a\u0435\u043c\u043b\u044e\u0449\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 AutoLISP\u0430 &#171;set&#187; \u043e\u0431\u0435\u0441\u043f\u0435\u0447\u0438\u0432\u0430\u044e\u0442 \u0434\u043e\u0441\u0442\u0443\u043f \u043a \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430\u043c AutoCAD\u0430, \u043a \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u043e\u043c\u0443 \u044d\u043a\u0440\u0430\u043d\u0443 \u0438 \u043a \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c\u0430\u043c \u0432\u0432\u043e\u0434\u0430. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u044b\u0431\u0438\u0440\u0430\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b , \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0442\u044c \u0438\u0445 \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u044b \u0438 \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0438\u0445. \u041d\u0430\u0431\u043e\u0440\u044b \u0432\u044b\u0431\u043e\u0440\u0430 (selection &#8212; sets ) \u043c\u043e\u0436\u043d\u043e \u043f\u043e\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u0432 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0435 LISP\u0430, \u044d\u0442\u043e \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u043a\u043e\u043b\u043b\u0435\u043a\u0446\u0438\u0438 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432. \u0414\u043b\u044f \u043f\u0440\u044f\u043c\u043e\u0433\u043e \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u043d\u0435\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0439, \u043e\u0434\u043d\u0430\u043a\u043e \u043c\u043e\u0436\u043d\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e COMMAND , \u0447\u0442\u043e\u0431\u044b \u043f\u043e\u0434\u0447\u0438\u043d\u0438\u0442\u044c\u0441\u044f \u043e\u0431\u044b\u0447\u043d\u044b\u043c \u043a\u043e\u043c\u0430\u043d\u0434\u0430\u043c AutoCAD \u0434\u043b\u044f \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u044d\u0442\u043e\u0433\u043e.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260998\"><\/a>\u0421\u043f\u0435\u0446\u0438\u0430\u043b\u044c\u043d\u044b\u0435<br \/>\n\u0442\u0438\u043f\u044b \u0434\u0430\u043d\u043d\u044b\u0445<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0414\u0432\u0430 \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u044c\u043d\u044b\u0445 \u0442\u0438\u043f\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 AutoLISP\u0430 \u044f\u0432\u043b\u044f\u044e\u0442\u0441\u044f \u0438\u043d\u0441\u0442\u0440\u0443\u043c\u0435\u043d\u0442\u043e\u043c , \u043e\u0431\u0435\u0441\u043f\u0435\u0447\u0438\u0432\u0430\u044e\u0449\u0438\u043c \u0434\u043e\u0441\u0442\u0443\u043f \u043a \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430\u043c AutoCAD: \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 ( entity name ) \u0438 \u043d\u0430\u0431\u043e\u0440 \u0432\u044b\u0431\u043e\u0440a ( selection &#8212; set ). \u042d\u0442\u0438\u043c\u0438 \u0442\u0438\u043f\u0430\u043c\u0438 \u0434\u0430\u043d\u043d\u044b\u0445 \u043c\u0430\u043d\u0438\u043f\u0443\u043b\u0438\u0440\u0443\u044e\u0442 \u0442\u043e\u043b\u044c\u043a\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0438 , \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0443\u044e\u0442 \u043d\u0430 \u043e\u0441\u043d\u043e\u0432\u0430\u043d\u0438\u0438 \u0438\u0445 , \u0438 \u0438\u0445 \u0432\u043d\u0443\u0442\u0440\u0435\u043d\u043d\u044f\u044f \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0430 \u043d\u0435 \u043a\u0430\u0441\u0430\u0435\u0442\u0441\u044f \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0438\u0441\u0442\u0430 LISP. \u0418\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0438\u043c\u0435\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0432 \u0443\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u0435 \u0444\u0430\u0439\u043b\u0430, \u043e\u0431\u0441\u043b\u0443\u0436\u0438\u0432\u0430\u044e\u0449\u0435\u043c \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440 \u0447\u0435\u0440\u0442\u0435\u0436\u0435\u0439 AutoCAD, \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u043c AutoLISP \u043c\u043e\u0436\u0435\u0442 \u043d\u0430\u0439\u0442\u0438 \u0431\u0430\u0437\u0443 \u0434\u0430\u043d\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0438\u043b\u0438 \u0438\u0445 \u0432\u0435\u043a\u0442\u043e\u0440\u044b (\u0435\u0441\u043b\u0438 \u0435\u0441\u0442\u044c \u0432\u044b\u0432\u043e\u0434 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d). \u041d\u0430\u0431\u043e\u0440\u044b \u0432\u044b\u0431\u043e\u0440\u0430 \u044d\u0442\u043e \u043f\u0440\u043e\u0441\u0442\u043e \u043a\u043e\u043b\u043b\u0435\u043a\u0446\u0438\u044f \u0438\u043c\u0435\u043d \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432.<\/p>\n<p align=\"JUSTIFY\">\u0418\u043c\u0435\u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0438 \u043d\u0430\u0431\u043e\u0440\u044b \u0432\u044b\u0431\u043e\u0440\u0430 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b \u0442\u043e\u043b\u044c\u043a\u043e \u0432 \u0442\u0435\u0447\u0435\u043d\u0438\u0435 \u0441\u0435\u0430\u043d\u0441\u0430 \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f , \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u043c \u043e\u043d\u0438 \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u044e\u0442\u0441\u044f AutoCAD\u043e\u043c.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465260999\"><\/a>\u041c\u0430\u043d\u0438\u043f\u0443\u043b\u044f\u0446\u0438\u044f<br \/>\n\u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 selection &#8212; set<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261000\">(<br \/>\nssget [&lt; \u0440\u0435\u0436\u0438\u043c &gt;] [&lt;\u0442\u043e\u04471&gt; [&lt;\u0442\u043e\u04472&gt;]]) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261001\">( sslength &lt;ss&gt;) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261002\">(ssname &lt;ss&gt; &lt;index&gt;) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261003\">(ssadd [&lt;ename&gt; [&lt;ss&gt;]]) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261004\">(ssdel &lt;ename&gt; &lt;ss&gt;) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261005\">(ssmemb &lt;ename&gt; &lt;ss&gt;) <\/a><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u044e\u0442 \u0440\u0430\u0437\u043b\u0438\u0447\u043d\u044b\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f \u043d\u0430 \u043e\u0441\u043d\u043e\u0432\u0430\u043d\u0438\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 selection &#8212; sets (\u043d\u0430\u0431\u043e\u0440\u044b \u0432\u044b\u0431\u043e\u0440\u0430 ).<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261000\"><\/a>(<br \/>\nssget [&lt; \u0440\u0435\u0436\u0438\u043c &gt;] [&lt;\u0442\u043e\u04471&gt; [&lt;\u0442\u043e\u04472&gt;]])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e selection &#8212; set c \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 SSGET. \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u043c &lt; \u0440\u0435\u0436\u0438\u043c &gt; \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u0430\u044f \u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0430 , \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043e\u0437\u043d\u0430\u0447\u0430\u0435\u0442 \u0442\u0438\u043f \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u043c\u043e\u0433\u043e \u0432\u044b\u0431\u043e\u0440\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 . \u042d\u0442\u043e \u043c\u043e\u0433\u0443\u0442 \u0431\u044b\u0442\u044c \u0431\u0443\u043a\u0432\u044b &#187; W &#187; , &#187; C &#187; , &#187; L&#187; , \u0438\u043b\u0438 &#187; P &#187; , \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u044f \u0440\u0435\u0436\u0438\u043c\u043e\u0432 \u0432 AutoCAD\u0435 &#187; Window&#187; (\u043e\u043a\u043d\u043e) , Crossing &#171;(\u043f\u0435\u0440\u0435\u0441\u0435\u0447\u0435\u043d\u0438\u0435) , &#187; Last &#187; (\u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439), &#187; Previous&#187; (\u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u0439). &lt; \u0442\u043e\u04471 &gt; \u0438 &lt; \u0442\u043e\u04472 &gt; \u044d\u0442\u043e \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u0442\u043e\u0447\u043a\u0438 \u0432 \u0441\u043f\u0438\u0441\u043a\u0430\u0445 , \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0442 \u0442\u043e\u0447\u043a\u0438 , \u0443\u043c\u0435\u0441\u0442\u043d\u044b\u0435 \u0434\u043b\u044f \u0432\u044b\u0431\u043e\u0440\u0430. \u041e\u0431\u043e\u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0442\u043e\u0447\u043a\u0438 \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430 &lt; \u0440\u0435\u0436\u0438\u043c &gt; \u044d\u043a\u0432\u0438\u0432\u0430\u043b\u0435\u043d\u0442\u043d\u043e \u0432\u044b\u0431\u043e\u0440\u0443 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0443\u043a\u0430\u0437\u0430\u043d\u0438\u0435\u043c \u0435\u0434\u0438\u043d\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438. \u0415\u0441\u043b\u0438 \u0432\u0441\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u043e\u043f\u0443\u0449\u0435\u043d\u044b , SSGET \u043f\u043e\u0434\u0441\u043a\u0430\u0436\u0435\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044e \u0447\u0435\u0440\u0435\u0437 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c AutoCAD\u0430 &#187; Select objects: &#171;(\u0432\u044b\u0431\u0435\u0440\u0438\u0442\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b) , \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044f \u0438\u043d\u0442\u0435\u0440\u0430\u043a\u0442\u0438\u0432\u043d\u044b\u0439 \u0432\u044b\u0431\u043e\u0440 \u043d\u0430\u0431\u043e\u0440\u0430.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0438\u043c\u0435\u0440\u044b<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ssget)<\/span><span style=\"font-family: Times New Roman\"> \u0421\u043f\u0440\u0430\u0448\u0438\u0432\u0430\u0435\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u043e\u0431\u0449\u0438\u0439 \u0432\u044b\u0431\u043e\u0440 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ssget &#171;P&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0412\u044b\u0431\u0438\u0440\u0430\u0435\u0442 \u0441\u0430\u043c\u044b\u0439 \u043d\u043e\u0432\u044b\u0439 \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0439 \u043d\u0430\u0431\u043e\u0440.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ssget &#171;L&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0412\u044b\u0431\u0438\u0440\u0430\u0435\u0442 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u043f\u0440\u0438\u0431\u0430\u0432\u043b\u0435\u043d\u043d\u044b\u0439 \u043a \u0431\u0430\u0437\u0435 \u0434\u0430\u043d\u043d\u044b\u0445.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ssget &#8216;(2 2))<\/span><span style=\"font-family: Times New Roman\"> \u0412\u044b\u0431\u0438\u0440\u0430\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u043f\u0440\u043e\u0445\u043e\u0434\u044f\u0449\u0438\u0439 \u0447\u0435\u0440\u0435\u0437 \u0442\u043e\u0447\u043a\u0443 2 , 2 .<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ssget &#171;W&#187; &#8216;(0 0) &#8216;(5 5))<\/span><span style=\"font-family: Times New Roman\"> \u0412\u044b\u0431\u0438\u0440\u0430\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u0432\u043d\u0443\u0442\u0440\u0438 \u043e\u043a\u043d\u0430 \u0441 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0430\u043c\u0438 \u0442\u043e\u0447\u0435\u043a 0, 0 5 ,5 .<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(ssget &#171;C&#187; &#8216;(0 0) &#8216;(1 1))<\/span><span style=\"font-family: Times New Roman\"> \u0412\u044b\u0431\u0438\u0440\u0430\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u043f\u0435\u0440\u0435\u0441\u0435\u043a\u0430\u044e\u0449\u0438\u0435 \u0431\u043e\u043a\u0441 \u0441 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0430\u043c\u0438 \u0442\u043e\u0447\u0435\u043a 0 , 0 1 , 1 .<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u044e\u0442\u0441\u044f, \u043a\u043e\u0433\u0434\u0430 SSGET \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432. \u041d\u0435\u0442 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u0438 \u043e \u0442\u043e\u043c, \u0441\u043a\u043e\u043b\u044c\u043a\u043e \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0441\u043e\u0445\u0440\u0430\u043d\u044f\u0435\u0442\u0441\u044f (\u043a\u0430\u043a \u0430\u043b\u044c\u0442\u0435\u0440\u043d\u0430\u0442\u0438\u0432\u0443 \u0441\u043c\u043e\u0442\u0440\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044e ENTSEL , \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u0443\u044e \u043d\u0438\u0436\u0435). Selection -sets \u0432\u0440\u0435\u043c\u0435\u043d\u043d\u043e \u043f\u043e\u0433\u043b\u043e\u0449\u0430\u044e\u0442 \u0449\u0435\u043b\u0438 \u0444\u0430\u0439\u043b\u0430 AutoCAD , \u043f\u043e\u044d\u0442\u043e\u043c\u0443 LISP\u0443 \u043d\u0435 \u0440\u0430\u0437\u0440\u0435\u0448\u0430\u0435\u0442\u0441\u044f \u0438\u043c\u0435\u0442\u044c \u0431\u043e\u043b\u0435\u0435 6-\u0438 \u043e\u0434\u043d\u043e\u0432\u0440\u0435\u043c\u0435\u043d\u043d\u043e \u043e\u0442\u043a\u0440\u044b\u0442\u044b\u0445 \u0444\u0430\u0439\u043b\u043e\u0432. \u0415\u0441\u043b\u0438 \u044d\u0442\u043e\u0442 \u043f\u0440\u0435\u0434\u0435\u043b \u0434\u043e\u0441\u0442\u0438\u0433\u043d\u0443\u0442 , AutoCAD \u043e\u0442\u043a\u0430\u0436\u0435\u0442\u0441\u044f \u0441\u043e\u0437\u0434\u0430\u0432\u0430\u0442\u044c \u043b\u044e\u0431\u044b\u0435 \u0434\u0440\u0443\u0433\u0438\u0435 \u043d\u0430\u0431\u043e\u0440\u044b \u0432\u044b\u0431\u043e\u0440\u0430 (selection -sets) \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442 &#187; nil &#187; \u043d\u0430 \u0432\u0441\u0435 \u0432\u044b\u0437\u043e\u0432\u044b AutoCAD\u0430.<\/p>\n<p align=\"JUSTIFY\">\u041f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f \u043d\u0430\u0431\u043e\u0440\u0430 \u0432\u044b\u0431\u043e\u0440\u0430 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043f\u0435\u0440\u0435\u0434\u0430\u043d\u0430 AutoCAD\u0443 \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u043b\u044e\u0431\u0443\u044e \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0443 &#171;Select objects:&#187; \u0432 \u0432\u044b\u0431\u043e\u0440\u0435 &#171;Last&#187;. \u041e\u043d\u0430 \u0432\u044b\u0431\u0435\u0440\u0435\u0442 \u0432\u0441\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b \u0432 \u043d\u0430\u0431\u043e\u0440\u0435 LISP\u0430, \u043a\u0430\u043a \u0431\u044b \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u044f \u0438\u0445 \u0432 \u043e\u043a\u043e\u0448\u043a\u043e (\u043e\u0431\u0440\u0430\u0442\u0438\u0442\u0435 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435, \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0435 \u044d\u0442\u0438\u043c \u0441\u043f\u043e\u0441\u043e\u0431\u043e\u043c \u043d\u0435 \u043d\u0443\u0436\u0434\u0430\u044e\u0442\u0441\u044f \u0432 \u0432\u044b\u0432\u043e\u0434\u0435 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d).<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261001\"><\/a>(<br \/>\nsslength &lt;ss&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e , \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0449\u0435\u0435 \u043a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0432 \u043d\u0430\u0431\u043e\u0440\u0435 \u0432\u044b\u0431\u043e\u0440\u0430 &lt;ss&gt;. \u041d\u0430\u0431\u043e\u0440\u044b \u043d\u0438\u043a\u043e\u0433\u0434\u0430 \u043d\u0435 \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0442 \u0434\u0443\u0431\u043b\u0438\u043a\u0430\u0442\u043e\u0432 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261002\"><\/a><br \/>\n(ssname &lt;ss&gt; &lt;index&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 &lt;index&gt;-\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u043d\u0430\u0431\u043e\u0440\u0430 &lt;ss&gt;. \u0415\u0441\u043b\u0438 &lt;index&gt; \u043e\u0442\u0440\u0438\u0446\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0438\u043b\u0438 \u0431\u043e\u043b\u044c\u0448\u0435 \u0441\u0430\u043c\u043e\u0433\u043e \u0431\u043e\u043b\u044c\u0448\u0435\u0433\u043e \u0432\u044b\u0447\u0438\u0441\u043b\u044f\u0435\u043c\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u043d\u0430\u0431\u043e\u0440\u0435 \u0432\u044b\u0431\u043e\u0440\u0430 , \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f &#171;nil&#187;. \u041f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u043d\u0430\u0431\u043e\u0440\u0430 \u0438\u043c\u0435\u0435\u0442 \u0438\u043d\u0434\u0435\u043a\u0441 &#171;0&#187;. \u0418\u043c\u0435\u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0432 \u043d\u0430\u0431\u043e\u0440\u0435 , \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u0435\u043c\u044b\u0445 \u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 SSGET , \u0432\u0441\u0435\u0433\u0434\u0430 \u0431\u0443\u0434\u0443\u0442 \u0438\u043c\u0435\u043d\u0430\u043c\u0438 \u0433\u043b\u0430\u0432\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 . \u041f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b (Block attributes \u0438 Polyline vertices) \u043d\u0435 \u0431\u0443\u0434\u0443\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0442\u044c\u0441\u044f ( \u043d\u043e, \u0441\u043c\u043e\u0442\u0440\u0438 \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u0443\u044e \u043d\u0438\u0436\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u044e ENTNEXT, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0434\u0435\u043b\u0430\u0435\u0442 \u0434\u043e\u0441\u0442\u0443\u043f\u043d\u044b\u043c\u0438 \u0438\u0445).<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261003\"><\/a>(ssadd<br \/>\n[&lt;ename&gt; [&lt;ss&gt;]])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432, \u0444\u0443\u043d\u043a\u0446\u0438\u044f SSADD \u0441\u043e\u0437\u0434\u0430\u0435\u0442 \u043d\u043e\u0432\u044b\u0439 \u043d\u0430\u0431\u043e\u0440 \u0432\u044b\u0431\u043e\u0440\u0430 \u0431\u0435\u0437 \u0447\u043b\u0435\u043d\u043e\u0432. \u0415\u0441\u043b\u0438 \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0441 \u0435\u0434\u0438\u043d\u0441\u0442\u0432\u0435\u043d\u043d\u044b\u043c \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u043c \u0438\u043c\u0435\u043d\u0438 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0444\u0443\u043d\u043a\u0446\u0438\u044f SSADD \u0441\u043e\u0437\u0434\u0430\u0435\u0442 \u043d\u043e\u0432\u044b\u0439 \u043d\u0430\u0431\u043e\u0440 \u0432\u044b\u0431\u043e\u0440\u0430, \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0449\u0438\u0439 \u044d\u0442\u043e \u0435\u0434\u0438\u043d\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0435 \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430. \u0415\u0441\u043b\u0438 \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0441 \u0438\u043c\u0435\u043d\u0435\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0438 \u0441 \u043d\u0430\u0431\u043e\u0440\u043e\u043c \u0432\u044b\u0431\u043e\u0440\u0430, \u043e\u043d\u0430 \u0434\u043e\u0431\u0430\u0432\u043b\u044f\u0435\u0442 \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043a \u043d\u0430\u0431\u043e\u0440\u0443. \u0424\u0443\u043d\u043a\u0446\u0438\u044f SSADD \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043d\u043e\u0432\u044b\u0439 \u0438\u043b\u0438 \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u043d\u0430\u0431\u043e\u0440. \u0417\u0430\u043f\u043e\u043c\u043d\u0438\u0442\u0435, \u0447\u0442\u043e \u043f\u0440\u0438 \u0434\u043e\u0431\u0430\u0432\u043b\u0435\u043d\u0438\u0438 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043a \u043d\u0430\u0431\u043e\u0440\u0443, \u043d\u043e\u0432\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0444\u0438\u0437\u0438\u0447\u0435\u0441\u043a\u0438 \u043f\u0440\u0438\u0441\u043e\u0435\u0434\u0438\u043d\u044f\u0435\u0442\u0441\u044f \u043a \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0435\u043c\u0443 \u043d\u0430\u0431\u043e\u0440\u0443, \u0438 \u043d\u0430\u0431\u043e\u0440, \u043f\u0440\u043e\u0445\u043e\u0434\u044f\u0449\u0438\u0439 \u043a\u0430\u043a &lt;ss&gt;, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f, \u043a\u0430\u043a \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c, \u0435\u0441\u043b\u0438 \u0434\u0440\u0443\u0433\u0438\u043c \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u043c \u043f\u0440\u0438\u0441\u0432\u0430\u0438\u0432\u0430\u0435\u0442\u0441\u044f \u043a\u0430\u0442\u0435\u0433\u043e\u0440\u0438\u044f &#8212; \u043d\u0430\u0431\u043e\u0440, \u043e\u043d\u0438 \u0431\u0443\u0434\u0443\u0442 \u043e\u0442\u0440\u0430\u0436\u0430\u0442\u044c \u0442\u0430\u043a\u0436\u0435 \u0441\u043b\u043e\u0436\u0435\u043d\u0438\u0435. \u0415\u0441\u043b\u0438 \u0432 \u043d\u0430\u0431\u043e\u0440\u0435 \u0443\u0436\u0435 \u0435\u0441\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0441 \u0442\u0430\u043a\u0438\u043c \u0436\u0435 \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0435\u043c, \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 SSADD \u0431\u0443\u0434\u0435\u0442 \u043f\u0440\u043e\u0438\u0433\u043d\u043e\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043e; \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u044f \u043e\u0431 \u043e\u0448\u0438\u0431\u043a\u0435 \u043d\u0435 \u0431\u0443\u0434\u0435\u0442.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261004\"><\/a>(ssdel<br \/>\n&lt;ename&gt; &lt;ss&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f SSDEL \u0443\u0434\u0430\u043b\u044f\u0435\u0442 \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 &lt;ename&gt; \u0438\u0437 \u043d\u0430\u0431\u043e\u0440\u0430 &lt;ss&gt; \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043d\u0430\u0431\u043e\u0440\u0430 &lt;ss&gt;. \u0417\u0430\u043f\u043e\u043c\u043d\u0438\u0442\u0435 , \u0447\u0442\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u0444\u0438\u0437\u0438\u0447\u0435\u0441\u043a\u0438 \u0443\u0434\u0430\u043b\u044f\u044e\u0442\u0441\u044f \u0438\u0437 \u043d\u0430\u0431\u043e\u0440\u0430 , \u043a\u0430\u043a \u043e\u043f\u043f\u043e\u0437\u0438\u0446\u0438\u044f \u043d\u043e\u0432\u043e\u043c\u0443 \u043d\u0430\u0431\u043e\u0440\u0443, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u044e\u0449\u0435\u043c\u0443\u0441\u044f \u0441 \u0443\u0434\u0430\u043b\u0435\u043d\u043d\u044b\u043c \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u043c. \u0415\u0441\u043b\u0438 \u0432 \u043d\u0430\u0431\u043e\u0440\u0435 \u043d\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f &#171;nil&#187;.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261005\"><\/a><br \/>\n(ssmemb &lt;ename&gt; &lt;ss&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 , \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043b\u0438 \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 &lt;ename&gt; \u0447\u043b\u0435\u043d\u043e\u043c \u043d\u0430\u0431\u043e\u0440\u0430 \u0432\u044b\u0431\u043e\u0440\u0430 &lt;ss&gt;. \u0415\u0441\u043b\u0438 \u044d\u0442\u043e \u0442\u0430\u043a , \u0444\u0443\u043d\u043a\u0446\u0438\u044f SSMEMB \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 &lt;ename&gt;. \u0415\u0441\u043b\u0438 \u043d\u0435\u0442, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;nil&#187;.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261006\"><\/a>\u0424\u0443\u043d\u043a\u0446\u0438\u0438<br \/>\n\u0438\u043c\u0435\u043d\u0438 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 (entity name)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261007\">(entnext [&lt;ename&gt;]) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261008\">(entlast) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261009\">(entsel [&lt;prompt&gt;]) <\/a><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u044e\u0442 \u0440\u0430\u0437\u043b\u0438\u0447\u043d\u044b\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f \u0441 \u0438\u043c\u0435\u043d\u0435\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0432\u043a\u043b\u044e\u0447\u0430\u044f \u0432\u0432\u043e\u0434. \u0418\u043c\u0435\u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u043c\u043e\u0433\u0443\u0442 \u043f\u0440\u043e\u0445\u043e\u0434\u0438\u0442\u044c \u0432 AutoCAD\u0435 \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u043b\u044e\u0431\u0443\u044e \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0443 &#187; Select objects: &#187; , \u0434\u043b\u044f \u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u043e\u0442\u0432\u0435\u0442 &#171;Last&#187; \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u0435\u043d. \u0412 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u0435 \u0431\u0443\u0434\u0435\u0442 \u0432\u044b\u0431\u0440\u0430\u043d\u043e \u043d\u0430\u0437\u0432\u0430\u043d\u0438\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 , \u043a\u0430\u043a \u0435\u0441\u043b\u0438 \u0431\u044b \u043e\u043d \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u043b\u0441\u044f \u0432 \u043e\u043a\u043e\u0448\u043a\u043e.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261007\"><\/a>(entnext<br \/>\n[&lt;ename&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432, \u044d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u043d\u0435\u0443\u0434\u0430\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u0431\u0430\u0437\u0435 \u0434\u0430\u043d\u043d\u044b\u0445. \u0415\u0441\u043b\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTNEXT \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0441 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 &lt;ename&gt;, \u043e\u043d\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u043d\u0435\u0443\u0434\u0430\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0433\u043e \u0437\u0430 &lt;ename&gt; \u0432 \u0431\u0430\u0437\u0435 \u0434\u0430\u043d\u043d\u044b\u0445. \u0415\u0441\u043b\u0438 \u043d\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u0431\u0430\u0437\u0435 \u0434\u0430\u043d\u043d\u044b\u0445, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f &#171;nil&#187;. \u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTNEXT \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438 \u0433\u043b\u0430\u0432\u043d\u044b\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u0438 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b.<\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b , \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 SSGET &#8212; \u0433\u043b\u0430\u0432\u043d\u044b\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u043d\u0435\u0442 \u0430\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 \u0431\u043b\u043e\u043a\u043e\u0432 \u0438\u043b\u0438 \u0432\u0435\u0440\u0448\u0438\u043d \u043f\u043e\u043b\u0438\u043b\u0438\u043d\u0438\u0439. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0434\u043e\u0431\u0440\u0430\u0442\u044c\u0441\u044f \u0434\u043e \u0432\u043d\u0443\u0442\u0440\u0435\u043d\u043d\u0435\u0439 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u044b \u044d\u0442\u0438\u0445 \u0441\u043b\u043e\u0436\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u043f\u043e\u0441\u0440\u0435\u0434\u0441\u0442\u0432\u043e\u043c \u043f\u0440\u043e\u0441\u0442\u043e\u0433\u043e \u043f\u0440\u0438\u0435\u043c\u0430, \u0447\u0435\u0440\u0435\u0437 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ENTNEXT. \u0415\u0441\u043b\u0438 \u0432\u044b \u043e\u0434\u043d\u0430\u0436\u0434\u044b \u043f\u0440\u0438\u043c\u0435\u043d\u0438\u0442\u0435 \u0438\u043c\u044f \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c \u043f\u043e\u0434\u043e\u0431\u043d\u044b\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c \u0432 \u043b\u044e\u0431\u043e\u043c \u0434\u0440\u0443\u0433\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435. \u0415\u0441\u043b\u0438 \u0432\u044b \u043f\u0440\u0438\u043e\u0431\u0440\u0435\u043b\u0438 \u0438\u043c\u044f \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0447\u0435\u0440\u0435\u0437 \u0444\u0443\u043d\u043a\u0446\u0438\u044e ENTNEXT, \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u043d\u0430\u0439\u0442\u0438 \u0440\u043e\u0434\u0438\u0442\u0435\u043b\u044c\u0441\u043a\u0438\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u0434\u0432\u0438\u0433\u0430\u044f\u0441\u044c \u0432\u043f\u0435\u0440\u0435\u0434 \u043e\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 ENTNEXT \u0434\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0438 SEQEND, \u0447\u0442\u043e\u0431\u044b \u043e\u0431\u043d\u0430\u0440\u0443\u0436\u0438\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u0437\u0430\u0442\u0435\u043c \u0438\u0437\u0432\u043b\u0435\u043a\u0430\u044f -2 \u0433\u0440\u0443\u043f\u043f\u0443 \u0438\u0437 \u0442\u0430\u043a\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0433\u043b\u0430\u0432\u043d\u044b\u043c \u0438\u043c\u0435\u043d\u0435\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261008\"><\/a>(entlast)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0438\u043c\u044f \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u043d\u0435\u0443\u0434\u0430\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0433\u043b\u0430\u0432\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u0431\u0430\u0437\u0435 \u0434\u0430\u043d\u043d\u044b\u0445. \u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0447\u0430\u0441\u0442\u043e \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u0435\u0442\u0441\u044f , \u0447\u0442\u043e\u0431\u044b \u0434\u0430\u0442\u044c \u0438\u043c\u044f \u043d\u043e\u0432\u043e\u043c\u0443 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0443 , \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0442\u043e\u043b\u044c\u043a\u043e \u0447\u0442\u043e \u0431\u044b\u043b \u043f\u0440\u0438\u0431\u0430\u0432\u043b\u0435\u043d \u0447\u0435\u0440\u0435\u0437 \u0444\u0443\u043d\u043a\u0446\u0438\u044e COMMAND. \u041f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u043d\u0435 \u043d\u0443\u0436\u043d\u043e \u0432\u044b\u0432\u043e\u0434\u0438\u0442\u044c \u043d\u0430 \u044d\u043a\u0440\u0430\u043d, \u0438 \u0442\u0430\u043a\u0436\u0435 \u043d\u0435 \u043d\u0443\u0436\u043d\u043e \u0432\u044b\u0431\u0438\u0440\u0430\u0442\u044c \u0443\u0440\u043e\u0432\u0435\u043d\u044c.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261009\"><\/a><br \/>\n(entsel [&lt;prompt&gt;])<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041e\u043d\u0430 \u0438\u043d\u043e\u0433\u0434\u0430 \u0436\u0435\u043b\u0430\u0442\u0435\u043b\u044c\u043d\u0430, \u043a\u0430\u043a \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0435 \u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u0447\u0442\u043e\u0431\u044b \u043e\u0434\u043d\u043e\u0432\u0440\u0435\u043c\u0435\u043d\u043d\u043e \u0432\u044b\u0431\u0440\u0430\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0438 \u043e\u0431\u043e\u0437\u043d\u0430\u0447\u0438\u0442\u044c \u0442\u043e\u0447\u043a\u0443, \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0431\u044b\u043b \u0432\u044b\u0431\u0440\u0430\u043d. \u041f\u0440\u0438\u043c\u0435\u0440\u044b \u044d\u0442\u043e\u0433\u043e \u0432 AutoCAD\u0435 \u043c\u043e\u0436\u043d\u043e \u043d\u0430\u0439\u0442\u0438 \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 Object Snap \u0438 \u0432 \u043a\u043e\u043c\u0430\u043d\u0434\u0430\u0445 BREAK , TRIM , EXTEND . \u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTSEL<\/span> <span style=\"font-family: Times New Roman\">\u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430\u043c AutoLISP\u0430 \u0432\u044b\u043f\u043e\u043b\u043d\u0438\u0442\u044c \u044d\u0442\u043e \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0435. \u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTSEL \u0432\u044b\u0431\u0438\u0440\u0430\u0435\u0442 \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u0442\u0440\u0435\u0431\u0443\u044f, \u0447\u0442\u043e\u0431\u044b \u0432\u044b\u0431\u043e\u0440 \u0431\u044b\u043b \u0441\u0434\u0435\u043b\u0430\u043d \u0442\u043e\u0447\u043a\u043e\u0439. \u041e\u043d\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u043f\u0438\u0441\u043e\u043a, \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u043c \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 &#8212; \u0438\u043c\u044f \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 &#8212; \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b \u0442\u043e\u0447\u043a\u0438, \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u043c\u043e\u0439 \u0434\u043b\u044f \u0432\u044b\u0431\u043e\u0440\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430. \u0415\u0441\u043b\u0438 \u0441\u0442\u0440\u043e\u043a\u0430 \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 &lt;\u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0443&gt;, \u044d\u0442\u0430 \u0441\u0442\u0440\u043e\u043a\u0430 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0430, \u0447\u0442\u043e\u0431\u044b \u0441\u043f\u0440\u043e\u0441\u0438\u0442\u044c \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044f \u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0435. \u0418\u043d\u0430\u0447\u0435, \u043f\u043e \u0443\u043c\u043e\u043b\u0447\u0430\u043d\u0438\u044e \u043f\u043e\u044f\u0432\u0438\u0442\u0441\u044f \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430 &#171;Select object:&#187; . \u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0434\u0438\u0430\u043b\u043e\u0433 \u0438\u043b\u043b\u044e\u0441\u0442\u0440\u0438\u0440\u0443\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 ENTSEL<\/span> <span style=\"font-family: Times New Roman\">\u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u043c\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a.<\/span><\/p>\n<p align=\"JUSTIFY\">Command: Line<\/p>\n<p align=\"JUSTIFY\">&#8212;-<\/p>\n<p align=\"JUSTIFY\">From point: 1 , 1<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">To point: 6 , 6<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">To point: RETURN<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">Command: (setq e (entsel &#171;Please choose an entity:&#187;))<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;-<\/p>\n<p align=\"JUSTIFY\">Please choose an entity: 3 , 3<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">(&lt; Entity name: 60000014&gt; (3.000000 3.000000))<\/p>\n<p><span style=\"color: #ff0000\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u043c\u0430\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ENTSEL \u0444\u043e\u0440\u043c\u0430 \u0432 \u0432\u0438\u0434\u0435 \u0441\u043f\u0438\u0441\u043a\u0430 , \u0443\u0434\u043e\u0432\u043b\u0435\u0442\u0432\u043e\u0440\u044f\u0435\u0442 AutoCAD \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u043b\u044e\u0431\u0443\u044e \u0435\u0433\u043e \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0443 \u0432\u044b\u0431\u0440\u0430\u0442\u044c \u043e\u0431\u044a\u0435\u043a\u0442. \u042d\u0442\u043e \u0431\u0443\u0434\u0435\u0442 \u0442\u0440\u0430\u043a\u0442\u043e\u0432\u0430\u0442\u044c\u0441\u044f AutoCAD\u043e\u043c , \u043a\u0430\u043a \u0432\u044b\u0431\u043e\u0440 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 , \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u043e\u0433\u043e \u0442\u043e\u0447\u043a\u043e\u0439.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261010\"><\/a>\u0424\u0443\u043d\u043a\u0446\u0438\u0438<br \/>\n\u0434\u0430\u043d\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 (entity data)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261011\">(entdel &lt;ename&gt;) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261012\">(entget &lt;ename&gt;) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261013\">(entmod &lt;elist&gt;) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261014\">(entupd &lt;ename&gt;) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261015\">\u041e\u0433\u0440\u0430\u043d\u0438\u0447\u0435\u043d\u0438\u044f <\/a><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044e\u0442 \u0432\u0430\u043c \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u0438 \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0434\u0430\u043d\u043d\u044b\u0435 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432. \u0418\u043c\u0435\u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u044e\u0442\u0441\u044f \u0434\u043b\u044f \u0442\u043e\u0433\u043e, \u0447\u0442\u043e\u0431\u044b \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u0441 \u043a\u043e\u0442\u043e\u0440\u044b\u043c\u0438 \u043d\u0430\u0434\u043e \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261011\"><\/a><br \/>\n(entdel &lt;ename&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0423\u0434\u0430\u043b\u044f\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u043e\u0431\u043e\u0437\u043d\u0430\u0447\u0435\u043d\u043d\u044b\u0439 &lt;ename&gt;, \u0432 \u0442\u0435\u043a\u0443\u0449\u0435\u043c \u0447\u0435\u0440\u0442\u0435\u0436\u0435, \u0438\u043b\u0438 \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u0435\u0441\u043b\u0438 \u043e\u043d \u0431\u044b\u043b \u043f\u0440\u0435\u0434\u0432\u0430\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e \u0443\u0434\u0430\u043b\u0435\u043d \u0432 \u044d\u0442\u043e\u043c \u0441\u0435\u0430\u043d\u0441\u0435 \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f. \u0423\u0434\u0430\u043b\u044f\u0435\u043c\u044b\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u0432\u044b\u0447\u0438\u0449\u0430\u044e\u0442\u0441\u044f \u0438\u0437 \u0447\u0435\u0440\u0442\u0435\u0436\u0430, \u043f\u043e\u043a\u0438\u0434\u0430\u044f \u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440 \u0447\u0435\u0440\u0442\u0435\u0436\u0435\u0439, \u0438\u0442\u0430\u043a, \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTDEL \u043c\u043e\u0436\u0435\u0442 \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0442\u044c \u0438\u0445 \u0442\u043e\u043b\u044c\u043a\u043e \u0432 \u0442\u0435\u0447\u0435\u043d\u0438\u0435 \u0441\u0435\u0430\u043d\u0441\u0430 \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f, \u043a\u043e\u0433\u0434\u0430 \u043e\u043d\u0438 \u0431\u044b\u043b\u0438 \u0443\u0434\u0430\u043b\u0435\u043d\u044b. \u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTDEL \u0440\u0430\u0431\u043e\u0442\u0430\u0435\u0442 \u0442\u043e\u043b\u044c\u043a\u043e \u0432 \u0433\u043b\u0430\u0432\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430\u0445, \u0430\u0442\u0440\u0438\u0431\u0443\u0442\u044b \u0438 \u0432\u0435\u0440\u0448\u0438\u043d\u044b \u043f\u043e\u043b\u0438\u043b\u0438\u043d\u0438\u0439 \u043d\u0435 \u043c\u043e\u0433\u0443\u0442 \u0431\u044b\u0442\u044c \u0443\u0434\u0430\u043b\u0435\u043d\u044b, \u043d\u0435\u0437\u0430\u0432\u0438\u0441\u0438\u043c\u043e \u043e\u0442 \u0438\u0445 \u0440\u043e\u0434\u0438\u0442\u0435\u043b\u044c\u0441\u043a\u0438\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 (\u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e COMMAND , \u0447\u0442\u043e\u0431\u044b \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ATTEDIT, \u0438\u043b\u0438<\/span> <span style=\"font-family: Times New Roman\">\u043a\u043e\u043c\u0430\u043d\u0434\u0443 PEDIT, \u0447\u0442\u043e\u0431\u044b \u0432\u044b\u043f\u043e\u043b\u043d\u0438\u0442\u044c \u044d\u0442\u043e).<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261012\"><\/a>(entget<br \/>\n&lt;ename&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f &lt;ename&gt; \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442\u0441\u044f \u0438\u0437 \u0431\u0430\u0437\u044b \u0434\u0430\u043d\u043d\u044b\u0445 \u0438 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u043a\u0430\u043a \u0441\u043f\u0438\u0441\u043e\u043a, \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0449\u0438\u0439 \u044d\u0442\u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c\u044b\u0435 \u0434\u0430\u043d\u043d\u044b\u0435. \u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0438\u0440\u0443\u044e\u0449\u0438\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u043a\u043e\u0434\u0438\u0440\u0443\u0435\u0442\u0441\u044f, \u043a\u0430\u043a \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a LISP, \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u043a\u043e\u0442\u043e\u0440\u043e\u0433\u043e \u043c\u043e\u0433\u0443\u0442 \u0431\u044b\u0442\u044c \u043b\u0435\u0433\u043a\u043e \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u044b \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ASSOC. \u041e\u0431\u044a\u0435\u043a\u0442\u044b \u0432 \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0438\u0440\u0443\u044e\u0449\u0435\u043c \u0441\u043f\u0438\u0441\u043a\u0435 \u043a\u043e\u0434\u0438\u0440\u0443\u044e\u0442\u0441\u044f \u0432 \u043a\u043e\u0434\u0430\u0445 DXF \u0441\u0438\u0441\u0442\u0435\u043c\u044b AutoCAD \u0434\u043b\u044f \u043a\u0430\u0436\u0434\u043e\u0439 \u0447\u0430\u0441\u0442\u0438 \u0432\u0445\u043e\u0434\u043d\u044b\u0445 \u0434\u0430\u043d\u043d\u044b\u0445. \u0414\u043b\u044f \u043f\u0440\u0438\u043c\u0435\u0440\u0430 \u0440\u0430\u0441\u0441\u043c\u043e\u0442\u0440\u0438\u043c \u0432\u044b\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u0435, \u0438 \u0437\u0430\u0442\u0435\u043c \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u0435 LINE \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0439 \u043f\u043e\u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c\u044e \u043a\u043e\u043c\u0430\u043d\u0434:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">Command: LINE<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">From point: 1 , 2<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">To point: 6 , 6<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">To point: RETURN<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">Command: (setq a (entget (entlast)))<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0443\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442 \u0410, \u0440\u0430\u0432\u043d\u043e\u0435 \u0441\u043f\u0438\u0441\u043a\u0443 ( \u0434\u0435\u043b\u0430\u0435\u0442 \u043e\u0441\u0442\u0430\u043d\u043e\u0432 \u0434\u043b\u044f \u043f\u0440\u043e\u0447\u0442\u0435\u043d\u0438\u044f ):<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">( ( -1 . &lt;Entity name: 60000014&gt;)<\/p>\n<p align=\"JUSTIFY\">(0 . &#171;LINE&#187;)<\/p>\n<p align=\"JUSTIFY\">(8 . &#171;0&#187;)<\/p>\n<p align=\"JUSTIFY\">(10 1.000000 2.000000)<\/p>\n<p align=\"JUSTIFY\">(11 6.000000 6.000000)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0443\u043d\u043a\u0442 -1 \u0432 \u043d\u0430\u0447\u0430\u043b\u0435 \u0441\u043f\u0438\u0441\u043a\u0430 \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u043a\u043e\u0442\u043e\u0440\u044b\u043c \u044d\u0442\u043e\u0442 \u0441\u043f\u0438\u0441\u043e\u043a \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d. \u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD, \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u0430\u044f \u043d\u0438\u0436\u0435, \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442 \u044d\u0442\u043e, \u0447\u0442\u043e\u0431\u044b \u0438\u0434\u0435\u043d\u0442\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 , \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u043d.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0435 \u0442\u043e\u0447\u0435\u0447\u043d\u044b\u0435 \u043f\u0430\u0440\u044b, \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u044f\u044e\u0442 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0435, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043c\u043e\u0433\u0443\u0442 \u0431\u044b\u0442\u044c \u043b\u0435\u0433\u043a\u043e \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u044b \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u0438 ASSOC, \u0444\u0443\u043d\u043a\u0446\u0438\u044f CDR \u043e\u0431\u044b\u0447\u043d\u043e \u0432\u044b\u0432\u043e\u0434\u0438\u0442 \u0438\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f. \u041a\u043e\u0434\u044b \u0434\u043b\u044f \u043a\u043e\u043c\u043f\u043e\u043d\u0435\u043d\u0442\u043e\u0432 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0442\u0435 \u0436\u0435 \u0441\u0430\u043c\u044b\u0435, \u0447\u0442\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442 DXF, \u0438 \u043f\u0440\u0438\u0432\u043e\u0434\u044f\u0442\u0441\u044f \u0432 \u043f\u0440\u0438\u043b\u043e\u0436\u0435\u043d\u0438\u0438 \u0421 \u0420\u0443\u043a\u043e\u0432\u043e\u0434\u0441\u0442\u0432\u0430 AutoCAD. \u0422\u0430\u043a \u0436\u0435, \u043a\u0430\u043a \u0432 DXF, \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043e\u043a \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 ( \u0446\u0432\u0435\u0442<\/span> <span style=\"font-family: Times New Roman\">\u0438 \u0442\u0438\u043f \u043b\u0438\u043d\u0438\u0438, \u0441\u043b\u043e\u0436\u043d\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0444\u043b\u0430\u0433\u0430 (\u0444\u0443\u043d\u043a\u0446\u0438\u044f ATFLAG), \u044d\u043a\u0441\u0442\u0440\u0443\u0437\u0438\u044f \u0442\u043e\u043b\u0449\u0438\u043d\u044b \u0438 \u0432\u044b\u043a\u043b\u044e\u0447\u0435\u043d\u0438\u0435 \u043d\u0430\u0431\u043e\u0440\u0430 Z) \u0432\u044b\u0432\u043e\u0434\u0438\u0442\u0441\u044f , \u0435\u0441\u043b\u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f \u043d\u0435 \u043f\u043e \u0443\u043c\u043e\u043b\u0447\u0430\u043d\u0438\u044e. \u0412 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u0445, \u043d\u0435 \u0442\u0430\u043a\u0438\u0445 \u043a\u0430\u043a DXF, \u043d\u0435 \u043e\u0431\u044f\u0437\u0430\u0442\u0435\u043b\u044c\u043d\u043e \u0432\u044b\u0432\u043e\u0434\u0438\u0442\u044c \u0442\u043e\u0447\u043d\u043e\u0441\u0442\u044c \u043f\u043e\u043b\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0440\u0430\u0432\u043d\u0443\u044e \u043b\u0438 \u0438\u0445 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f\u043c \u043f\u043e \u0443\u043c\u043e\u043b\u0447\u0430\u043d\u0438\u044e \u0438\u043b\u0438 \u043d\u0435\u0442. \u041d\u0430\u043c\u0435\u0440\u0435\u043d\u0438\u0435 \u0441\u0434\u0435\u043b\u0430\u0442\u044c \u044d\u0442\u043e \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0443\u043f\u0440\u043e\u0449\u0435\u043d\u043d\u044b\u043c \u0432\u0430\u0440\u0438\u0430\u043d\u0442\u043e\u043c \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u0441\u0435\u0433\u0434\u0430 \u043c\u043e\u0433\u0443\u0442 \u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0442\u044c \u044d\u0442\u0438 \u043f\u043e\u043b\u044f \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u043c\u0438 \u0434\u043b\u044f \u043e\u0441\u043d\u043e\u0432\u043d\u044b\u0445 \u0430\u043b\u0433\u043e\u0440\u0438\u0442\u043c\u043e\u0432, \u043f\u043e \u043a\u043e\u0442\u043e\u0440\u044b\u043c \u043e\u043d\u0438 \u0440\u0430\u0431\u043e\u0442\u0430\u044e\u0442.<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\"><br \/>\n<b><i><\/i><\/b><br \/>\n<\/span><\/p>\n<p align=\"JUSTIFY\"><u><i><b>\u0417\u0430\u043f\u043e\u043c\u043d\u0438\u0442\u0435<\/b><\/i><\/u>, \u0447\u0442\u043e \u043f\u043e\u0434\u0441\u043f\u0438\u0441\u043a\u0438 \u0434\u043b\u044f \u0442\u043e\u0447\u0435\u043a &#8212; \u044d\u0442\u043e \u043d\u0435 \u0442\u043e\u0447\u0435\u0447\u043d\u044b\u0435 \u043f\u0430\u0440\u044b, \u043f\u043e\u0434\u043e\u0431\u043d\u044b\u0435 \u043e\u0441\u0442\u0430\u043b\u044c\u043d\u044b\u043c. \u0421\u043e\u0433\u043b\u0430\u0448\u0435\u043d\u0438\u0435\u043c \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0442\u043e, \u0447\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f CDR \u043f\u043e\u0434\u0441\u043f\u0438\u0441\u043a\u0430 &#8212; \u044d\u0442\u043e \u0433\u0440\u0443\u043f\u043f\u043e\u0432\u0430\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f. \u0422\u0430\u043a \u043a\u0430\u043a \u0442\u043e\u0447\u043a\u0430- \u044d\u0442\u043e \u0441\u043f\u0438\u0441\u043e\u043a \u0434\u0432\u0443\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b, \u044d\u0442\u043e \u0441\u043e\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u0442 \u0432\u0441\u044e \u0441\u043e\u0432\u043e\u043a\u0443\u043f\u043d\u043e\u0441\u0442\u044c \u0442\u0440\u0435\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u0441\u043f\u0438\u0441\u043a\u0430. \u0424\u0443\u043d\u043a\u0446\u0438\u044f CDR \u0433\u0440\u0443\u043f\u043f\u044b \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0441\u043f\u0438\u0441\u043a\u043e\u043c, \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0430\u044e\u0449\u0438\u043c \u0442\u043e\u0447\u043a\u0443, \u0441\u043e\u0433\u043b\u0430\u0448\u0435\u043d\u0438\u0435\u043c \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0442\u0430\u043a\u0436\u0435, \u0442\u043e \u0447\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f CDR \u0432\u0441\u0435\u0433\u0434\u0430 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0443\u044e \u0441\u043e\u0445\u0440\u0430\u043d\u0435\u043d\u043d\u043e\u0439.<\/p>\n<p align=\"JUSTIFY\">\u041a\u043e\u0433\u0434\u0430 \u043e\u043f\u0438\u0441\u044b\u0432\u0430\u0435\u043c\u044b\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043e\u0431\u0440\u0430\u0431\u0430\u0442\u044b\u0432\u0430\u044e\u0442 \u044d\u0442\u0438 \u0441\u043f\u0438\u0441\u043a\u0438, \u043e\u0431\u044f\u0437\u0430\u0442\u0435\u043b\u044c\u043d\u043e \u0441\u0434\u0435\u043b\u0430\u0439\u0442\u0435 \u0438\u043c \u0430\u043a\u043a\u0443\u0440\u0430\u0442\u043d\u044b\u0435 \u043f\u043e\u0434\u0441\u043f\u0438\u0441\u043a\u0438. \u041f\u043e\u043b\u044c\u0437\u0430 \u0434\u043b\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 ASSOC \u043e\u0442 \u044d\u0442\u043e\u0433\u043e \u0433\u0430\u0440\u0430\u043d\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0430. \u0413\u0440\u0443\u043f\u043f\u0430 -1,\u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0449\u0430\u044f \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432, \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u043f\u0440\u043e\u0438\u0437\u0432\u0435\u0441\u0442\u0438 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f, \u0447\u0442\u043e\u0431\u044b \u043f\u0440\u043e\u0441\u0442\u043e \u043f\u0440\u0438\u043d\u044f\u0442\u044c \u0441\u043f\u0438\u0441\u043e\u043a \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0438 \u0438\u0437\u0431\u0435\u0436\u0430\u0442\u044c \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u043e\u0441\u0442\u0438 \u0441\u043e\u0445\u0440\u0430\u043d\u044f\u0442\u044c \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u043f\u0430\u0440\u0430\u043b\u043b\u0435\u043b\u044c\u043d\u043e\u0439 \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0435. \u041f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 SEQEND \u0432 \u043a\u043e\u043d\u0446\u0435 Poliline \u0438\u043b\u0438 \u043d\u0430\u0431\u043e\u0440 \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 -2\u0433\u0440\u0443\u043f\u043f\u0443, \u0447\u044c\u0438 CDR \u044f\u0432\u043b\u044f\u044e\u0442\u0441\u044f \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043a\u043e\u043c \u0432 \u044d\u0442\u043e\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0435. \u042d\u0442\u043e \u043f\u043e\u0437\u0432\u043e\u043b\u0438\u0442 \u043d\u0430\u0439\u0442\u0438 \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043e\u043a \u0432 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430\u0445, \u0434\u0432\u0438\u0433\u0430\u044f\u0441\u044c \u0432\u043f\u0435\u0440\u0435\u0434 \u043a SEQEND, \u0437\u0430\u0442\u0435\u043c, \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044e CDR -2 \u0433\u0440\u0443\u043f\u043f\u044b, \u043a\u0430\u043a \u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u0441\u0442\u0440\u0443\u043a\u0442\u0443\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u0433\u043b\u0430\u0432\u043d\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432. \u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u043f\u0440\u0438\u043c\u0435\u0440 \u0445\u043e\u0440\u043e\u0448\u043e \u0438\u043b\u043b\u044e\u0441\u0442\u0440\u0438\u0440\u0443\u0435\u0442 \u043a\u043e\u043c\u043f\u043b\u0435\u043a\u0441\u043d\u044b\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u043f\u0440\u0435\u0434\u0441\u0442\u0430\u0432\u043b\u0435\u043d\u043d\u044b\u0435 \u043a\u0430\u043a \u0441\u043f\u0438\u0441\u043e\u043a.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">Command: ELEV<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">New current elevation &lt;0.0000&gt;: 3.5<\/p>\n<p align=\"JUSTIFY\">&#8212;-<\/p>\n<p align=\"JUSTIFY\">New current thickness &lt;0.0000&gt;: 0<\/p>\n<p align=\"JUSTIFY\">&#8212;<\/p>\n<p align=\"JUSTIFY\">Command: LINETYPE<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;&#8212;-<\/p>\n<p align=\"JUSTIFY\">?\/Create \/Load\/Set: SET<\/p>\n<p align=\"JUSTIFY\">&#8212;-<\/p>\n<p align=\"JUSTIFY\">New entity linetype &lt;BYLAYER&gt;: DASHED<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;-<\/p>\n<p align=\"JUSTIFY\">Command:COLOR<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">New entity color &lt;BYLAYER&gt;: BLUE<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">Command: LAYER<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;-<\/p>\n<p align=\"JUSTIFY\">?\/Make\/Set\/New\/On\/Off\/Color\/Ltype\/Freeze\/Thaw: MAKE<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">New current layer &lt;0&gt;: ANNOTATION<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;&#8212;&#8212;-<\/p>\n<p align=\"JUSTIFY\">?\/Make\/Set\/New\/On\/Off\/Color\/Ltype\/Freeze\/Thaw: RETURN<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">Command: TEXT<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">Start point or Align\/Center\/Fit\/Middle\/Right\/Style: 2 ,2<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;-<\/p>\n<p align=\"JUSTIFY\">Height &lt;0.2000&gt;: .3<\/p>\n<p align=\"JUSTIFY\">&#8212;-<\/p>\n<p align=\"JUSTIFY\">Rotation angle &lt;0&gt;: 30<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">Text: So long , and thanks for all the fish!<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;<\/p>\n<p align=\"JUSTIFY\">Command: (setq e (entget (entlast)))<\/p>\n<p align=\"JUSTIFY\">&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;&#8212;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412 \u044d\u0442\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 \u0415 \u0431\u0443\u0434\u0435\u0442 \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0442\u044c \u0432 \u0441\u043f\u0438\u0441\u043a\u0435 \u0442\u043e, \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u043d\u0438\u0436\u0435.<\/p>\n<p align=\"JUSTIFY\">\u0420\u0430\u0441\u0441\u043c\u043e\u0442\u0440\u0435\u043d\u0438\u0435 \u043f\u0440\u0438\u043b\u043e\u0436\u0435\u043d\u0438\u044f \u0421 \u0420\u0443\u043a\u043e\u0432\u043e\u0434\u0441\u0442\u0432\u0430 \u043a AutoCAD\u0443 \u043f\u0440\u0438\u0434\u0430\u0441\u0442 \u0441\u043c\u044b\u0441\u043b \u044d\u0442\u043e\u043c\u0443 \u044f\u0441\u043d\u043e\u043c\u0443 \u0441\u043f\u0438\u0441\u043a\u0443.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">( (-1 . &lt;Entity name: 6000003C&gt;)<\/p>\n<p align=\"JUSTIFY\">(0 . &#171;TEXT&#187;)<\/p>\n<p align=\"JUSTIFY\">(8 . &#171;ANNOTATION&#187;)<\/p>\n<p align=\"JUSTIFY\">(6 . &#171;DASHED&#187;<\/p>\n<p align=\"JUSTIFY\">(62. 5)<\/p>\n<p align=\"JUSTIFY\">(38 . 3.500000)<\/p>\n<p align=\"JUSTIFY\">(10 2.000000 2.000000)<\/p>\n<p align=\"JUSTIFY\">(40 . 0.300000)<\/p>\n<p align=\"JUSTIFY\">(1 . &#171;So long , and thanks for all the fish!&#187;)<\/p>\n<p align=\"JUSTIFY\">(50 . 0.523598)<\/p>\n<p align=\"JUSTIFY\">(41 . 1.000000)<\/p>\n<p align=\"JUSTIFY\">(51 . 0.000000)<\/p>\n<p align=\"JUSTIFY\">(7 . &#171;STANDARD&#187;)<\/p>\n<p align=\"JUSTIFY\">(71 . 0)<\/p>\n<p align=\"JUSTIFY\">(72 . 0)<\/p>\n<p align=\"JUSTIFY\">(11 0.000000 0.000000)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261013\"><\/a>(entmod<br \/>\n&lt;elist&gt;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u043f\u0438\u0441\u043e\u043a &lt;elist&gt; \u043f\u0440\u043e\u0445\u043e\u0434\u0438\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u044e ENTMOD, \u0432 \u0444\u043e\u0440\u043c\u0430\u0442\u0435 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u044e\u0449\u0435\u0439 \u0435\u0433\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u0438 ENTGET, \u0438 \u043e\u0431\u043d\u043e\u0432\u043b\u044f\u0435\u0442 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u043e\u043d\u043d\u0443\u044e \u0431\u0430\u0437\u0443 \u0434\u0430\u043d\u043d\u044b\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0438\u043c\u044f \u043a\u043e\u0442\u043e\u0440\u043e\u0433\u043e \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043e \u0441\u043e\u0432\u043e\u043a\u0443\u043f\u043d\u043e\u0441\u0442\u044c\u044e -1 \u0432 &lt;elist&gt;. \u041e\u0434\u043d\u0430\u043a\u043e, \u0433\u043b\u0430\u0432\u043d\u044b\u0439 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c, \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u043a\u043e\u0442\u043e\u0440\u043e\u0433\u043e LISP \u043e\u0431\u043d\u043e\u0432\u043b\u044f\u0435\u0442 \u0431\u0430\u0437\u0443 \u0434\u0430\u043d\u043d\u044b\u0445, \u044d\u0442\u043e \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ENTGET, \u043c\u043e\u0434\u0438\u0444\u0438\u043a\u0430\u0446\u0438\u044f \u0441\u043f\u0438\u0441\u043a\u0430, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0449\u0435\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 ( \u0437\u0430\u043f\u043e\u043c\u043d\u0438\u0442\u0435, \u0447\u0442\u043e \u0434\u043b\u044f \u044d\u0442\u043e\u0433\u043e \u043e\u0447\u0435\u043d\u044c \u043f\u043e\u043b\u0435\u0437\u043d\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f SUBST AutoLISP\u0430) \u0438 \u043e\u0431\u043d\u043e\u0432\u043b\u044f\u044e\u0449\u0435\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0432 \u0431\u0430\u0437\u0435 \u0434\u0430\u043d\u043d\u044b\u0445 \u0441 \u043f\u043e\u043c\u043e\u0449\u044c\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u0438 ENTMOD.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD \u0438\u043c\u0435\u0435\u0442 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043e\u0433\u0440\u0430\u043d\u0438\u0447\u0435\u043d\u0438\u044f \u043f\u043e \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u044f\u043c, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043e\u043d\u0430 \u0434\u0435\u043b\u0430\u0435\u0442. \u0412\u043e &#8212; \u043f\u0435\u0440\u0432\u044b\u0445, \u043d\u0435\u043b\u044c\u0437\u044f \u0438\u0437\u043c\u0435\u043d\u044f\u0442\u044c \u0442\u0438\u043f\u044b \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 . (\u0415\u0441\u043b\u0438 \u0432\u044b \u0445\u043e\u0442\u0438\u0442\u0435 \u0441\u0434\u0435\u043b\u0430\u0442\u044c \u044d\u0442\u043e, \u043f\u0440\u0438\u043c\u0435\u043d\u0438\u0442\u0435 \u0442\u043e\u043b\u044c\u043a\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044e ENTDEL \u0438 \u0441\u0434\u0435\u043b\u0430\u0439\u0442\u0435 \u043d\u043e\u0432\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u043a\u043e\u043c\u0430\u043d\u0434\u043e\u0439 COMMAND ). AutoCAD \u0434\u043e\u043b\u0436\u0435\u043d \u0437\u043d\u0430\u0442\u044c \u0432\u0441\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0443\u043f\u043e\u043c\u0438\u043d\u0430\u044e\u0442\u0441\u044f \u0432 \u0441\u043f\u0438\u0441\u043a\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432, \u0434\u043e \u0442\u043e\u0433\u043e<\/span> <span style=\"font-family: Times New Roman\">\u043a\u0430\u043a \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD. \u0422\u0430\u043a, \u0441\u0442\u0438\u043b\u044c \u0442\u0435\u043a\u0441\u0442\u0430, \u0442\u0438\u043f \u043b\u0438\u043d\u0438\u0438, \u0444\u043e\u0440\u043c\u0430 \u0438 \u0438\u043c\u0435\u043d\u0430 \u0431\u043b\u043e\u043a\u043e\u0432 \u0434\u043e\u043b\u0436\u043d\u044b \u0431\u044b\u0442\u044c \u043f\u0440\u0435\u0434\u0432\u0430\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u044b \u0432 \u0447\u0435\u0440\u0442\u0435\u0436\u0435, \u0434\u043e \u0442\u043e\u0433\u043e, \u043a\u0430\u043a \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD \u043c\u043e\u0436\u0435\u0442 \u0438\u0445 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0432 \u0441\u043f\u0438\u0441\u043a\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432. \u0418\u0441\u043a\u043b\u044e\u0447\u0435\u043d\u0438\u0435\u043c \u0432 \u044d\u0442\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0438\u043c\u044f \u0443\u0440\u043e\u0432\u043d\u044f, __ENT<\/span>M<span style=\"font-family: Times New Roman\">OD \u043e\u0441\u0432\u043e\u0431\u043e\u0434\u0438\u0442 \u043d\u043e\u0432\u044b\u0439 \u0443\u0440\u043e\u0432\u0435\u043d\u044c \u043f\u043e \u0443\u043c\u043e\u043b\u0447\u0430\u043d\u0438\u044e, \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u0443 &#171;LAYER NEW&#187;, \u0435\u0441\u043b\u0438 \u0432 \u044d\u0442\u043e\u043c \u0441\u043f\u0438\u0441\u043a\u0435 \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u043f\u0440\u0435\u0434\u0432\u0430\u0440\u0438\u0442\u0435\u043b\u044c\u043d\u043e \u043d\u0435 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u044b\u0439 \u0443\u0440\u043e\u0432\u0435\u043d\u044c.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u0443\u044e \u043f\u043e\u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0439, \u043a\u0430\u043a \u043a\u043e\u043c\u0430\u043d\u0434\u0430 DXFIN, \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u044f \u0441\u043f\u0438\u0441\u043e\u043a, \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 \u043b\u0438 \u043e\u043d, \u0434\u0430\u043d\u043d\u044b\u0435 \u0438\u0437 \u0444\u0430\u0439\u043b\u0430 DXF. \u0415\u0441\u043b\u0438 \u043e\u0431\u043d\u0430\u0440\u0443\u0436\u0435\u043d\u0430 \u0441\u0435\u0440\u044c\u0435\u0437\u043d\u0430\u044f \u043e\u0448\u0438\u0431\u043a\u0430, \u0442\u0430\u043a\u0430\u044f \u0441\u0435\u0440\u044c\u0435\u0437\u043d\u0430\u044f,\u0447\u0442\u043e \u0431\u0430\u0437\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 \u043d\u0435 \u043e\u0431\u043d\u043e\u0432\u043b\u044f\u0435\u0442\u0441\u044f, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f &#171;nil&#187;. \u0412 \u043f\u0440\u043e\u0442\u0438\u0432\u043d\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435, \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u043f\u0438\u0441\u043e\u043a \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430. \u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD \u043d\u0435 \u0438\u0437\u043c\u0435\u043d\u0438\u0442 \u0432\u043d\u0443\u0442\u0440\u0435\u043d\u043d\u0438\u0435 \u043f\u043e\u043b\u044f, \u0442\u0430\u043a\u0438\u0435 \u043a\u0430\u043a<\/span> <span style=\"font-family: Times New Roman\">\u0438\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u0441\u043e\u0432\u043e\u043a\u0443\u043f\u043d\u043e\u0441\u0442\u0438 -2 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 SEQEND, \u043f\u043e\u043f\u044b\u0442\u043a\u0438 \u0438\u0437\u043c\u0435\u043d\u0438\u0442\u044c \u0442\u0430\u043a\u0438\u0435 \u043f\u043e\u043b\u044f \u043f\u0440\u043e\u0441\u0442\u043e \u0438\u0433\u043d\u043e\u0440\u0438\u0440\u0443\u044e\u0442\u0441\u044f.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041a\u043e\u0433\u0434\u0430 \u043e\u0431\u043d\u043e\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0433\u043b\u0430\u0432\u043d\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432, \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD \u0431\u0443\u0434\u0435\u0442 \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0438 \u043e\u0431\u043d\u043e\u0432\u0438\u0442 \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 ( \u0432\u043a\u043b\u044e\u0447\u0430\u044f \u043f\u043e\u0434 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b ) . \u041a\u043e\u0433\u0434\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD \u043e\u0431\u044b\u0447\u043d\u043e \u043e\u0431\u043d\u043e\u0432\u043b\u044f\u0435\u0442 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 ( \u0432\u0435\u0440\u0448\u0438\u043d\u044b \u043f\u043e\u043b\u0438\u043b\u0438\u043d\u0438\u0439, \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u044b \u0431\u043b\u043e\u043a\u043e\u0432 ), \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0431\u0443\u0434\u0435\u0442 \u043e\u0431\u043d\u043e\u0432\u043b\u0435\u043d \u0432 \u0431\u0430\u0437\u0435 \u0434\u0430\u043d\u043d\u044b\u0445, \u043d\u043e \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435 \u043d\u0435 \u043e\u0431\u043d\u043e\u0432\u043b\u044f\u0435\u0442\u0441\u044f. \u041f\u043e\u0441\u043b\u0435 \u0432\u0441\u0435\u0445 \u043c\u043e\u0434\u0438\u0444\u0438\u043a\u0430\u0446\u0438\u0439, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0441\u0434\u0435\u043b\u0430\u043d\u044b \u0441 \u0434\u0430\u043d\u043d\u044b\u043c\u0438 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430\u043c\u0438, \u043c\u043e\u0436\u043d\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e ENTUPD<\/span>,<span style=\"font-family: Times New Roman\"> \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u0443\u044e \u043d\u0438\u0436\u0435, \u0434\u043b\u044f \u043e\u0431\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u044f \u0438\u0437\u043e\u0431\u0440\u0430\u0436\u0435\u043d\u0438\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261014\"><\/a>(entupd<br \/>\n&lt;ename&gt;)<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u041a\u0430\u043a \u043e\u043f\u0438\u0441\u0430\u043d\u043e \u0432\u044b\u0448\u0435, \u043a\u043e\u0433\u0434\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTMOD \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u0443\u0435\u0442 \u0432\u0435\u0440\u0448\u0438\u043d\u044b \u043f\u043e\u043b\u0438\u043b\u0438\u043d\u0438\u0439 \u0438\u043b\u0438 \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u044b \u0431\u043b\u043e\u043a\u043e\u0432, \u043f\u043e\u043b\u043d\u044b\u0439 \u043a\u043e\u043c\u043f\u043b\u0435\u043a\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043d\u0435 \u043e\u0431\u043d\u043e\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0435\u0441\u043b\u0438 \u0431\u044b\u043b\u0438 \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u043d\u044b 100 \u0432\u0435\u0440\u0448\u0438\u043d \u0441\u043b\u043e\u0436\u043d\u044b\u0445 \u043f\u043e\u043b\u0438\u043b\u0438\u043d\u0438\u0439, \u043f\u0435\u0440\u0435\u0441\u0447\u0435\u0442 \u0438 \u043f\u0435\u0440\u0435\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u0435 Polyline, \u0442\u0430\u043a \u0436\u0435 \u043a\u0430\u043a \u0438 \u043a\u0430\u0436\u0434\u043e\u0439 \u0432\u0435\u0440\u0448\u0438\u043d\u044b, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0431\u044b\u043b\u0430 \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0430, \u0431\u0443\u0434\u0435\u0442 \u0441\u0434\u0435\u043b\u0430\u043d\u043e \u043d\u0435\u043f\u0440\u0438\u0435\u043c\u043b\u0435\u043c\u043e \u043c\u0435\u0434\u043b\u0435\u043d\u043d\u043e. \u041e\u0431\u044b\u0447\u043d\u043e, \u043c\u043e\u0436\u043d\u043e \u043f\u0440\u0438\u043c\u0435\u043d\u0438\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e ENTUPD, \u0447\u0442\u043e\u0431\u044b \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u0443\u044e Polyline \u0438\u043b\u0438 \u0431\u043b\u043e\u043a\u0438 \u043e\u0431\u043d\u043e\u0432\u0438\u0442\u044c \u043d\u0430<\/span> <span style=\"font-family: Times New Roman\">\u044d\u043a\u0440\u0430\u043d\u0435. \u0424\u0443\u043d\u043a\u0446\u0438\u044f ENTUPD \u043d\u0430\u0437\u043e\u0432\u0435\u0442 \u0438\u043c\u0435\u043d\u0435\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043b\u044e\u0431\u0443\u044e \u0447\u0430\u0441\u0442\u044c Poliline \u0438\u043b\u0438 \u0431\u043b\u043e\u043a\u0430. \u041d\u0435\u0442 \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u043e\u0441\u0442\u0438 \u0438\u043c\u0435\u0442\u044c \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043e\u043a \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTUPD \u043d\u0430\u0439\u0434\u0435\u0442 \u0437\u0430\u0433\u043e\u043b\u043e\u0432\u043e\u043a. \u041a\u043e\u0433\u0434\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTUPD \u043f\u0440\u0435\u0434\u043d\u0430\u0437\u043d\u0430\u0447\u0435\u043d\u0430 \u0434\u043b\u044f \u043f\u043e\u043b\u0438\u043b\u0438\u043d\u0438\u0439 \u0438 \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 \u0431\u043b\u043e\u043a\u043e\u0432, \u0435\u0435 \u043c\u043e\u0436\u043d\u043e \u0432\u044b\u0437\u0432\u0430\u0442\u044c \u0434\u043b\u044f \u043b\u044e\u0431\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430. \u041e\u043d\u0430 \u0432\u0441\u0435\u0433\u0434\u0430 \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435, \u0432\u043a\u043b\u044e\u0447\u0430\u044f \u0432\u0441\u0435 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261015\"><\/a>\u041e\u0433\u0440\u0430\u043d\u0438\u0447\u0435\u043d\u0438\u044f<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0418\u043c\u0435\u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 ( entity names ) \u0438 \u043d\u0430\u0431\u043e\u0440\u044b \u0432\u044b\u0431\u043e\u0440\u0430 ( selection- sets ) \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b \u0442\u043e\u043b\u044c\u043a\u043e \u0432 \u0442\u0435\u0447\u0435\u043d\u0438\u0435 \u0441\u0435\u0430\u043d\u0441\u0430 \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f,\u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u043c \u043e\u043d\u0438 \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u044e\u0442\u0441\u044f \u0432 AutoCAD\u0435. \u0422\u0430\u043a, \u0435\u0441\u043b\u0438 \u0432\u044b \u043f\u043e\u043f\u044b\u0442\u0430\u0435\u0442\u0435\u0441\u044c \u043f\u0440\u043e\u0438\u0437\u0432\u0435\u0441\u0442\u0438 \u043a\u0430\u043a\u0438\u0435-\u043d\u0438\u0431\u0443\u0434\u044c \u043f\u043e\u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f, \u043f\u043e\u043a\u0430 \u0430\u043a\u0442\u0438\u0432\u043d\u044b \u043a\u043e\u043c\u0430\u043d\u0434\u044b PLINE \u0438\u043b\u0438 ATTEDIT, \u0431\u0443\u0434\u0435\u0442 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0435\u043d\u043e &#187; nil&#187; \u0438 \u0437\u0430\u043f\u0440\u043e\u0441 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043d\u0435 \u0431\u0443\u0434\u0435\u0442 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">ENTMOD \u0447\u0442\u043e\u0431\u044b \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432<\/p>\n<p align=\"JUSTIFY\">ENTUPD \u0447\u0442\u043e\u0431\u044b \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u0439 \u0441\u043b\u043e\u0436\u043d\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432<\/p>\n<p align=\"JUSTIFY\">ENTDEL \u0447\u0442\u043e\u0431\u044b \u043d\u0435 \u0443\u0434\u0430\u043b\u044f\u0442\u044c \u0438 \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u0443\u043d\u0438\u0447\u0442\u043e\u0436\u0435\u043d\u043d\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261016\"><\/a>\u041f\u0440\u0438\u043c\u0435\u043d\u0435\u043d\u0438\u0435<br \/>\n\u0432 AutoCAD\u0435 \u0438\u043c\u0435\u043d \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0438 \u043d\u0430\u0431\u043e\u0440\u043e\u0432 \u0432\u044b\u0431\u043e\u0440\u0430<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0418\u043c\u0435\u043d\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 (entity name) \u0438 \u043d\u0430\u0431\u043e\u0440\u044b \u0432\u044b\u0431\u043e\u0440\u0430 (selection-sets) \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u044b \u0434\u043b\u044f \u0442\u043e\u0433\u043e, \u0447\u0442\u043e\u0431\u044b \u0432\u0432\u0435\u0441\u0442\u0438 \u0438\u0437 LISP\u0430 \u043e\u0431\u044a\u0435\u043a\u0442\u044b \u0432\u044b\u0431\u043e\u0440\u0430 \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0443. \u0422\u0430\u043a\u0438\u043c \u043e\u0431\u0440\u0430\u0437\u043e\u043c, \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u043d\u0430\u0437\u0432\u0430\u043d\u043d\u044b\u0435 LISP\u043e\u043c, \u043c\u043e\u0433\u0443\u0442 \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u043f\u043e \u043a\u043e\u043c\u0430\u043d\u0434\u0430\u043c AutoCAD\u0430. \u041f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0443 &#171;Select objects:&#187; LISP \u043c\u043e\u0436\u0435\u0442 \u0441\u043d\u0430\u0431\u0434\u0438\u0442\u044c \u0438\u043c\u0435\u043d\u0435\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 \u0435\u0434\u0438\u043d\u0441\u0442\u0432\u0435\u043d\u043d\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0438\u043b\u0438 \u043d\u0430\u0431\u043e\u0440 \u0432\u044b\u0431\u043e\u0440\u0430, \u0447\u0442\u043e\u0431\u044b \u0432\u044b\u0431\u0440\u0430\u0442\u044c \u0432\u0441\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u0432 \u043d\u0430\u0431\u043e\u0440\u0435. \u041f\u0435\u0440\u0435\u0434\u0430\u0447\u0430 \u0438\u043c\u0435\u043d \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0438 \u043d\u0430\u0431\u043e\u0440\u0430 \u0432\u044b\u0431\u043e\u0440\u0430 \u0438\u0437 LISP\u0430 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u0430 \u0432 \u0432\u044b\u0431\u043e\u0440\u0435 &#171;Last&#187;(\u043e\u0431\u0435 \u0447\u0430\u0441\u0442\u0438, \u043a\u0430\u043a \u0441\u043f\u043e\u0441\u043e\u0431\u043d\u043e\u0441\u0442\u044c \u0432\u044b\u0431\u0438\u0440\u0430\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u043d\u0435 \u0432\u0437\u0438\u0440\u0430\u044f \u043d\u0430 \u0432\u0438\u0434\u0438\u043c\u043e\u0441\u0442\u044c, \u0442\u0430\u043a \u0438 \u043d\u0435 \u0441\u043f\u0435\u0446\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0435 \u0442\u043e\u0447\u043a\u0438).<\/p>\n<p align=\"JUSTIFY\">\u0412\u0441\u044f\u043a\u0438\u0439 \u0440\u0430\u0437, \u043a\u043e\u0433\u0434\u0430 AutoCAD \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u0441\u0434\u0435\u043b\u0430\u0442\u044c \u0432\u044b\u0431\u043e\u0440 \u043e\u0431\u044a\u0435\u043a\u0442\u0430 \u0442\u043e\u0447\u043a\u043e\u0439, \u0441\u043f\u0438\u0441\u043a\u0438 \u0432 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0435, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u043c\u044b\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ENTSEL, \u0434\u043e\u043f\u0443\u0441\u0442\u044f\u0442 \u043f\u0440\u043e\u0446\u0435\u0434\u0443\u0440\u0443 \u0432\u044b\u0431\u043e\u0440\u0430. \u041e\u043d\u0438 \u0432\u044b\u0431\u0438\u0440\u0430\u044e\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0438\u0437 \u0441\u043f\u0438\u0441\u043a\u0430, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044f \u0442\u043e\u0447\u043a\u0443 \u0432 \u0441\u043f\u0438\u0441\u043a\u0435, \u043a\u0430\u043a \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u0443\u044e \u0442\u043e\u0447\u043a\u0443. \u042d\u0442\u043e \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 LISP\u0443 \u043f\u0435\u0440\u0435\u0439\u0442\u0438 \u043a \u0432\u0432\u043e\u0434\u0443 \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0445 \u0442\u043e\u0447\u0435\u043a \u0442\u0430\u043a\u0438\u043c\u0438 \u043a\u043e\u043c\u0430\u043d\u0434\u0430\u043c\u0438, \u043a\u0430\u043a BREAK, TRIM \u0438 EXTEND. \u041f\u043e\u043c\u043d\u0438\u0442\u0435, \u0447\u0442\u043e \u0441\u043f\u0438\u0441\u043a\u0438 \u0444\u043e\u0440\u043c\u044b ENTSEL \u043c\u043e\u0433\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0434\u043b\u044f \u0434\u0440\u0443\u0433\u0438\u0445 \u0432\u044b\u0431\u043e\u0440\u043e\u0432 \u0442\u043e\u0436\u0435, \u0442\u0430\u043a \u0436\u0435 \u0442\u043e\u0447\u043d\u043e, \u043a\u0430\u043a \u0442\u043e\u0447\u043a\u0430, \u0432\u044b\u0431\u0438\u0440\u0430\u0435\u043c\u0430\u044f \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044e\u0449\u0435\u0439 \u043a\u043e\u043c\u0430\u043d\u0434\u043e\u0439. \u0421\u043f\u0438\u0441\u043a\u0438 \u0444\u043e\u0440\u043c\u044b ENTSEL \u043d\u0435 \u043c\u043e\u0433\u0443\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c\u0441\u044f \u0441 \u043a\u043e\u043c\u0430\u043d\u0434\u0430\u043c\u0438 FILLET \u0438 CHAMFER, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u044e\u0442 \u0434\u0432\u0430 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0438 \u0442\u043e\u0447\u043a\u0438 \u0438\u0437 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c\u0430 \u0432\u044b\u0431\u043e\u0440\u0430.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261017\"><\/a>\u0414\u043e\u0441\u0442\u0443\u043f<br \/>\n\u043a \u0442\u0430\u0431\u043b\u0438\u0446\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261018\">(tblnext &lt;table name&gt; [&lt;first&gt;])<br \/>\n: <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261019\">(tblsearch &lt;table name&gt; &lt;symbol&gt; <\/a><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u043d\u044b\u0435 \u043d\u0438\u0436\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 TBLNEXT \u0438 TBLSEARCH \u0441\u043d\u0430\u0431\u0436\u0435\u043d\u044b \u0442\u0430\u0431\u043b\u0438\u0446\u0435\u0439 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0434\u043e\u0441\u0442\u0443\u043f\u043d\u0430 \u0442\u043e\u043b\u044c\u043a\u043e \u0434\u043b\u044f \u0447\u0442\u0435\u043d\u0438\u044f \u0438\u0437 AutoCAD\u0430 \u0443\u0440\u043e\u0432\u043d\u044f, \u0442\u0438\u043f\u0430 \u043b\u0438\u043d\u0438\u0438, \u0438\u043c\u0435\u043d\u043e\u0432\u0430\u043d\u043d\u043e\u0433\u043e \u0432\u0438\u0434\u0430, \u0441\u0442\u0438\u043b\u044f \u0442\u0435\u043a\u0441\u0442\u0430 \u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u0431\u043b\u043e\u043a\u0430.:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261018\"><\/a>(tblnext<br \/>\n&lt;table name&gt; [&lt;first&gt;]) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u043f\u0440\u043e\u0441\u043c\u043e\u0442\u0440\u0430 \u0432\u0441\u0435\u0445 \u0442\u0430\u0431\u043b\u0438\u0446 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432. \u041f\u0435\u0440\u0432\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &#8212; \u044d\u0442\u043e \u0438\u0434\u0435\u043d\u0442\u0438\u0444\u0438\u043a\u0430\u0442\u043e\u0440 \u0441\u0438\u043c\u0432\u043e\u043b\u0430 \u0438\u043d\u0442\u0435\u0440\u0435\u0441\u0443\u044e\u0449\u0435\u0439 \u0432\u0430\u0441 \u0442\u0430\u0431\u043b\u0438\u0446\u044b. \u0414\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b \u0438\u043c\u0435\u043d\u0430 &#171;LAYER&#187; , &#171;LTYPE&#187; , &#171;VIEW&#187;, &#171;STYLE&#187; \u0438 &#171;BLOCK&#187;: \u0418\u043c\u0435\u043d\u0430\u043c \u043d\u0435 \u043d\u0443\u0436\u0435\u043d \u0432\u0435\u0440\u0445\u043d\u0438\u0439 \u0440\u0435\u0433\u0438\u0441\u0442\u0440. \u041a\u043e\u0433\u0434\u0430 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0432\u0442\u043e\u0440\u043e\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442, \u0438 \u043d\u0435 &#171;nil&#187;, \u0442\u0430\u0431\u043b\u0438\u0446\u0430 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432 \u043f\u0435\u0440\u0435\u0432\u043e\u0434\u0438\u0442\u0441\u044f \u043d\u0430 \u043d\u0430\u0447\u0430\u043b\u043e \u0438 \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0432 \u043d\u0435\u0439 \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442\u0441\u044f, \u0432 \u043f\u0440\u043e\u0442\u0438\u0432\u043d\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 , \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442\u0441\u044f \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0432 \u0442\u0430\u0431\u043b\u0438\u0446\u0435. \u041a\u043e\u0433\u0434\u0430 \u0441\u043e\u0432\u0441\u0435\u043c \u043d\u0435\u0442 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 \u0432 \u0442\u0430\u0431\u043b\u0438\u0446\u0435, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f &#171;nil&#187;. \u0423\u0434\u0430\u043b\u0435\u043d\u043d\u044b\u0435 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u0442\u0430\u0431\u043b\u0438\u0446\u044b \u043d\u0435 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u044e\u0442\u0441\u044f.<\/p>\n<p align=\"JUSTIFY\">\u041a\u043e\u0433\u0434\u0430 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u043e\u0431\u043d\u0430\u0440\u0443\u0436\u0435\u043d, \u043e\u043d \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f, \u043a\u0430\u043a \u0441\u043f\u0438\u0441\u043e\u043a \u0442\u043e\u0447\u0435\u0447\u043d\u044b\u0445 \u043f\u0430\u0440 DXF \u043a\u043e\u0434\u043e\u0432 \u0438 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0439 , \u043f\u043e\u0434\u043e\u0431\u043d\u043e \u0442\u043e\u043c\u0443 ,\u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTGET.<\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(tblnext &#171;layer&#187; T)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u043f\u0435\u0440\u0432\u044b\u0439 \u0443\u0440\u043e\u0432\u0435\u043d\u044c<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u043c\u043e\u0436\u0435\u0442 \u0432\u0435\u0440\u043d\u0443\u0442\u044c :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">((0 . &#171;LAYER&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0441\u0438\u043c\u0432\u043e\u043b\u044c\u043d\u044b\u0439 \u0442\u0438\u043f<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(2 . &#171;0&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0438\u043c\u044f \u0441\u0438\u043c\u0432\u043e\u043b\u0430<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(70 . 0)<\/span><span style=\"font-family: Times New Roman\"> \u0444\u043b\u0430\u0433\u0438<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(62 . 7)<\/span><span style=\"font-family: Times New Roman\"> \u0446\u0432\u0435\u0442, \u043d\u0435\u0433\u0430\u0442\u0438\u0432 \u0432\u044b\u043a\u043b\u044e\u0447\u0435\u043d<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(6 . &#171;CONTINUOUS&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0442\u0438\u043f \u043b\u0438\u043d\u0438\u0438<\/span><\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"><u><i><b>\u041e\u0431\u0440\u0430\u0442\u0438\u0442\u0435 \u0432\u043d\u0438\u043c\u0430\u043d\u0438\u0435<\/b><\/i><\/u><\/span><span style=\"font-family: Times New Roman\"> , \u0447\u0442\u043e \u0441\u043e\u0432\u043e\u043a\u0443\u043f\u043d\u043e\u0441\u0442\u0438 &#171;-1&#187; \u043d\u0435\u0442. AutoCAD \u0437\u0430\u043f\u043e\u043c\u0438\u043d\u0430\u0435\u0442: \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0438\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 , \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u043c\u044b\u0439 \u0438\u0437 \u0442\u0430\u0431\u043b\u0438\u0446\u044b, \u0438 \u043f\u0440\u043e\u0441\u0442\u043e \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u043e\u0434\u0438\u043d \u0438\u0437 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0445 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 ,\u043f\u0440\u0438 \u043a\u0430\u0436\u0434\u043e\u043c \u0432\u044b\u0437\u043e\u0432\u0435 TABNEXT\u043e\u043c \u044d\u0442\u043e\u0439 \u0442\u0430\u0431\u043b\u0438\u0446\u044b. \u041a\u043e\u0433\u0434\u0430 \u0432\u044b \u043d\u0430\u0447\u0438\u043d\u0430\u0435\u0442\u0435 \u043f\u0440\u043e\u0441\u043c\u043e\u0442\u0440 \u0442\u0430\u0431\u043b\u0438\u0446\u044b , \u0432\u044b \u0434\u043e\u043b\u0436\u043d\u044b \u0431\u044b\u0442\u044c \u0443\u0432\u0435\u0440\u0435\u043d\u044b , \u0447\u0442\u043e \u0432\u0442\u043e\u0440\u043e\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u043d\u0435 &#171;nil&#187;, \u0447\u0442\u043e\u0431\u044b \u043f\u0435\u0440\u0435\u043c\u043e\u0442\u0430\u0442\u044c \u0442\u0430\u0431\u043b\u0438\u0446\u0443 \u0438 \u0432\u0435\u0440\u043d\u0443\u0442\u044c \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 . \u042d\u043b\u0435\u043c\u0435\u043d\u0442\u044b, \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u043d\u044b\u0435 \u0438\u0437 \u0442\u0430\u0431\u043b\u0438\u0446\u044b &#187; BLOCK&#187; , \u0432\u043a\u043b\u044e\u0447\u0430\u044e\u0442 \u0432 \u0441\u0435\u0431\u044f : \u0441\u043e\u0432\u043e\u043a\u0443\u043f\u043d\u043e\u0441\u0442\u044c &#171;-2&#187; c \u0438\u043c\u0435\u043d\u0435\u043c \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0438 \u0431\u043b\u043e\u043a\u0430 (\u0438\u043b\u0438 \u043b\u044e\u0431\u043e\u0433\u043e).<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u0418\u0442\u0430\u043a, \u043d\u0430\u0437\u043e\u0432\u0435\u043c \u0431\u043b\u043e\u043a &#171;BOX&#187;:<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(tblnext &#171;block&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u0431\u043b\u043e\u043a\u0430 <\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u043c\u043e\u0436\u0435\u0442 \u0432\u0435\u0440\u043d\u0443\u0442\u044c:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">((0 . &#171;BLOCK&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0442\u0438\u043f \u0441\u0438\u043c\u0432\u043e\u043b\u0430<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(2 . &#171;BOX&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0438\u043c\u044f \u0441\u0438\u043c\u0432\u043e\u043b\u0430<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(70 . 0)<\/span><span style=\"font-family: Times New Roman\"> \u0444\u043b\u0430\u0436\u043a\u0438<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(10 9.000000 2.000000 0.000000)<\/span><span style=\"font-family: Times New Roman\"> \u0425,\u0423,Z<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(-2 . &lt;Entity name: 40000126))<\/span><span style=\"font-family: Times New Roman\"> \u043f\u0435\u0440\u0432\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432<\/span><\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0418\u043c\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u0441\u043e\u0432\u043e\u043a\u0443\u043f\u043d\u043e\u0441\u0442\u0438 &#171;-2&#187; \u043f\u0440\u0438\u043d\u0438\u043c\u0430\u0435\u0442\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438 ENTGET \u0438 ENTNEXT ,\u043d\u043e \u043d\u0438 \u043a\u0430\u043a\u0438\u043c\u0438 \u0434\u0440\u0443\u0433\u0438\u043c\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u043c\u0438. \u042d\u0442\u043e \u0437\u043d\u0430\u0447\u0438\u0442, \u0447\u0442\u043e \u0432\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u043c\u043e\u0434\u0438\u0444\u0438\u0446\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u0442\u0430\u043a\u043e\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ENTMOD \u0438\u043b\u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0438: SSADD \u0438\u043b\u0438 ENTSEL , \u0447\u0442\u043e\u0431\u044b \u043f\u043e\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u0435\u0433\u043e \u0432 selectin-set. \u041f\u0440\u0438\u043c\u0435\u043d\u044f\u044f \u0441\u043e\u0432\u043e\u043a\u0443\u043f\u043d\u043e\u0441\u0442\u044c &#171;-2&#8243;\u0438\u043c\u0435\u043d\u0438 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 EN<\/span>T<span style=\"font-family: Times New Roman\">NEXT, \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0441\u043a\u0430\u043d\u0438\u0440\u043e\u0432\u0430\u0442\u044c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b, \u0441\u0436\u0438\u043c\u0430\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u0431\u043b\u043e\u043a\u0430; \u0444\u0443\u043d\u043a\u0446\u0438\u044f ENTNEXT \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 &#171;nil&#187; \u043f\u043e\u0441\u043b\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u0431\u043b\u043e\u043a\u0430.<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261019\"><\/a><br \/>\n(tblsearch &lt;table name&gt; &lt;symbol&gt;<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u0435\u0442 \u0442\u0430\u0431\u043b\u0438\u0446\u0443 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432, \u0438\u0434\u0435\u043d\u0442\u0438\u0444\u0438\u0446\u0438\u0440\u0443\u0435\u043c\u0443\u044e &lt;table name&gt; (\u0442\u043e \u0436\u0435 \u0441\u0430\u043c\u043e\u0435, \u0447\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f TBLNEXT), \u043e\u0442\u044b\u0441\u043a\u0438\u0432\u0430\u044f \u0438\u043c\u044f \u0441\u0438\u043c\u0432\u043e\u043b\u0430 \u043f\u0440\u0438\u0441\u0432\u043e\u0435\u043d\u043d\u043e\u0433\u043e &lt;symbol&gt;. \u041e\u0431\u0430 \u0438\u043c\u0435\u043d\u0438 \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u043f\u0440\u0438\u0432\u043e\u0434\u044f\u0442\u0441\u044f \u043a \u0432\u0435\u0440\u0445\u043d\u0435\u043c\u0443 \u0440\u0435\u0433\u0438\u0441\u0442\u0440\u0443. \u041a\u043e\u0433\u0434\u0430 \u043e\u0431\u043d\u0430\u0440\u0443\u0436\u0435\u043d\u043e \u0438\u043c\u044f \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430, \u043f\u043e\u0434\u043e\u0431\u043d\u043e\u0435 \u0442\u043e\u043c\u0443, \u043a\u043e\u0442\u043e\u0440\u043e\u0435 \u0434\u0430\u043b &lt;symbol&gt;, \u044d\u0442\u0430 \u0437\u0430\u043f\u0438\u0441\u044c \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0432 \u0444\u043e\u0440\u043c\u0430\u0442\u0435, \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u043e\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 TBLNEXT. \u0415\u0441\u043b\u0438 \u0442\u0430\u043a\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u043d\u0435 \u043e\u0431\u043d\u0430\u0440\u0443\u0436\u0435\u043d, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f &#171;nil&#187;<\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(tblsearch &#171;style&#187; &#171;standard&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u0435\u0442 \u0441\u0442\u0438\u043b\u044c \u0442\u0435\u043a\u0441\u0442\u0430<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u043c\u043e\u0436\u0435\u0442 \u0432\u0435\u0440\u043d\u0443\u0442\u044c:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">((0 . &#171;STYLE&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0442\u0438\u043f \u0441\u0438\u043c\u0432\u043e\u043b\u0430<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(2 . &#171;STANDARD&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0438\u043c\u044f \u0441\u0438\u043c\u0432\u043e\u043b\u0430<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(70 . 0)<\/span><span style=\"font-family: Times New Roman\"> \u0444\u043b\u0430\u0436\u043a\u0438<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(40 . 0.000000)<\/span><span style=\"font-family: Times New Roman\"> \u0444\u0438\u043a\u0441\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0432\u044b\u0441\u043e\u0442\u044b<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(41 . 1.000000)<\/span><span style=\"font-family: Times New Roman\"> \u0444\u0430\u043a\u0442\u043e\u0440 \u0448\u0438\u0440\u0438\u043d\u044b<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(50 . 0.000000)<\/span><span style=\"font-family: Times New Roman\"> \u0443\u0433\u043e\u043b<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(71 . 0)<\/span><span style=\"font-family: Times New Roman\"> \u0433\u0435\u043d\u0435\u0440\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0444\u043b\u0430\u0436\u043a\u043e\u0432<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(3 . &#171;txt&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0441\u0430\u043c\u044b\u0439 \u043f\u0435\u0440\u0432\u044b\u0439 font file<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">(4 . &#171;&#187;)<\/span><span style=\"font-family: Times New Roman\"> \u0431\u043e\u043b\u044c\u0448\u043e\u0439 font file<\/span><\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u043e\u0440\u044f\u0434\u043e\u043a \u0432\u0432\u043e\u0434\u043e\u0432 \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d \u0438\u0437 TBLNEXT \u0431\u0435\u0437 \u0432\u043e\u0437\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 TBLSEARCH.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172776\"><\/a><a name=\"_Ref465174265\"><\/a><a name=\"_Toc465261020\"><\/a><span style=\"font-family: Arial\">\u0414\u043e\u0441\u0442\u0443\u043f<br \/>\n\u043a \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u043e\u043c\u0443 \u044d\u043a\u0440\u0430\u043d\u0443 \u0438 \u0443\u0441\u0442\u0440\u043e\u0439\u0441\u0442\u0432\u0430\u043c \u0432\u0432\u043e\u0434\u0430<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261021\"> (grclear) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261022\">(grdraw &lt;from&gt; &lt;to&gt; &lt;color&gt;<br \/>\n[&lt;highlight&gt;]) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261023\">( grtext [&lt;box&gt; &lt;text&gt;<br \/>\n[&lt;highlight&gt;]]) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261024\">(grread [&lt;trac&gt;]) <\/a><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u0438 AutoLISP\u0430, \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u044b\u0435 \u0432 \u044d\u0442\u043e\u043c \u0440\u0430\u0437\u0434\u0435\u043b\u0435, \u043e\u0431\u0435\u0441\u043f\u0435\u0447\u0438\u0432\u0430\u044e\u0442 \u043f\u0440\u044f\u043c\u043e\u0439 \u0434\u043e\u0441\u0442\u0443\u043f \u043a \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u043e\u043c\u0443 \u044d\u043a\u0440\u0430\u043d\u0443 AutoCAD\u0430, \u0438 \u0443\u0441\u0442\u0440\u0430\u0438\u0432\u0430\u044e\u0442 \u0432\u0445\u043e\u0434 \u0438\u0437 LISP\u0430, \u0438 \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044e\u0442 \u0441\u0440\u0435\u0434\u0441\u0442\u0432\u0430\u043c\u0438 LISP-\u043a\u043e\u043c\u0430\u043d\u0434 \u0432\u0437\u0430\u0438\u043c\u043e\u0434\u0435\u0439\u0441\u0442\u0432\u043e\u0432\u0430\u0442\u044c \u0441 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c, \u043a\u0430\u043a \u0435\u0441\u043b\u0438 \u0431\u044b \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u0435 \u0431\u044b\u043b\u043e \u0431\u0435\u0437 AutoCAD\u0430. \u042d\u0442\u0438 \u043a\u043e\u043c\u0430\u043d\u0434\u044b \u043c\u043e\u0433\u0443\u0442 \u0443\u0441\u0442\u0440\u043e\u0438\u0442\u044c \u0431\u0435\u0441\u043f\u043e\u0440\u044f\u0434\u043e\u043a \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435. \u041e\u0434\u043d\u0430\u043a\u043e, \u043b\u044e\u0431\u043e\u0435 \u043f\u043e\u0432\u0440\u0435\u0436\u0434\u0435\u043d\u0438\u0435, \u043a\u043e\u0442\u043e\u0440\u043e\u0435 \u043e\u043d\u0438 \u043d\u0430\u043d\u043e\u0441\u044f\u0442, \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043e\u0442\u043c\u0435\u043d\u0435\u043d\u043e \u043f\u043e\u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0441\u0442\u044c\u044e:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(grtext)<\/p>\n<p align=\"JUSTIFY\">(redraw)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u043e\u0434\u043d\u0430\u043a\u043e, \u043d\u0435\u0442 \u043d\u0443\u0436\u0434\u044b \u043a\u0430\u0441\u0430\u0442\u044c\u0441\u044f \u044d\u0442\u043e\u0433\u043e. \u042d\u0442\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0442\u043e\u043b\u044c\u043a\u043e \u0434\u043b\u044f \u043e\u043f\u044b\u0442\u043d\u044b\u0445 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u0439. \u0411\u043e\u043b\u044c\u0448\u0438\u043d\u0441\u0442\u0432\u0443 \u043f\u0440\u0438\u043c\u0435\u043d\u0435\u043d\u0438\u0439 LISP\u0430 \u043d\u0435 \u043d\u0443\u0436\u043d\u044b \u044d\u0442\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u041f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u0439 \u043f\u0440\u0435\u0434\u0443\u043f\u0440\u0435\u0436\u0434\u0430\u0435\u043c, \u0447\u0442\u043e \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f \u044d\u0442\u0438\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u043c\u043e\u0433\u0443\u0442 \u0431\u044b\u0442\u044c \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u044b \u043e\u0442 \u0432\u044b\u043f\u0443\u0441\u043a\u0430 \u043a \u0432\u044b\u043f\u0443\u0441\u043a\u0443 \u0441\u0438\u0441\u0442\u0435\u043c\u044b AutoCAD \u0438, \u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u0435\u043b\u044c\u043d\u043e, Autodesk, \u043f\u043e\u044d\u0442\u043e\u043c\u0443 \u043d\u0435\u0442 \u0433\u0430\u0440\u0430\u043d\u0442\u0438\u0438 \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u043e\u0439 \u0432\u044b\u0448\u0435 \u0441\u043e\u0432\u043c\u0435\u0441\u0442\u0438\u043c\u043e\u0441\u0442\u0438 \u043f\u0440\u0438\u043c\u0435\u043d\u0435\u043d\u0438\u0439 \u044d\u0442\u0438\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0439. \u041f\u0440\u0438\u043c\u0435\u043d\u0435\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 GRTEXT \u0438 GRREAD \u0442\u0430\u043a\u0436\u0435 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043d\u0435\u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0435, \u0434\u043b\u044f \u0440\u0430\u0431\u043e\u0442\u044b \u043d\u0430 \u043b\u044e\u0431\u043e\u0439 \u0436\u0435\u0441\u0442\u043a\u043e\u0439 \u043a\u043e\u043d\u0444\u0438\u0433\u0443\u0440\u0430\u0446\u0438\u0438, \u0435\u0441\u043b\u0438 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u043d\u0435 \u043e\u0447\u0435\u043d\u044c \u0432\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u0435\u043d, \u0447\u0442\u043e\u0431\u044b \u0430\u043a\u043a\u0443\u0440\u0430\u0442\u043d\u043e \u0441\u043b\u0435\u0434\u043e\u0432\u0430\u0442\u044c \u043f\u0440\u0430\u0432\u0438\u043b\u0430\u043c \u0438\u0445 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u044f, \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u043d\u044b\u043c \u043d\u0438\u0436\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261021\"><\/a>(grclear)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043e\u0447\u0438\u0449\u0430\u0435\u0442 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u044d\u043a\u0440\u0430\u043d AutoCAD\u0430. (\u0412 \u0441\u0438\u0441\u0442\u0435\u043c\u0430\u0445 \u0441 \u043e\u0434\u043d\u0438\u043c \u044d\u043a\u0440\u0430\u043d\u043e\u043c \u043e\u043d\u0430 \u043f\u0435\u0440\u0435\u043a\u043b\u044e\u0447\u0438\u0442 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u044d\u043a\u0440\u0430\u043d \u0441 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u043e\u0433\u043e \u0440\u0435\u0436\u0438\u043c\u0430 \u043d\u0430 \u043f\u0435\u0440\u0432\u044b\u0439). \u041f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0430, \u0441\u0442\u0430\u0442\u0443\u0441 \u0438 \u043c\u0435\u043d\u044e \u043e\u0441\u0442\u0430\u044e\u0442\u0441\u044f \u043d\u0435\u0438\u0437\u043c\u0435\u043d\u043d\u044b\u043c\u0438. \u041e\u0440\u0438\u0433\u0438\u043d\u0430\u043b \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u043f\u0435\u0440\u0435\u0432\u044b\u0432\u0435\u0434\u0435\u043d \u043d\u0430 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u044d\u043a\u0440\u0430\u043d \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 REDRAW.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261022\"><\/a>(grdraw<br \/>\n&lt;from&gt; &lt;to&gt; &lt;color&gt; [&lt;highlight&gt;])<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f GRDRAW \u0432\u044b\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u0435\u0442 \u0432\u0435\u043a\u0442\u043e\u0440 \u043c\u0435\u0436\u0434\u0443 \u0434\u0432\u0443\u043c\u044f \u0442\u043e\u0447\u043a\u0430\u043c\u0438 . &lt;from&gt; \u0438 &lt;to&gt; \u044f\u0432\u043b\u044f\u044e\u0442\u0441\u044f \u0442\u043e\u0447\u043a\u0430\u043c\u0438 (\u0441\u043f\u0438\u0441\u043a\u0438 \u0438\u0437 \u0434\u0432\u0443\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b), \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0442 \u043a\u043e\u043d\u0435\u0447\u043d\u044b\u0435 \u0442\u043e\u0447\u043a\u0438 \u0432\u0435\u043a\u0442\u043e\u0440\u0430. \u041a\u043e\u043d\u0435\u0447\u043d\u044b\u0435 \u0442\u043e\u0447\u043a\u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0442\u0441\u044f, \u043a\u0430\u043a \u043f\u043b\u0430\u0432\u0430\u044e\u0449\u0438\u0435 \u0442\u043e\u0447\u043a\u0438 \u0434\u043b\u044f \u0432\u044b\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442 \u0438 \u0431\u0443\u0434\u0435\u0442 clipped, \u043a\u0430\u043a \u0442\u0440\u0435\u0431\u043e\u0432\u0430\u043d\u0438\u0435, \u0447\u0442\u043e\u0431\u044b \u0432\u044b\u0432\u0435\u0441\u0442\u0438 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d. \u0412\u0435\u043a\u0442\u043e\u0440 \u0431\u0443\u0434\u0435\u0442 \u043d\u0430\u0440\u0438\u0441\u043e\u0432\u0430\u043d \u0441 \u0446\u0432\u0435\u0442\u043d\u044b\u043c \u0432\u044b\u0432\u043e\u0434\u043e\u043c, \u0435\u0441\u043b\u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;color&gt; \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c\u043e\u0435 \u0432 \u0433\u0440\u0443\u043f\u043f\u0435 -1 \u0432 &#171;XOR ink&#187;, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0437\u0430\u043a\u0430\u043d\u0447\u0438\u0432\u0430\u0435\u0442 \u043b\u044e\u0431\u043e\u0435 \u0435\u0433\u043e \u0432\u044b\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u0435 \u0438 \u0443\u043d\u0438\u0447\u0442\u043e\u0436\u0430\u0435\u0442\u0441\u044f, \u043a\u043e\u0433\u0434\u0430 \u043f\u0435\u0440\u0435\u0447\u0435\u0440\u0447\u0435\u043d\u043e. \u0415\u0441\u043b\u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;highlight&gt; \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0438 \u043d\u0435 &#171;0&#187;, \u0431\u0443\u0434\u0435\u0442 \u043d\u0430\u0440\u0438\u0441\u043e\u0432\u0430\u043d \u0432\u0435\u043a\u0442\u043e\u0440 \u0442\u0430\u043a, \u043a\u0430\u043a \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c \u0434\u0438\u0441\u043f\u043b\u0435\u044f \u0432\u044b\u0441\u0432\u0435\u0442\u0438\u0442 \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b ( \u043e\u0431\u044b\u0447\u043d\u043e \u043f\u043e\u0442\u043e\u0447\u0435\u0447\u043d\u043e ). \u0415\u0441\u043b\u0438 &lt;highlight&gt; \u043f\u0440\u043e\u043f\u0443\u0449\u0435\u043d \u0438\u043b\u0438 \u0438\u043c\u0435\u0435\u0442 \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u0435 0, \u0431\u0443\u0434\u0435\u0442 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d \u043d\u043e\u0440\u043c\u0430\u043b\u044c\u043d\u044b\u0439 \u0440\u0435\u0436\u0438\u043c \u0432\u044b\u0432\u043e\u0434\u0430 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261023\"><\/a>(<br \/>\ngrtext [&lt;box&gt; &lt;text&gt; [&lt;highlight&gt;]])<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f GRTEXT \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 AutoLISP\u0443 \u0432\u044b\u0432\u043e\u0434\u0438\u0442\u044c \u0442\u0435\u043a\u0441\u0442 \u0447\u0430\u0441\u0442\u044f\u043c\u0438 \u043d\u0430 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u044d\u043a\u0440\u0430\u043d \u0432 AutoCAD\u0435. \u0415\u0441\u043b\u0438 \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0441 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u043c &lt;box&gt; \u043e\u0442 0 \u0438 \u0434\u043e \u0441\u0430\u043c\u043e\u0433\u043e \u0432\u044b\u0441\u043e\u043a\u043e\u0433\u043e \u0447\u0438\u0441\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0437\u043d\u0430\u0447\u0435\u043d\u0438\u044f \u0431\u043e\u043a\u0441\u0430 \u0432 \u043c\u0435\u043d\u044e \u044d\u043a\u0440\u0430\u043d\u0430 \u043c\u0438\u043d\u0443\u0441 1, \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u044b\u0432\u0435\u0434\u0435\u0442 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d \u0434\u0438\u0441\u043f\u043b\u0435\u044f \u0441\u0442\u0440\u043e\u043a\u043e\u0432\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;text&gt;, \u0432 \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u044b\u0439 \u0432 \u043c\u0435\u043d\u044e \u0431\u043e\u043a\u0441 . \u0422\u0435\u043a\u0441\u0442&lt;text&gt; \u0431\u0443\u0434\u0435\u0442 \u0441\u043e\u043a\u0440\u0430\u0449\u0435\u043d, \u0435\u0441\u043b\u0438 \u043e\u043d \u0441\u043b\u0438\u0448\u043a\u043e\u043c \u0434\u043b\u0438\u043d\u043d\u044b\u0439, \u0438 \u043d\u0435\u043f\u0440\u0438\u0433\u043e\u0434\u0435\u043d \u0434\u043b\u044f \u0431\u043e\u043a\u0441\u0430, \u0438 \u043f\u0443\u0441\u0442\u043e\u0442\u0430 \u0437\u0430\u043f\u043e\u043b\u043d\u0438\u0442\u0441\u044f \u043f\u0440\u043e\u0431\u0435\u043b\u0430\u043c\u0438, \u0435\u0441\u043b\u0438 \u0442\u0435\u043a\u0441\u0442 \u043a\u043e\u0440\u043e\u0447\u0435. \u0415\u0441\u043b\u0438 \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0444\u0430\u043a\u0443\u043b\u044c\u0442\u0430\u0442\u0438\u0432\u043d\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 (\u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e) &lt;highlight&gt; \u0438 \u043e\u043d \u043d\u0435 0, \u0432 \u043f\u0440\u0435\u0434\u043d\u0430\u0437\u043d\u0430\u0447\u0435\u043d\u043d\u043e\u043c \u0431\u043e\u043a\u0441\u0435 \u0431\u0443\u0434\u0435\u0442 \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0442\u044c\u0441\u044f \u0442\u0435\u043a\u0441\u0442. \u0415\u0441\u043b\u0438 &lt;highlight&gt; \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u0438 0, \u0442\u0435\u043a\u0441\u0442 \u0432 \u043f\u0440\u0435\u0434\u043d\u0430\u0437\u043d\u0430\u0447\u0435\u043d\u043d\u043e\u043c \u0431\u043e\u043a\u0441\u0435 \u043d\u0435 \u0431\u0443\u0434\u0435\u0442 \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0442\u044c\u0441\u044f ( \u0437\u0430\u043f\u043e\u043c\u043d\u0438\u0442\u0435, \u0447\u0442\u043e \u043f\u0440\u0438 \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u043d\u0438\u0438<\/span> <span style=\"font-family: Times New Roman\">\u0434\u0440\u0443\u0433\u043e\u0433\u043e \u0442\u0435\u043a\u0441\u0442\u0430, \u0431\u043e\u043a\u0441 \u0430\u0432\u0442\u043e\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438 \u043e\u0442\u043c\u0435\u043d\u044f\u0435\u0442 \u043f\u0440\u0435\u0434\u044b\u0434\u0443\u0449\u0438\u0439 \u0442\u0435\u043a\u0441\u0442, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0431\u044b\u043b \u0432\u044b\u0441\u0432\u0435\u0447\u0435\u043d). \u041a\u043e\u0433\u0434\u0430 \u0432\u044b \u043f\u0438\u0448\u0435\u0442\u0435 \u0432 \u0431\u043e\u043a\u0441\u0435, \u0442\u0435\u043a\u0441\u0442 \u0441\u043d\u0430\u0447\u0430\u043b\u0430 \u0434\u043e\u043b\u0436\u0435\u043d \u0431\u044b\u0442\u044c \u043d\u0430\u043f\u0438\u0441\u0430\u043d \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430 &lt;highlight&gt;, \u0437\u0430\u0442\u0435\u043c \u0432\u044b\u0441\u0432\u0435\u0447\u0435\u043d. \u0422\u0430\u043a\u0430\u044f \u0436\u0435 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u0430\u044f \u0441\u0442\u0440\u043e\u043a\u0430, \u043a\u0430\u043a\u0430\u044f \u0432 \u043e\u0440\u0438\u0433\u0438\u043d\u0430\u043b\u0435 \u0432\u0432\u043e\u0434\u0438\u0442\u0441\u044f \u0432 \u0431\u043e\u043a\u0441, \u0434\u043e\u043b\u0436\u043d\u0430 \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0442\u044c\u0441\u044f \u0438 \u043d\u0435 \u0432\u044b\u0441\u0432\u0435\u0447\u0438\u0432\u0430\u0442\u044c\u0441\u044f. \u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442\u043e\u043c \u043d\u0435\u0441\u043e\u0431\u043b\u044e\u0434\u0435\u043d\u0438\u044f \u044d\u0442\u0438\u0445 \u043f\u0440\u0430\u0432\u0438\u043b \u0431\u0443\u0434\u0443\u0442 LISP \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u044b, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u0435\u0434\u0443\u0442 \u0441\u0435\u0431\u044f \u043f\u043e-\u0440\u0430\u0437\u043d\u043e\u043c\u0443 \u043d\u0430 \u0440\u0430\u0437\u043d\u044b\u0445 \u0434\u0438\u0441\u043f\u043b\u0435\u044f\u0445. <\/span><\/p>\n<p><span style=\"font-family: Times New Roman\"><br \/>\n<b><i><\/i><\/b><br \/>\n<\/span><\/p>\n<p align=\"JUSTIFY\"><u><i><b>\u0417\u0430\u043f\u043e\u043c\u043d\u0438\u0442\u0435,<\/b><\/i><\/u> \u0447\u0442\u043e \u044d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043f\u0440\u043e\u0441\u0442\u043e \u0432\u044b\u0432\u043e\u0434\u0438\u0442 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d \u0434\u0438\u0441\u043f\u043b\u0435\u044f \u0442\u0435\u043a\u0441\u0442, \u043d\u0430\u0445\u043e\u0434\u044f\u0449\u0438\u0439\u0441\u044f \u0432 \u043f\u043b\u043e\u0449\u0430\u0434\u0438 \u044d\u043a\u0440\u0430\u043d\u0430 ; \u043e\u043d\u0430 \u043d\u0435 \u0438\u0437\u043c\u0435\u043d\u044f\u0435\u0442 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u044b \u044d\u043a\u0440\u0430\u043d\u043d\u043e\u0433\u043e \u043c\u0435\u043d\u044e.<\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f GRTEXT \u0432\u044b\u0437\u044b\u0432\u0430\u0435\u0442\u0441\u044f \u0431\u043e\u043a\u0441\u043e\u043c \u043d\u043e\u043c\u0435\u0440 -1, \u0442\u0435\u043a\u0441\u0442 \u0431\u0443\u0434\u0435\u0442 \u0432\u044b\u0432\u0435\u0434\u0435\u043d \u043d\u0430 \u044d\u043a\u0440\u0430\u043d \u0432 \u0440\u0435\u0436\u0438\u043c\u0435 \u0441\u0442\u0430\u0442\u0443\u0441\u0430 \u043b\u0438\u043d\u0438\u0438 . \u0414\u043b\u0438\u043d\u0430 \u043b\u0438\u043d\u0438\u0438 \u0437\u0430\u0432\u0438\u0441\u0438\u0442 \u043e\u0442 \u0434\u0438\u0441\u043f\u043b\u0435\u044f ( \u0431\u043e\u043b\u044c\u0448\u0438\u043d\u0441\u0442\u0432\u043e \u0438\u0445 \u0434\u043e\u043f\u0443\u0441\u043a\u0430\u0435\u0442, \u043f\u043e \u043a\u0440\u0430\u0439\u043d\u0435\u0439 \u043c\u0435\u0440\u0435, 40 \u0440\u0430\u0437\u043d\u043e\u0432\u0438\u0434\u043d\u043e\u0441\u0442\u0435\u0439, \u0437\u0430 \u0438\u0441\u043a\u043b\u044e\u0447\u0435\u043d\u0438\u0435\u043c \u0437\u0430\u043c\u0435\u0447\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0433\u043e Color Graphics Adaptor \u0444\u0438\u0440\u043c\u044b IBM ). \u0422\u0435\u043a\u0441\u0442 \u0431\u0443\u0434\u0435\u0442 \u0441\u043e\u043a\u0440\u0430\u0449\u0435\u043d, \u0447\u0442\u043e\u0431\u044b \u043f\u0440\u0438\u0433\u043d\u0430\u0442\u044c \u0435\u0433\u043e \u043a \u0438\u043c\u0435\u044e\u0449\u0435\u043c\u0443\u0441\u044f \u0432 \u0440\u0430\u0441\u043f\u043e\u0440\u044f\u0436\u0435\u043d\u0438\u0438 \u043f\u0440\u043e\u0441\u0442\u0440\u0430\u043d\u0441\u0442\u0432\u0443 .<\/p>\n<p align=\"JUSTIFY\">\u0415\u0441\u043b\u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442\u0441\u044f \u0431\u043e\u043a\u0441 \u0441 \u043d\u043e\u043c\u0435\u0440\u043e\u043c -2, \u0442\u0435\u043a\u0441\u0442 \u0431\u0443\u0434\u0435\u0442 \u043d\u0430\u043f\u0438\u0441\u0430\u043d \u0432 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0430\u0445 \u0441\u0442\u0430\u0442\u0443\u0441\u0430 \u043b\u0438\u043d\u0438\u0438. \u0417\u0430\u043f\u043e\u043c\u043d\u0438\u0442\u0435, \u0447\u0442\u043e \u0435\u0441\u043b\u0438 \u0441\u043b\u0435\u0436\u0435\u043d\u0438\u0435 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442 \u0432\u043a\u043b\u044e\u0447\u0435\u043d\u043e, \u0432\u0435\u043b\u0438\u0447\u0438\u043d\u044b, \u0437\u0430\u043f\u0438\u0441\u0430\u043d\u043d\u044b\u0435 \u0432 \u044d\u0442\u043e \u043f\u043e\u043b\u0435, \u043f\u0435\u0440\u0435\u043f\u0438\u0448\u0443\u0442\u0441\u044f, \u043a\u0430\u043a \u0442\u043e\u043b\u044c\u043a\u043e \u0443\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u044c \u043f\u043e\u0448\u043b\u0435\u0442 \u0434\u0440\u0443\u0433\u043e\u0439 \u043d\u0430\u0431\u043e\u0440 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442. \u041a\u0430\u0436\u0434\u044b\u0439 \u0438\u0437 \u043d\u043e\u043c\u0435\u0440\u043e\u0432, -1 \u0438\u043b\u0438 -2, \u0438\u0433\u043d\u043e\u0440\u0438\u0440\u0443\u0435\u0442 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;highlight&gt;, \u0435\u0441\u043b\u0438 \u043e\u043d \u043f\u0440\u0438\u0441\u0443\u0442\u0441\u0442\u0432\u0443\u0435\u0442 . \u041d\u0430\u043a\u043e\u043d\u0435\u0446, \u0444\u0443\u043d\u043a\u0446\u0438\u044f DRTEXT \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0432\u044b\u0437\u0432\u0430\u043d\u0430 \u0431\u0435\u0437 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432, \u0447\u0442\u043e\u0431\u044b \u0432\u043e\u0441\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u0432\u0441\u044e \u043f\u043b\u043e\u0449\u0430\u0434\u044c \u0442\u0435\u043a\u0441\u0442\u0430 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435, \u0441 \u0435\u0433\u043e \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u044b\u043c\u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u043c\u0438.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261024\"><\/a>(grread<br \/>\n[&lt;trac&gt;])<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f GRREAD \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u0435\u0442 \u0432\u0430\u043c \u043d\u0435\u043f\u043e\u0441\u0440\u0435\u0434\u0441\u0442\u0432\u0435\u043d\u043d\u043e \u0441\u043b\u0435\u0434\u0438\u0442\u044c \u0437\u0430 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c\u043e\u043c \u0432\u0445\u043e\u0434\u0430 AutoCAD\u0430, \u0432\u044b\u0441\u043b\u0435\u0436\u0438\u0432\u0430\u044f \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u044b\u0435 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c\u044b, \u043a\u043e\u0433\u0434\u0430 \u043e\u043d\u0438 \u0438\u0437\u043c\u0435\u043d\u044f\u044e\u0442\u0441\u044f. \u042d\u0442\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043d\u0443\u0436\u043d\u044b \u0442\u043e\u043b\u044c\u043a\u043e \u0441\u043f\u0435\u0446\u0438\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0435 \u043a\u043e\u043c\u0430\u043d\u0434\u044b, \u0431\u043e\u043b\u044c\u0448\u0438\u043d\u0441\u0442\u0432\u043e \u0432\u0445\u043e\u0434\u043e\u0432 \u0432 AutoLISP \u043f\u0440\u043e\u0439\u0434\u0443\u0442 \u0447\u0435\u0440\u0435\u0437 \u0440\u0430\u0437\u043b\u0438\u0447\u043d\u044b\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GETxxx, \u0442\u0430\u043a\u0438\u0435 \u043a\u0430\u043a GETSTRING, GETREAL \u0438 \u043f\u043e\u0434\u043e\u0431\u043d\u044b\u0435. \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442 &lt;track&gt;, \u0435\u0441\u043b\u0438 \u043e\u043d \u0438\u043c\u0435\u0435\u0442\u0441\u044f \u0438 \u043d\u0435 &#171;nil&#187;, \u0434\u0430\u0435\u0442 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u044c \u0432\u0435\u0440\u043d\u0443\u0442\u044c \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b \u0438\u0437 \u0443\u043a\u0430\u0437\u0430\u043d\u043d\u044b\u0445 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c\u043e\u0432, \u043a\u043e\u0433\u0434\u0430 \u043e\u043d\u0438<\/span> <span style=\"font-family: Times New Roman\">\u0434\u0432\u0438\u0433\u0430\u044e\u0442\u0441\u044f, \u043d\u0435 \u0442\u0440\u0435\u0431\u0443\u044f \u0432\u044b\u0431\u043e\u0440\u0430 \u043d\u0430\u0436\u0430\u0442\u0438\u0435\u043c \u043a\u043b\u0430\u0432\u0438\u0448. \u042d\u0442\u043e\u0442 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c AutoCAD \u043e\u0431\u044b\u0447\u043d\u043e \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442 \u0434\u043b\u044f \u043f\u0440\u043e\u0442\u044f\u0433\u0438\u0432\u0430\u043d\u0438\u044f.<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f GRREAD \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442 \u0441\u043f\u0438\u0441\u043e\u043a, \u0432 \u043a\u043e\u0442\u043e\u0440\u043e\u043c \u043f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u044d\u0442\u043e \u043a\u043e\u0434, \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u044e\u0449\u0438\u0439 \u0442\u0438\u043f \u0432\u0445\u043e\u0434\u0430. \u0412\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0441\u043f\u0438\u0441\u043a\u0430 &#8212; \u043b\u044e\u0431\u043e\u0435 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0438\u043b\u0438 \u0441\u043f\u0438\u0441\u043e\u043a \u0442\u043e\u0447\u0435\u043a, \u0437\u0430\u0432\u0438\u0441\u044f\u0449\u0438\u0445 \u043e\u0442 \u0442\u0438\u043f\u0430 \u0432\u0445\u043e\u0434\u0430 .\u041a\u043e\u0434\u044b \u0434\u043b\u044f \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 \u0432 \u0441\u043f\u0438\u0441\u043a\u0435 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435:<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>\u0445\u0430\u0440\u0430\u043a\u0442\u0435\u0440\u0438\u0437\u0443\u0435\u0442 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u0443 &#8212; \u0432 \u043a\u043e\u0434\u0430\u0445 ASCII, \u0442\u0430\u043a\u0436\u0435 \u0438 \u0434\u043b\u044f \u0432\u0442\u043e\u0440\u043e\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>\u0432\u044b\u0431\u0438\u0440\u0430\u0435\u043c\u0430\u044f \u0442\u043e\u0447\u043a\u0430 &#8212; \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b, \u043a\u0430\u043a \u0441\u043f\u0438\u0441\u043e\u043a \u0432\u044b\u0431\u0438\u0440\u0430\u0435\u043c\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u043c\u0435\u043d\u044e \u044d\u043a\u0440\u0430\u043d\u0430 &#8212; \u043d\u043e\u043c\u0435\u0440 \u0431\u043e\u043a\u0441\u0430, \u0442\u0430\u043a\u0436\u0435 \u0438 \u0434\u043b\u044f \u0432\u0442\u043e\u0440\u043e\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>\u0440\u0435\u0436\u0438\u043c \u043f\u0440\u043e\u0442\u044f\u0433\u0438\u0432\u0430\u043d\u0438\u044f \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442, \u0442\u0430\u043a\u0436\u0435 \u0438 \u0434\u043b\u044f \u0432\u0442\u043e\u0440\u043e\u0433\u043e \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430. \u0412\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u0442\u0441\u044f \u0442\u043e\u043b\u044c\u043a\u043e, \u0435\u0441\u043b\u0438 \u0432\u0442\u043e\u0440\u043e\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d \u0438 \u043e\u043d \u043d\u0435&#187;nil&#187;<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>BUTTONS \u0432\u044b\u0431\u0438\u0440\u0430\u0435\u043c\u044b\u0439 \u043f\u0443\u043d\u043a\u0442 \u043c\u0435\u043d\u044e &#8212; \u043d\u043e\u043c\u0435\u0440 \u043a\u043b\u0430\u0432\u0438\u0448\u0438 \u044d\u0442\u043e \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>TABLET1 \u043e\u0446\u0438\u0444\u0440\u043e\u0432\u044b\u0432\u0430\u0435\u043c\u044b\u0439 \u043f\u0443\u043d\u043a\u0442 \u043c\u0435\u043d\u044e &#8212; \u043d\u043e\u043c\u0435\u0440 \u0431\u043e\u043a\u0441\u0430 \u044d\u0442\u043e \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>TABLET2 \u043e\u0446\u0438\u0444\u0440\u043e\u0432\u044b\u0432\u0430\u0435\u043c\u044b\u0439 \u043f\u0443\u043d\u043a\u0442 \u043c\u0435\u043d\u044e &#8212; \u043d\u043e\u043c\u0435\u0440 \u0431\u043e\u043a\u0441\u0430 \u044d\u0442\u043e \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>TABLET3 \u043e\u0446\u0438\u0444\u0440\u043e\u0432\u044b\u0432\u0430\u0435\u043c\u044b\u0439 \u043f\u0443\u043d\u043a\u0442 \u043c\u0435\u043d\u044e &#8212; \u043d\u043e\u043c\u0435\u0440 \u0431\u043e\u043a\u0441\u0430 \u044d\u0442\u043e \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>TABLET4 \u043e\u0446\u0438\u0444\u0440\u043e\u0432\u044b\u0432\u0430\u0435\u043c\u044b\u0439 \u043f\u0443\u043d\u043a\u0442 \u043c\u0435\u043d\u044e &#8212; \u043d\u043e\u043c\u0435\u0440 \u0431\u043e\u043a\u0441\u0430 \u044d\u0442\u043e \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>AUXI \u043e\u0446\u0438\u0444\u0440\u043e\u0432\u044b\u0432\u0430\u0435\u043c\u044b\u0439 \u043f\u0443\u043d\u043a\u0442 \u043c\u0435\u043d\u044e &#8212; \u043d\u043e\u043c\u0435\u0440 \u0431\u043e\u043a\u0441\u0430 \u044d\u0442\u043e \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>\u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b, \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u044b\u0435 \u0441 \u0443\u043a\u0430\u0437\u0430\u0442\u0435\u043b\u0435\u043c \u043a\u043b\u0430\u0432\u0438\u0448, \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u043c\u044b\u0435, \u043a\u0430\u043a \u0432\u0442\u043e\u0440\u043e\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442. \u0412\u0441\u0435\u0433\u0434\u0430 \u0441\u043b\u0435\u0434\u0443\u0435\u0442 \u0442\u0438\u043f 6 , \u0447\u0442\u043e\u0431\u044b \u0432\u043e\u0437\u0432\u0440\u0430\u0442\u0438\u0442\u044c \u0441\u043f\u0438\u0441\u043e\u043a<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<ul>\n<li>\u0432\u044b\u0431\u043e\u0440 \u0432\u044b\u0441\u0432\u0435\u0447\u0435\u043d\u043d\u043e\u0433\u043e \u043f\u0443\u043d\u043a\u0442\u0430 \u043c\u0435\u043d\u044e \u044d\u043a\u0440\u0430\u043d\u0430 \u043f\u0440\u0438 \u043f\u043e\u043c\u043e\u0449\u0438 \u0432\u0432\u043e\u0434\u0430 \u0441 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b<\/li>\n<\/ul>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\u0412\u0432\u043e\u0434 CTRL C \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f \u043a\u0430\u043a \u0438\u0434\u0435\u0442 GRREAD , \u0432\u044b\u0437\u043e\u0432\u0435\u0442 \u043f\u0440\u0435\u0440\u044b\u0432\u0430\u043d\u0438\u0435 (abort) LISP \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u044b \u0441 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b. \u041b\u044e\u0431\u043e\u0439 \u0434\u0440\u0443\u0433\u043e\u0439 \u0432\u0445\u043e\u0434 \u043f\u0440\u043e\u0439\u0434\u0435\u0442 \u043f\u0440\u044f\u043c\u043e \u043a GRREAD ,\u0434\u0430\u0432\u0430\u044f \u044d\u0442\u0438\u043c \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u044c \u0437\u0430\u043a\u043e\u043d\u0447\u0438\u0442\u044c \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044c \u043d\u0430\u0434 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c\u043e\u043c \u0432\u0445\u043e\u0434\u0430.<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261025\"><\/a>\u041e\u0431\u0440\u0430\u0437\u0446\u044b<br \/>\n\u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261026\">\u0423\u0434\u0430\u043b\u0435\u043d\u0438\u0435<br \/>\n\u0443\u0440\u043e\u0432\u043d\u044f <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261027\">\u0423\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u0435<br \/>\n\u0442\u0435\u043a\u0443\u0449\u0435\u0433\u043e \u0443\u0440\u043e\u0432\u043d\u044f <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261028\">\u0418\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u0435<br \/>\n\u0443\u0440\u043e\u0432\u043d\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261029\">\u0422\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0439<br \/>\n\u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440 <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261030\"><br \/>\n\u041e\u0431\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u0435 \u0434\u0430\u043d\u043d\u044b\u0445 <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261031\">\u0421\u043f\u0438\u0441\u043e\u043a<br \/>\n\u0442\u0438\u043f\u043e\u0432 \u043b\u0438\u043d\u0438\u0439 <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261032\">\u0412\u043e\u043e\u0431\u0440\u0430\u0436\u0430\u0435\u043c\u043e\u0435<br \/>\n\u043e\u043a\u043e\u0448\u043a\u043e (ZOOM Window) <\/a><\/p>\n<p align=\"JUSTIFY\"><a href=\"#_Toc465261033\">Idle<br \/>\n( \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0432\u0445\u043e\u043b\u043e\u0441\u0442\u0443\u044e) <\/a><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0435 LISP \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u044b \u0438\u043b\u043b\u044e\u0441\u0442\u0440\u0438\u0440\u0443\u044e\u0442 \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u0438 , \u043e\u043f\u0438\u0441\u0430\u043d\u043d\u044b\u0435 \u0432 \u044d\u0442\u043e\u0439 \u0433\u043b\u0430\u0432\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172782\"><\/a><a name=\"_Ref465174274\"><\/a><a name=\"_Toc465261026\"><\/a><span style=\"font-family: Arial\">\u0423\u0434\u0430\u043b\u0435\u043d\u0438\u0435<br \/>\n\u0443\u0440\u043e\u0432\u043d\u044f<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u043a\u043e\u043c\u0430\u043d\u0434\u0443 DELLAYER , \u0447\u0442\u043e\u0431\u044b \u0443\u0434\u0430\u043b\u0438\u0442\u044c \u0432\u0441\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u043e\u0433\u043e \u0443\u0440\u043e\u0432\u043d\u044f.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0423\u0434\u0430\u043b\u0435\u043d\u0438\u0435 \u0432\u0441\u0435\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u043d\u0430 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u043d\u043e\u043c \u0443\u0440\u043e\u0432\u043d\u0435<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(defun C : DELLAYER (\/ e l)<\/p>\n<p align=\"JUSTIFY\">(setq l (strcase (getstring &#171;\\nLayer to delete?&#187;)))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0417\u0430\u043f\u0443\u0441\u043a \u0447\u0435\u0440\u0447\u0435\u043d\u0438\u044f \u0441\u043a\u0430\u043d\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435\u043c \u043f\u0435\u0440\u0432\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq e (entnext))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u0440\u043e\u0432\u0435\u0440\u043a\u0430 \u0443\u0440\u043e\u0432\u043d\u0435\u0439 \u044d\u0442\u0438\u0445 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 (8 \u0433\u0440\u0443\u043f\u043f)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(while e<\/p>\n<p align=\"JUSTIFY\">(if (= l (cdr (assoc 8 (entget e))))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041a\u043e\u0440\u0440\u0435\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0443\u0440\u043e\u0432\u043d\u044f&#8230; \u0443\u0434\u0430\u043b\u0435\u043d\u0438\u0435 \u044d\u0442\u043e\u0433\u043e \u0443\u0440\u043e\u0432\u043d\u044f<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(entdel e)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0412\u0437\u044f\u0442\u044c \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq e (entnext e))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041e\u0441\u0442\u0430\u043d\u043e\u0432 \u0434\u043e \u0442\u0435\u0445 \u043f\u043e\u0440 \u043f\u043e\u043a\u0430 \u043d\u0435 \u0431\u0443\u0434\u0435\u0442 \u0431\u043e\u043b\u044c\u0448\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f DELLAYER \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 8 \u0433\u0440\u0443\u043f\u043f ( \u0438\u043c\u044f \u0443\u0440\u043e\u0432\u043d\u044f ) \u043a\u0430\u0436\u0434\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0447\u0435\u0440\u0442\u0435\u0436\u0430, \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u043d\u0430 \u0441\u043f\u0435\u0446\u0438\u0444\u0438\u0446\u0438\u0440\u0443\u0435\u043c\u043e\u043c \u0443\u0440\u043e\u0432\u043d\u0435. \u0422\u0435\u0441\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435\u043c \u0434\u0440\u0443\u0433\u0438\u0445 \u0433\u0440\u0443\u043f\u043f \u0432\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u044b\u043f\u043e\u043b\u043d\u0438\u0442\u044c \u043a\u043e\u043c\u0430\u043d\u0434\u044b, \u0447\u0442\u043e\u0431\u044b \u043f\u0440\u043e\u0432\u0435\u0440\u0438\u0442\u044c \u0432\u0441\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u043e\u0441\u043e\u0431\u044b\u0445 \u0442\u0438\u043f\u043e\u0432 ( \u043e\u043a\u0440\u0443\u0436\u043d\u043e\u0441\u0442\u0438, \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c) \u0438\u043b\u0438 \u0432\u0441\u0435 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u043e\u0441\u043e\u0431\u044b\u0445 \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u0438\u0439 \u0438 \u043f\u0440\u043e\u0447\u0435\u0435<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261027\"><\/a><br \/>\n\u0423\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u0435 \u0442\u0435\u043a\u0443\u0449\u0435\u0433\u043e \u0443\u0440\u043e\u0432\u043d\u044f<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u043a\u043e\u043c\u0430\u043d\u0434\u0443 SETLAYER , \u0434\u0430\u0432\u0430\u044f \u0432\u043e\u0437\u043c\u043e\u0436\u043d\u043e\u0441\u0442\u044c \u0438\u0437\u043c\u0435\u043d\u0438\u0442\u044c \u0442\u0435\u043a\u0443\u0449\u0438\u0439 \u0443\u0440\u043e\u0432\u0435\u043d\u044c \u043f\u0440\u043e\u0441\u0442\u043e \u0443\u043a\u0430\u0437\u044b\u0432\u0430\u044f \u043d\u0430 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u043e\u0431\u044a\u0435\u043a\u0442 \u044d\u0442\u0438\u043c \u0443\u0440\u043e\u0432\u043d\u0435\u043c.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0423\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u0442\u0435\u043a\u0443\u0449\u0438\u0439 \u0443\u0440\u043e\u0432\u043d\u044c \u044d\u0442\u043e\u0433\u043e \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u044e\u0449\u0435\u0433\u043e \u043e\u0431\u044a\u0435\u043a\u0442\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(defun C:SETLAYER ( \/ e n) :<\/p>\n<p align=\"JUSTIFY\">(setq e (car (entsel &#171;Pick an object on the desired layer: &#171;)))<\/p>\n<p align=\"JUSTIFY\">(if e ( progn :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0412\u0437\u044f\u0442\u044c \u0432\u0445\u043e\u0434\u043d\u044b\u0435 \u0434\u0430\u043d\u043d\u044b\u0435 \u0433\u0440\u0443\u043f\u043f :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq e (entget e) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0413\u0440\u0443\u043f\u043f\u0430 8 &#8212; \u044d\u0442\u043e \u0438\u043c\u044f \u0443\u0440\u043e\u0432\u043d\u044f :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq n (cdr (assoc 8 e))) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0420\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u044f \u043a\u043e\u043c\u0430\u043d\u0434\u044b &#171;LAYER SET&#187; :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(command &#171;LAYER&#187; &#171;SET&#187; n &#171;&#187;) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">)) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u043f\u043e\u0434\u043e\u0431\u043d\u044b\u0439 \u043f\u043e\u0434\u0445\u043e\u0434 , \u0447\u0442\u043e\u0431\u044b \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u0442\u0435\u043a\u0443\u0449\u0438\u0439 \u0446\u0432\u0435\u0442, \u0442\u0438\u043f \u043b\u0438\u043d\u0438\u0438, \u0432\u043e\u0437\u0432\u044b\u0448\u0435\u043d\u0438\u0435 \u0438\u043b\u0438 \u0442\u043e\u043b\u0449\u0438\u043d\u0443 \u044d\u0442\u0438\u0445 \u0441\u043f\u0435\u0446\u0438\u0444\u0438\u0446\u0438\u0440\u0443\u0435\u043c\u044b\u0445 \u043e\u0431\u044a\u0435\u043a\u0442\u043e\u0432<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261028\"><\/a>\u0418\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u0435<br \/>\n\u0443\u0440\u043e\u0432\u043d\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u043e \u0432\u0430\u0440\u0438\u0430\u0446\u0438\u0438 \u043a\u043e\u043c\u0430\u043d\u0434\u044b SETLAYER , \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u043d\u043e\u0439 \u0432\u044b\u0448\u0435. \u041b\u0443\u0447\u0448\u0435, \u0447\u0435\u043c \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u0435 \u0442\u0435\u043a\u0443\u0449\u0435\u0433\u043e \u0443\u0440\u043e\u0432\u043d\u044f , \u044d\u0442\u0430 \u043a\u043e\u043c\u0430\u043d\u0434\u0430 \u0438\u0437\u043c\u0435\u043d\u044f\u0435\u0442 \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b, \u0434\u043b\u044f \u0442\u043e\u0433\u043e \u0447\u0442\u043e\u0431\u044b \u0438\u043c\u0435\u0442\u044c \u0442\u043e\u0442 \u0436\u0435 \u0441\u0430\u043c\u044b\u0439 \u0443\u0440\u043e\u0432\u0435\u043d\u044c , \u043a\u0430\u043a \u0438 \u0443 \u0434\u0440\u0443\u0433\u043e\u0433\u043e \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u043e\u0433\u043e \u043e\u0431\u044a\u0435\u043a\u0442\u0430.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(defun C:CHGLAYER (\/ ss e n) :<\/p>\n<p align=\"JUSTIFY\">(princ &#171;Select objects to be change &#8230;\\n&#187;) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041e\u0441\u043d\u043e\u0432\u043d\u043e\u0439 \u043d\u0430\u0431\u043e\u0440 \u0432\u044b\u0431\u043e\u0440\u0430 (selection-set) :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq ss(ssget)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">;\u0415\u0441\u043b\u0438 \u043b\u044e\u0431\u044b\u0435 \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u044b\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b&#8230;. :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(if ss (progn :<\/p>\n<p align=\"JUSTIFY\">(setq e (car (entsel &#171;Pick an object on the desired :<\/p>\n<p align=\"JUSTIFY\">layer: &#171;))) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0415\u0441\u043b\u0438 \u043e\u0431\u044a\u0435\u043a\u0442 \u0431\u044b\u043b \u0432\u044b\u0431\u0440\u0430\u043d&#8230; :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(if e (progn :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u0435\u0440\u0435\u0439\u0434\u0438 \u043d\u0430 \u044d\u0442\u0443 \u0433\u0440\u0443\u043f\u043f\u0443 \u0434\u0430\u043d\u043d\u044b\u0445 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq e (entget e)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0413\u0440\u0443\u043f\u043f\u0430 8 &#8212; \u044d\u0442\u043e \u0438\u043c\u044f \u0443\u0440\u043e\u0432\u043d\u044f :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq n (cdr (assoc 8 e))) :<\/p>\n<p align=\"JUSTIFY\">(command &#171;CHANGE&#187; SS &#171;&#187; &#171;PROP&#187; &#171;LAYER&#187; n &#171;&#187;) :<\/p>\n<p align=\"JUSTIFY\">)) :<\/p>\n<p align=\"JUSTIFY\">)) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0412 \u044d\u0442\u043e\u043c \u043f\u0440\u0438\u043c\u0435\u0440\u0435 \u043d\u0430\u0431\u043e\u0440\u044b \u0432\u044b\u0431\u043e\u0440\u0430 ( selection &#8212; set) \u043e\u0431\u044a\u0435\u043a\u0442\u043e\u0432 , \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043c\u043e\u0436\u043d\u043e \u0438\u0437\u043c\u0435\u043d\u0438\u0442\u044c , \u0443\u0441\u0442\u0430\u043d\u0430\u0432\u043b\u0438\u0432\u0430\u044e\u0442\u0441\u044f \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u043c SS. \u041c\u043e\u0436\u043d\u043e \u043f\u0440\u0438\u043c\u0435\u043d\u044f\u0442\u044c \u043e\u0434\u043d\u0430\u0436\u0434\u044b \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043b\u0435\u043d\u043d\u043e\u0435 \u0438\u043c\u044f \u0443\u0440\u043e\u0432\u043d\u044f ( \u0438\u0437 8 \u0433\u0440\u0443\u043f\u043f\u044b \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u043e\u0433\u043e \u043e\u0431\u044a\u0435\u043a\u0442\u0430), \u0432\u044b\u0431\u043e\u0440 \u043d\u0430\u0431\u043e\u0440\u0430 ( selection &#8212; set ) SS \u043f\u0440\u043e\u0445\u043e\u0434\u0438\u0442 \u043a \u043a\u043e\u043c\u0430\u043d\u0434\u0435 &#171;CHANGE Properties&#187;( \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u0435 \u0441\u043e\u0431\u0441\u0442\u0432\u0435\u043d\u043d\u043e\u0441\u0442\u0438) , \u0447\u0442\u043e\u0431\u044b \u0432\u044b\u0437\u0432\u0430\u0442\u044c \u044d\u0444\u0444\u0435\u043a\u0442 \u0436\u0435\u043b\u0430\u0435\u043c\u043e\u0433\u043e \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u044f.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261029\"><\/a>\u0422\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0439<br \/>\n\u0440\u0435\u0434\u0430\u043a\u0442\u043e\u0440<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430, \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d\u043d\u0430\u044f \u043d\u0438\u0436\u0435 , \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u043a\u043e\u043c\u0430\u043d\u0434\u0443 CHGTEXT \u0434\u043b\u044f \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u0433\u043e \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f \u0442\u0435\u043a\u0441\u0442\u043e\u0432. \u041e\u043d\u0430 \u0434\u043e\u043f\u0443\u0441\u043a\u0430\u0435\u0442, \u0447\u0442\u043e \u0432\u044b \u043e\u0431\u043e\u0437\u043d\u0430\u0447\u0430\u0435\u0442\u0435 &#171;new string&#187; (\u043d\u043e\u0432\u0430\u044f \u0441\u0442\u0440\u043e\u043a\u0430), \u0447\u0442\u043e\u0431\u044b \u0435\u044e \u0437\u0430\u043c\u0435\u043d\u0438\u0442\u044c \u0432 \u043a\u0430\u0436\u0434\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 \u0441\u0442\u0430\u0440\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 (&#171;old string&#187;), \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043e\u0431\u043d\u0430\u0440\u0443\u0436\u0435\u043d\u0430 \u0432 \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u043e\u043c \u0442\u0435\u043a\u0441\u0442\u0435. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u043b\u0435\u0433\u043a\u043e \u0440\u0430\u0441\u0448\u0438\u0440\u044f\u0442\u044c \u044d\u0442\u043e , \u0447\u0442\u043e\u0431\u044b \u043b\u044e\u0431\u043e\u0439 \u0442\u0435\u043a\u0441\u0442 \u043f\u043e \u0432\u0430\u0448\u0435\u043c\u0443 \u0436\u0435\u043b\u0430\u043d\u0438\u044e \u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u043e\u0432\u0430\u043b\u0441\u044f .<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0418\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u0435 \u043f\u043e\u0434\u0441\u0442\u0440\u043e\u043a\u0438 \u0432 \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u043e\u043c \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u043e\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0435<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(defun C:CHGTEXT (\/ p l n e os as ns s nsl osl sl si chf chm)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq p (ssget)) ; \u0412\u044b\u0431\u0435\u0440\u0438\u0442\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b<\/p>\n<p align=\"JUSTIFY\">(if p (progn ; \u0415\u0441\u043b\u0438 \u043b\u044e\u0431\u044b\u0435 \u043e\u0431\u044a\u0435\u043a\u0442\u044b \u0432\u044b\u0431\u0440\u0430\u043d\u044b&#8230;<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq osl (strlen (setq os (getstring &#171;\\nOld string: &#171;t))))<\/p>\n<p align=\"JUSTIFY\">(setq nsl (strlen (setq ns (getstring &#171;\\nNew string: &#171;t))))<\/p>\n<p align=\"JUSTIFY\">(setq l 0 chm 0 n (sslength p))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(while (&lt; l n) ; \u0414\u043b\u044f \u043a\u0430\u0436\u0434\u043e\u0433\u043e \u0432\u044b\u0431\u0440\u0430\u043d\u043d\u043e\u0433\u043e \u043e\u0431\u044a\u0435\u043a\u0442\u0430&#8230;<\/p>\n<p align=\"JUSTIFY\">(if (= &#171;TEXT&#187; ; \u0421\u043c\u043e\u0442\u0440\u0438 \u0442\u0438\u043f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0422\u0415\u041a\u0421\u0422 (\u0433\u0440\u0443\u043f\u043f\u0430 0)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(cdr (assoc 0 (setq e (entget (ssname p l))))))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(progn ; \u041e\u0431\u043d\u0430\u0440\u0443\u0436\u0435\u043d \u043e\u0434\u0438\u043d&#8230; \u0441\u043c\u043e\u0442\u0440\u0438 \u0441\u0442\u0430\u0440\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq chf nil si 1)<\/p>\n<p align=\"JUSTIFY\">(setq s (cdr (setq as (assoc 1 e))))<\/p>\n<p align=\"JUSTIFY\">(while (= osl (setq sl (strlen<\/p>\n<p align=\"JUSTIFY\">(setq st (substr s si osl)))))<\/p>\n<p align=\"JUSTIFY\">(if (= st os) (progn<\/p>\n<p align=\"JUSTIFY\">(setq s (strcat (substr s 1 (1 si)) ns<\/p>\n<p align=\"JUSTIFY\">(substr s (+ si ost))))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq chf t) ; \u041e\u0431\u043d\u0430\u0440\u0443\u0436\u0435\u043d\u0430 \u0441\u0442\u0430\u0440\u0430\u044f \u0441\u0442\u0440\u043e\u043a\u0430<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">))<\/p>\n<p align=\"JUSTIFY\">(setq si (1+ si))<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(if chf (progn ; \u0417\u0430\u043c\u0435\u043d\u0438\u0442\u0435\u043b\u044c \u043d\u043e\u0432\u043e\u0439 \u0441\u0442\u0440\u043e\u043a\u0438 \u043d\u0430 \u0441\u0442\u0430\u0440\u0443\u044e<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq e (subst (cons 1 s) as e))<\/p>\n<p align=\"JUSTIFY\">(entmod e) ;<span style=\"font-family: Times New Roman\"> \u0422\u0435\u043a\u0441\u0442\u043e\u0432\u044b\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432<\/span><\/p>\n<p align=\"JUSTIFY\">(setq chm (1+ chm))<\/p>\n<p align=\"JUSTIFY\">))<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">(setq l (1+ l))<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(princ &#171;Changed&#187;) ; \u041f\u0435\u0447\u0430\u0442\u044c \u043f\u043e\u043b\u043d\u043e\u0441\u0442\u044c\u044e \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u043d\u044b\u0445 \u043b\u0438\u043d\u0438\u0439<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(princ chm)<\/p>\n<p align=\"JUSTIFY\">(princ &#187; text lines.&#187;)<\/p>\n<p align=\"JUSTIFY\">(terpri)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0417\u0434\u0435\u0441\u044c, \u043d\u0430\u0431\u043e\u0440 \u0432\u044b\u0431\u043e\u0440\u0430 \u0420 (sel\u0435\u0441tion -set P) \u0438\u0441\u0441\u043b\u0435\u0434\u0443\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432 \u0442\u0435\u043a\u0441\u0442\u0430 , \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0449\u0438\u0445 \u0432 \u0441\u0435\u0431\u0435 \u0441\u043f\u0435\u0446\u0438\u0444\u0438\u0446\u0438\u0440\u0443\u0435\u043c\u0443\u044e \u0441\u0442\u0430\u0440\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443( &#171;old string&#187;). \u0414\u043b\u044f \u043a\u0430\u0436\u0434\u043e\u0433\u043e \u043f\u043e\u0434\u043e\u0431\u0440\u0430\u043d\u043d\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0442\u0435\u043a\u0441\u0442\u0430, \u0444\u0443\u043d\u043a\u0446\u0438\u0438 STRCAT \u0438 SUBSTR \u043e\u0431\u044b\u0447\u043d\u043e \u0444\u043e\u0440\u043c\u0438\u0440\u0443\u044e\u0442 \u043d\u043e\u0432\u0443\u044e \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0432\u043e \u0432\u0441\u0435\u0445 \u0441\u043b\u0443\u0447\u0430\u044f\u0445 \u0437\u0430\u043c\u0435\u043d\u044f\u0435\u0442 \u0441\u0442\u0430\u0440\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 (old string) \u043d\u0430 \u043d\u043e\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443 ( new string). \u0418\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044f SUBST, \u0432\u044b \u043f\u043e\u0441\u0442\u0440\u043e\u0438\u0442\u0435 \u043d\u043e\u0432\u0443\u044e \u0441\u0442\u0440\u043e\u043a\u0443, \u0437\u0430\u043c\u0435\u043d\u044f\u044e\u0449\u0443\u044e \u0433\u0440\u0443\u043f\u043f\u0443 1 \u0432 \u0442\u0435\u043a\u0441\u0442\u043e\u0432\u043e\u043c \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0435, \u0438 \u0437\u0430\u0442\u0435\u043c \u043e\u0431\u044b\u0447\u043d\u043e ENTMOD \u043e\u0442\u043a\u043e\u0440\u0440\u0435\u043a\u0442\u0438\u0440\u0443\u0435\u0442 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432 \u0432 \u0431\u0430\u0437\u0435 \u0434\u0430\u043d\u043d\u044b\u0445 \u0447\u0435\u0440\u0442\u0435\u0436\u0430 \u0438 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261030\"><\/a>\u041e\u0431\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u0435<br \/>\n\u0434\u0430\u043d\u043d\u044b\u0445<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0421\u0447\u0438\u0442\u0430\u0439\u0442\u0435, \u043f\u043e \u0441\u043e\u0433\u043b\u0430\u0448\u0435\u043d\u0438\u044e ,\u0447\u0442\u043e \u0432\u044b \u0432\u0441\u0442\u0430\u0432\u043b\u044f\u0435\u0442\u0435 \u0431\u043b\u043e\u043a, \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u044b\u0439 &#171;TITLE&#187;, \u0432 \u043a\u0430\u0436\u0434\u044b\u0439 \u0447\u0435\u0440\u0442\u0435\u0436 \u0438 , \u0447\u0442\u043e \u044d\u0442\u043e\u0442 \u0431\u043b\u043e\u043a \u0438\u043c\u0435\u0435\u0442 \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u044b , \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u044b\u0435 &#171;REVDATE&#187;, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u043e\u0437\u043d\u0430\u0447\u0430\u044e\u0442 \u0434\u0430\u043d\u043d\u044b\u0435 \u043f\u043e\u0441\u043b\u0435\u0434\u043d\u0435\u0439 \u0440\u0435\u0432\u0438\u0437\u0438\u0438. \u0421\u043b\u0435\u0434\u0443\u044e\u0449\u0430\u044f \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u043a\u043e\u043c\u0430\u043d\u0434\u0443 REVISE, \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043e\u0431\u043d\u0430\u0440\u0443\u0436\u0438\u0432\u0430\u0435\u0442 \u044d\u0442\u043e\u0442 \u0431\u043b\u043e\u043a \u0438 \u043a\u043e\u0440\u0440\u0435\u043a\u0442\u0438\u0440\u0443\u0435\u0442 \u0435\u0433\u043e \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u044b. \u0421\u043d\u0430\u0447\u0430\u043b\u0430 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442\u0441\u044f \u043f\u0430\u0440\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u043e\u043d\u0430\u043b\u044c\u043d\u044b\u0445 \u0443\u0442\u0438\u043b\u0438\u0442.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0412\u0432\u043e\u0434 \u0442\u0435\u043a\u0443\u0449\u0438\u0445 \u0434\u0430\u043d\u043d\u044b\u0445 \u0432 \u0444\u043e\u0440\u043c\u0430\u0442\u0435 MM\/DD\/YY<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(defun mmddyy (\/ x)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq x (getvar &#171;CDATE&#187;)) ; \u0422\u0435\u043a\u0443\u0449\u0438\u0435 \u0434\u0430\u043d\u043d\u044b\u0435<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(set<span style=\"font-family: Times New Roman\">q x (rtos x 2 0)) ; \u041e\u0431\u0440\u0430\u0449\u0435\u043d\u0438\u0435 \u043a \u0441\u0442\u0440\u043e\u043a\u0435<\/span><\/p>\n<p align=\"JUSTIFY\">(setq date (strcat (substr x 5 2) &#171;\/&#187; ;MM<\/p>\n<p align=\"JUSTIFY\">(substr x 7 2) &#171;\/&#187; ;DD<\/p>\n<p align=\"JUSTIFY\">(substr x 3 2))) ;YY<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0412\u043e\u0437\u0432\u0440\u0430\u0442 \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u043d\u0438\u044f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u043f\u043e\u043b\u044f &#171;num&#187;<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(defun fld (num)<\/p>\n<p align=\"JUSTIFY\">(cdr (assoc num d))<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u043e\u0438\u0441\u043a \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 REVDATE \u0432 \u0431\u043b\u043e\u043a\u0435 TITLE \u0438 \u043e\u0431\u043d\u043e\u0432\u043b\u0435\u043d\u0438\u0435<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\">(defun C:REVISE (\/ e d date done)<\/p>\n<p align=\"JUSTIFY\">(setq done nil)<\/p>\n<p align=\"JUSTIFY\">(setq e (entnext) <span style=\"font-family: Times New Roman\">; \u041f\u0435\u0440\u0432\u044b\u0439 \u043e\u0431\u044a\u0435\u043a\u0442 \u0432 \u0447\u0435\u0440\u0442\u0435\u0436\u0435<\/span><\/p>\n<p align=\"JUSTIFY\">(while e<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq d (entget e) ; \u041f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u0435 \u0433\u0440\u0443\u043f\u043f \u0434\u0430\u043d\u043d\u044b\u0445<\/p>\n<p align=\"JUSTIFY\">; \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(if (and (= (fld 0) &#171;INSERT&#187;) ; \u0418\u043c\u0435\u0435\u0442\u0441\u044f \u043b\u0438 INSERT ?<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(= (<span style=\"font-family: Times New Roman\">fld 2) &#171;TITLE&#187;) ; &#8230; \u0438\u043c\u044f TITLE?<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(= (fld 66) 1)) ; &#8230; \u0410\u0422\u0422\u0420\u0418\u0431\u0423\u0422\u042b?<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(progn<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq e (entnext e)) ; \u041f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u0435 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430<\/p>\n<p align=\"JUSTIFY\">(\u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u0430)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(while e<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq d (entget e)) ; \u041f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u0435 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u043e\u0432<\/p>\n<p align=\"JUSTIFY\">; \u0433\u0440\u0443\u043f\u043f \u0434\u0430\u043d\u043d\u044b\u0445<\/p>\n<p align=\"JUSTIFY\">(cond ((and (= (fld 0) &#171;ATTRIB&#187;) ; \u0418\u0441\u043a\u0430\u0442\u044c<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(= (fld 2) &#171;REVDAT<span style=\"font-family: Times New Roman\">E&#187;)) ; \u0410\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u044b<\/span><\/p>\n<p align=\"JUSTIFY\">; REVDATE<\/p>\n<p align=\"JUSTIFY\">(mmddyy)<\/p>\n<p align=\"JUSTIFY\">(setq d (subst (cons 1 date) (assoc 1 d))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041d\u043e\u0432\u044b\u0435 \u0434\u0430\u043d\u043d\u044b\u0435<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> (entmod d) ; \u0418\u0437\u043c\u0435\u043d\u0435\u043d\u0438\u0435 \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">; \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0445<\/p>\n<p align=\"JUSTIFY\">(entupd e) ; \u0420\u0435\u0433\u0435\u043d\u0435\u0440\u0430\u0446\u0438\u044f \u0431\u043b\u043e\u043a\u0430<\/p>\n<p align=\"JUSTIFY\">(setq e nil done T)) ; \u0411\u044b\u043b\u0438 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u044b<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">((= (fld 0) &#171;ENDSEQ&#187;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq e nil)) ; \u041d\u0435\u0442 \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 REVDATE;<\/p>\n<p align=\"JUSTIFY\">; \u043e\u0441\u0442\u0430\u043d\u043e\u0432 \u0441\u043a\u0430\u043d\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u044f<\/p>\n<p align=\"JUSTIFY\">(T (setq e (entnext e))) ; \u0412\u0432\u043e\u0434 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0433\u043e<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> ; \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430<\/span><\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq e (entnext e)) ;\u041d\u0435\u0442 \u0431\u043b\u043e\u043a\u0430 TITLE, \u0432\u0445\u043e\u0434<\/p>\n<p align=\"JUSTIFY\">; \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0435\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">(if done &#171;Revision date updated&#187; &#171;No REVDATE attribute found&#187;)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041a\u043e\u043c\u0430\u043d\u0434\u0430 REVISE \u043f\u0440\u043e\u0432\u0435\u0440\u044f\u0435\u0442 \u0433\u0440\u0443\u043f\u043f\u0443 0 ( \u0442\u0438\u043f \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430) \u043a\u0430\u0436\u0434\u043e\u0433\u043e \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 \u0432 \u0447\u0435\u0440\u0442\u0435\u0436\u0435 , \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u044f \u0443\u043f\u043e\u043c\u0438\u043d\u0430\u0435\u043c\u044b\u0439 \u0431\u043b\u043e\u043a ( \u0444\u0443\u043d\u043a\u0446\u0438\u044f INSERT), \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u043d\u0430\u0437\u0432\u0430\u043d &#187; TITLE&#187;. \u0417\u0430\u0442\u0435\u043c \u043e\u043d\u0430 \u0441\u043a\u0430\u043d\u0438\u0440\u0443\u0435\u0442 \u043f\u043e\u0434\u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u044d\u0442\u043e\u0433\u043e \u0431\u043b\u043e\u043a\u0430 (\u0435\u0433\u043e \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u044b), \u043f\u0440\u043e\u0441\u043c\u0430\u0442\u0440\u0438\u0432\u0430\u044f \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u044b &#171;REVDATE&#187;. \u041e\u0431\u043d\u0430\u0440\u0443\u0436\u0435\u043d\u043d\u0430\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f \u0430\u0442\u0442\u0440\u0438\u0431\u0443\u0442\u043e\u0432 \u0438\u0437\u043c\u0435\u043d\u0438\u0442\u0441\u044f \u0438 \u0431\u043b\u043e\u043a \u0432\u0432\u0435\u0434\u0435\u0442\u0441\u044f.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261031\"><\/a><br \/>\n\u0421\u043f\u0438\u0441\u043e\u043a \u0442\u0438\u043f\u043e\u0432 \u043b\u0438\u043d\u0438\u0439<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u043e\u0442 \u043f\u0440\u0438\u043c\u0435\u0440 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0434\u043e\u0441\u0442\u0443\u043f\u0430 \u043a \u0442\u0430\u0431\u043b\u0438\u0446\u0435 \u0441\u0438\u043c\u0432\u043e\u043b\u043e\u0432, \u0447\u0442\u043e\u0431\u044b \u0432\u043d\u0435\u0441\u0442\u0438 \u0432 \u0441\u043f\u0438\u0441\u043e\u043a \u0438\u043c\u0435\u043d\u0430 \u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u044f \u0432\u0441\u0435\u0445 \u0442\u0435\u043a\u0443\u0449\u0435-\u0437\u0430\u0433\u0440\u0443\u0436\u0435\u043d\u043d\u044b\u0445 \u0442\u0438\u043f\u043e\u0432 \u043b\u0438\u043d\u0438\u0439.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">: :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u0443\u0441\u0442\u0430\u044f-\u043f\u043e\u043b\u043d\u0430\u044f \u0434\u0430\u043d\u043d\u0430\u044f \u0441\u0442\u0440\u043e\u043a\u0430 ,\u043a\u043e\u0442\u043e\u0440\u0430\u044f \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u0442 \u043a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u043e \u0437\u043d\u0430\u043a\u043e\u0432. :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(defun strfill (s len) :<\/p>\n<p align=\"JUSTIFY\">(substr (strcat s &#187; &#171;) 1 len) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0412\u043e\u0437\u0432\u0440\u0430\u0442 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 , \u0441\u0432\u044f\u0437\u0430\u043d\u043d\u043e\u0439 \u0441 \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u043e\u0439 \u0433\u0440\u0443\u043f\u043f\u043e\u0439 \u043f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(defun fld (num lst) :<\/p>\n<p align=\"JUSTIFY\">(cdr (assoc num lst)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> ; \u0421\u043f\u0438\u0441\u043e\u043a \u0437\u0430\u0433\u0440\u0443\u0436\u0435\u043d\u043d\u044b\u0445 \u0442\u0438\u043f\u043e\u0432 \u043b\u0438\u043d\u0438\u0439 <\/span> :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(defun C:LTYPES (\/ a cl d f lt s x) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(textscr) ; \u0412\u044b\u0432\u043e\u0434 \u0442\u0435\u043a\u0441\u0442\u0430 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(write line &#187; Linetype Align Segs Description&#187;) :<\/p>\n<p align=\"JUSTIFY\">(terpri) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq cl (getvar &#171;CELTYPE&#187;) f &#187; &#171;) ; \u0422\u0435\u043a\u0443\u0449\u0438\u0439 \u0442\u0438\u043f \u043b\u0438\u043d\u0438\u0438, :<\/p>\n<p align=\"JUSTIFY\">; &#171;\u0440\u0435\u0433\u0438\u0441\u0442\u0440&#187; \u0444\u043b\u0430\u0436\u043a\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0415\u0441\u043b\u0438 \u0442\u0435\u043a\u0443\u0449\u0438\u0439 \u0442\u0438\u043f \u043b\u0438\u043d\u0438\u0438 &#171;BYLAYER&#187;, \u0441\u043f\u0440\u0430\u0432\u044c\u0441\u044f \u043e \u0442\u0435\u043a\u0443\u0449\u0435\u043c \u0443\u0440\u043e\u0432\u043d\u0435 :<\/p>\n<p align=\"JUSTIFY\">; \u041f\u0440\u043e\u0432\u0435\u0441\u0442\u0438 \u043b\u0438\u043d\u0438\u044e \u0438 \u0438\u0437\u043c\u0435\u043d\u0438\u0442\u044c &#171;\u0440\u0435\u0433\u0438\u0441\u0442\u0440&#187; \u0444\u043b\u0430\u0436\u043a\u0430 \u0441&#187;&#187; \u043d\u0430 &#171;L&#187; :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(setq cl :<\/p>\n<p align=\"JUSTIFY\">(cond ((= cl &#171;BYBLOCK&#187;) &#171;&#187;) :<\/p>\n<p align=\"JUSTIFY\">((= cl &#171;BYLAYER&#187;) (setq f &#171;L &#171;) :<\/p>\n<p align=\"JUSTIFY\">(fld 6 (tblsearch &#171;LAYER&#187; (getvar &#171;CLAYER&#187;)))) :<\/p>\n<p align=\"JUSTIFY\">(T cl) :<\/p>\n<p align=\"JUSTIFY\">)) :<\/p>\n<p align=\"JUSTIFY\">(setq x (tblnext &#171;LTYPE&#187; T)) <span style=\"font-family: Times New Roman\"> ; \u041f\u0435\u0440\u0432\u044b\u0439 \u0442\u0438\u043f \u043b\u0438\u043d\u0438\u0438 :<\/span><\/p>\n<p align=\"JUSTIFY\">(while x :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq lt (fld 2 x) ; \u0418\u043c\u044f \u0442\u0438\u043f\u0430 \u043b\u0438\u043d\u0438\u0438 :<\/p>\n<p align=\"JUSTIFY\">d (fld 3 x) ; \u041f\u0440\u043e\u0441\u0442\u043e\u0435 \u043e\u043f\u0438\u0441\u0430\u043d\u0438\u0435 \u0442\u0438\u043f\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> ; \u043b\u0438\u043d\u0438\u0438 :<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">a (fld 72 x) ; \u0412\u044b\u0440\u0430\u0432\u043d\u0435\u043d\u043d\u044b\u0439 \u043a\u043e\u0434 :<\/p>\n<p align=\"JUSTIFY\">s (fld 73 x) ; \u0414\u043b\u0438\u043d\u0430 \u043a\u0430\u0436\u0434\u043e\u0433\u043e \u0448\u0442\u0440\u0438\u0445\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">(write line :<\/p>\n<p align=\"JUSTIFY\">(strcat :<\/p>\n<p align=\"JUSTIFY\">(if (=lt cl) f &#187; &#171;) <span style=\"font-family: Times New Roman\"> ; \u0420\u0435\u0433\u0438\u0441\u0442\u0440 \u0444\u043b\u0430\u0436\u043a\u0430 \u043f\u0440\u0438\u043c\u0438- :<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">; \u0442\u0438\u0432\u0430 \u043b\u0438\u043d\u0438\u0438 :<\/p>\n<p align=\"JUSTIFY\">(strfill lt 12) ; \u0420\u0435\u0434\u0430\u043a\u0442\u043e\u0440 \u0438\u043c\u0435\u043d\u0438 :<\/p>\n<p align=\"JUSTIFY\">; \u0443\u0440\u043e\u0432\u043d\u044f :<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(s<span style=\"font-family: Times New Roman\">trfill (chr a) 7) ; \u0412\u044b\u0440\u0430\u0432\u043d\u0435\u043d\u043d\u044b\u0439 \u043a\u043e\u0434 :<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(strfill (itoa s) 6) ; \u0414\u043b\u0438\u043d\u0430 \u0447\u0435\u0440\u0442\u043e\u0447\u043a\u0438 :<\/p>\n<p align=\"JUSTIFY\">; \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u043e\u0432 :<\/p>\n<p align=\"JUSTIFY\">(substr d 1 30) ; \u041e\u043f\u0438\u0441\u0430\u043d\u0438\u0435 \u0442\u0438\u043f\u0430 \u043b\u0438\u043d\u0438\u0438 :<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">)) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(if (&gt; s 0) (progn ; \u0415\u0441\u043b\u0438 \u043b\u044e\u0431\u043e\u0439 \u043e\u0442\u0434\u0435\u043b\u044c\u043d\u044b\u0439 :<\/p>\n<p align=\"JUSTIFY\">;\u044d\u043b\u0435\u043c\u0435\u043d\u0442,\u0440\u0435\u0434\u0430\u043a\u0442\u0438\u0440\u0443\u0439\u0442\u0435 \u0435\u0433\u043e :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq x (member<span style=\"font-family: Times New Roman\"> (assoc 49 x) x)) ; \u0412\u0432\u0435\u0434\u0438\u0442\u0435 \u0441\u043f\u0438\u0441\u043e\u043a \u043a\u0430\u0436\u0434\u043e\u0433\u043e :<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">; \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(while x :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq s (cdar x)) ; \u0412\u0432\u0435\u0434\u0438\u0442\u0435 \u0434\u043b\u0438\u043d\u0443 \u0448\u0442\u0440\u0438\u0445\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(write line :<\/p>\n<p align=\"JUSTIFY\">(strcat :<\/p>\n<p align=\"JUSTIFY\">(strfill &#187; &#187; 27) :<\/p>\n<p align=\"JUSTIFY\">(cond ((= s 0) &#171;Dot&#187;) :<\/p>\n<p align=\"JUSTIFY\">((&gt; s 0) (strcat &#171;Pen down&#187; (rtos s 2 4))) ;<\/p>\n<p align=\"JUSTIFY\">(T (strcat &#171;Pen up&#187; (rtos (abs s) 2:<\/p>\n<p align=\"JUSTIFY\">4))) :<\/p>\n<p align=\"JUSTIFY\">))) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq x (cdr x)) ; \u0412\u0432\u0435\u0434\u0438\u0442\u0435 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 :<\/p>\n<p align=\"JUSTIFY\">; \u044d\u043b\u0435\u043c\u0435\u043d\u0442 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">))) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq x (tblnext &#171;LTYPE&#187;)) ; \u0412\u0432\u0435\u0434\u0438\u0442\u0435 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 :<\/p>\n<p align=\"JUSTIFY\">; \u0442\u0438\u043f \u043b\u0438\u043d\u0438\u0438 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">(terpri) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465261032\"><\/a>\u0412\u043e\u043e\u0431\u0440\u0430\u0436\u0430\u0435\u043c\u043e\u0435<br \/>\n\u043e\u043a\u043e\u0448\u043a\u043e (ZOOM Window)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u042d\u0442\u0430 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u0435\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043c\u0435\u0445\u0430\u043d\u0438\u0437\u043c\u0430 \u0434\u043e\u0441\u0442\u0443\u043f\u0430, \u043a\u043e\u0442\u043e\u0440\u044b\u0439 \u0432\u044b\u043f\u043e\u043b\u043d\u044f\u0435\u0442 \u0444\u0430\u043d\u0442\u0430\u0437\u0438\u044e ZOOM Window ( \u043c\u0430\u0441\u0448\u0442\u0430\u0431 \u0432 \u043e\u043a\u043e\u0448\u043a\u0435), \u043f\u043e\u0437\u0432\u043e\u043b\u044f\u044e\u0449\u0443\u044e \u0432\u0430\u043c \u0443\u0441\u0442\u0430\u043d\u043e\u0432\u0438\u0442\u044c \u0442\u0440\u0438\u0433\u0433\u0435\u0440 \u043c\u0435\u0436\u0434\u0443 \u043f\u0435\u0440\u0435\u043c\u0435\u0449\u0435\u043d\u043d\u044b\u043c \u0438 \u0438\u0437\u043c\u0435\u043d\u0435\u043d\u043d\u044b\u043c \u0440\u0430\u0437\u043c\u0435\u0440\u043e\u043c \u0432 \u0431\u043e\u043a\u0441\u0435.:<\/p>\n<p align=\"JUSTIFY\">ZOOM Window \u043f\u043e\u0434\u043e\u0431\u0435\u043d ZOOM Dynamic, \u0438\u0441\u043a\u043b\u044e\u0447\u0430\u0435\u0442 \u0432\u044b\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u0435 \u043d\u0430 \u0442\u0435\u043a\u0443\u0449\u0435\u043c \u0434\u0438\u0441\u043f\u043b\u0435\u0435 \u0431\u0435\u0437 \u0440\u0443\u0447\u043d\u043e\u0439 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u044b , \u043a\u0440\u043e\u043c\u0435 \u043a\u043b\u0430\u0432\u0438\u0448 \u043f\u0440\u043e\u0431\u0435\u043b , \u0432\u043e\u0437\u0432\u0440\u0430\u0442 \u0438 \u043a\u043b\u0430\u0432\u0438\u0448\u0438 \u0441\u043e \u0441\u0442\u0440\u0435\u043b\u043a\u043e\u0439.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun drawbox () ; \u0412\u044b\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u0435 \u0431\u043e\u043a\u0441\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(grdraw ll ul 1) (grdraw ul ur 1) :<\/p>\n<p align=\"JUSTIFY\">(grdraw ur lr 1) (grdraw lr ll 1) :<\/p>\n<p align=\"JUSTIFY\">(if (= mode 0) (cenx) (arrow) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun cenx () ; \u041e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u0446\u0435\u043d\u0442\u0440\u0430 \u0425:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(grdraw x1 x2 1) (grdraw x3 x4 1) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun arrow () ; \u0412\u044b\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u0435 \u0441\u0442\u0440\u0435\u043b\u043e\u043a:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(grdraw a1 a4 1) (grdraw a2 a4 1) (grdraw a3 a4 1) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun newbox () ; \u041f\u0435\u0440\u0435\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0438\u0435 \u043f\u0430- :<\/p>\n<p align=\"JUSTIFY\">; \u0440\u0430\u043c\u0435\u0442\u0440\u043e\u0432 \u0431\u043e\u043a\u0441\u0430 &amp; :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">; draw :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq deltay (* deltax aspect)) ; \u0414\u043e\u043f\u0443\u0441\u043a\u0430\u0435\u0442 , \u0447\u0442\u043e del- :<\/p>\n<p align=\"JUSTIFY\">; tax &amp; \u0431\u044b\u043b \u0446\u0435\u043d\u0442\u0440 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u0435\u0440\u0435\u0443\u0441\u0442\u0430\u043d\u043e\u0432\u043a\u0430 \u0432 \u0431\u043e\u043b\u0435\u0435 \u0432\u044b\u0441\u043e\u043a\u0438\u0439 \u0443\u0440\u043e\u0432\u0435\u043d\u044c :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq xcen (car center) ycen (cadr center)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u043e\u043d\u0438\u0436\u0435\u043d\u0438\u0435\/\u043f\u043e\u0432\u044b\u0448\u0435\u043d\u0438\u0435 X\/Y \u0434\u043b\u044f \u0431\u043e\u043a\u0441\u0430 : :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq lx (- xcen deltax) ux (+ xcen deltax)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(setq ly (- ycen deltay) uy (+ ycen deltay)) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq ll (list lx ly) ul (list lx ly)) ; \u0423\u0433\u043b\u044b \u0431\u043e\u043a\u0441\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq ur (list ux uy) lr (list ux ly)) : :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u043e\u0432\u044b\u0448\u0435\u043d\u0438\u0435\/\u043f\u043e\u043d\u0438\u0436\u0435\u043d\u0438\u0435 Y \u043f\u0435\u0440\u0435\u043a\u0440\u0435\u0441\u0442\u0438\u044f &amp; \u0441\u0442\u0440\u0435\u043b\u043a\u0438 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq yp (+ ycen arm) ym (- ycen arm)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> ; \u041b\u0435\u0432\u044b\u0439 \u043d\u0430\u043a\u043b\u043e\u043d \u0441\u0442\u0440\u0435\u043b\u043a\u0438 <\/span> :<\/p>\n<p align=\"JUSTIFY\">(setq al (list (- ux arm) yp) a2 (list (-ux arm) ym)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq a3 (list (- ux arm arm) ycen)) ; \u0425\u0432\u043e\u0441\u0442 \u0441\u0442\u0440\u0435\u043b\u043a\u0438 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u0440\u0430\u0432\u044b\u0439 \u043a\u043e\u043d\u0435\u0446 \u0432\u0441\u0435\u0445 \u0442\u0440\u0435\u0445 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq a4 (list ux ycen)) :<\/p>\n<p align=\"JUSTIFY\">(setq x1 (list (- xcen arm) ym) x2 (list (+ xcen arm) yp)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041a\u043e\u043d\u0446\u044b \u043f\u043e X :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq x3 (list (- xcen arm) yp) x4 (list (+ xcen arm) ym)) :<\/p>\n<p align=\"JUSTIFY\">(drawbox) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(defun C:ZW (\/ arm aspect center deltax inp loop mode prev :<\/p>\n<p align=\"JUSTIFY\">pt sourse) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> ; \u0417\u0430\u043f\u0443\u0441\u043a \u043d\u0430 \u0446\u0435\u043d\u0442\u0440 \u044d\u043a\u0440\u0430\u043d\u0430 :<\/span><\/p>\n<p align=\"JUSTIFY\">(setq center (getvar &#171;VIEWCTR&#187;)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> ; \u041f\u043e\u043f\u044b\u0442\u043a\u0430 \u043f\u0435\u0440\u0435\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u043a\u0443\u0440\u0441\u043e\u0440 \u0441 \u0446\u0435\u043d\u0442\u0440\u0430<\/span> :<\/p>\n<p align=\"JUSTIFY\">(setvar &#171;LASTPOINT&#187; (setq prev center)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">(setq aspect (\/ (cadr (aetq aspect (getvar &#171;SCREENSIZE&#187;))) :<\/p>\n<p align=\"JUSTIFY\">(car aspect))) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 1\/4 \u0431\u043e\u043a\u0441\u0430 \u044d\u043a\u0440\u0430\u043d\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq deltax (* 0.25 (getvar &#171;VIEWSIZE&#187;))) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u0435\u0440\u0432\u043e\u043d\u0430\u0447\u0430\u043b\u044c\u043d\u044b\u0439 \u0440\u0435\u0436\u0438\u043c \u0434\u0432\u0438\u0436\u0435\u043d\u0438\u044f \u0432 \u0431\u043e\u043a\u0441\u0435 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq arm (* 0.1 deltax) mode 0 loop T) :<\/p>\n<p align=\"JUSTIFY\">(newbox) :<\/p>\n<p align=\"JUSTIFY\">(while loop :<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> (setq inp grread T)) ; \u0412\u044b\u0445\u043e\u0434 \u043f\u0440\u043e\u0441\u043b\u0435\u0436\u0435\u043d\u043d\u044b\u0439 :<\/span><\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0418\u0437\u043e\u043b\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0438\u0441\u0442\u043e\u0447\u043d\u0438\u043a\u0430 \u0438 # \u0438\u043b\u0438 \u0442\u043e\u0447\u043a\u0438 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq source (car inp) pt (cadr inp)) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(cond ((= source 3) ; &#171;Pick&#187;(\u0432\u044b\u0431\u0440\u0430\u0442\u044c) \u043a\u043b\u0430\u0432\u0438\u0448\u0435\u0439? :<\/p>\n<p align=\"JUSTIFY\">(cenx) (arrow) ; \u0423\u043d\u0438\u0447\u0442\u043e\u0436\u0438\u0442\u044c \u0425 &amp; \u043d\u0430\u0447\u0435\u0440\u0442\u0438\u0442\u044c :<\/p>\n<p align=\"JUSTIFY\">; \u0438\u043b\u0438 \u0434\u0435\u0444\u0435\u043a\u0442\u044b \u043c\u043d\u043e\u0433\u043e\u0447\u0438\u0441\u043b\u0435\u043d\u043d\u044b :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0422\u0440\u0438\u0433\u0433\u0435\u0440 \u0432 \u0440\u0435\u0436\u0438\u043c\u0435 \u0431\u043e\u043a\u0441\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq mode (- 1 mode)) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041f\u043e\u043f\u044b\u0442\u043a\u0430 \u043f\u0435\u0440\u0435\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u043a\u0443\u0440\u0441\u043e\u0440 \u0441 \u0446\u0435\u043d\u0442\u0440\u0430 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setvar &#171;LASTPOINT&#187; center)) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">((= source 5)) ; \u0412\u044b\u0441\u043b\u0435\u0436\u0435\u043d\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430? :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0415\u0441\u043b\u0438 \u0435\u0435 \u0441\u0434\u0432\u0438\u043d\u0443\u0442\u044c&#8230; :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(if (or (\/= (car prev) (car pt)) :<\/p>\n<p align=\"JUSTIFY\">(\/= (cadr prev) (cadr pt))) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0418\u0437\u043c\u0435\u043d\u0438\u0442\u044c \u0438\u043b\u0438 \u0441\u0434\u0432\u0438\u043d\u0443\u0442\u044c \u0431\u043e\u043a\u0441 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(progn :<\/p>\n<p align=\"JUSTIFY\">(if (= mode 0) :<\/p>\n<p align=\"JUSTIFY\">(setq center pt) :<\/p>\n<p align=\"JUSTIFY\">(setq deltax (+ deltax (- (car pt) :<\/p>\n<p align=\"JUSTIFY\">(car prev))))) :<\/p>\n<p align=\"JUSTIFY\">(setq prev pt) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(drawbox) ; \u0423\u0434\u0430\u043b\u0438\u0442\u044c \u0441\u0442\u0430\u0440\u044b\u0439 \u0431\u043b\u043e\u043a :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0412\u0432\u0435\u0441\u0442\u0438 \u043d\u043e\u0432\u044b\u0439 \u0446\u0435\u043d\u0442\u0440\/\u0440\u0430\u0437\u043c\u0435\u0440 \u0438 \u0447\u0435\u0440\u0442\u0435\u0436 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(newbox) :<\/p>\n<p align=\"JUSTIFY\">))) :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">((or (and (= source 6) (= pt 0)) ;lst \u043c\u0435\u043d\u044e \u043a\u043b\u0430\u0432\u0438\u0448(CR):<\/p>\n<p align=\"JUSTIFY\">(and (= source 2) ; \u0438\u043b\u0438 \u043a\u043b\u0430\u0432\u0438\u0430\u0442\u0443\u0440\u0430 \u0438 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> (or (= pt 13) (= pt 32)))) ; CR \u0438\u043b\u0438 \u0431\u043b\u0430\u043d\u043a? :<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(drawbox) ;\u0423\u0434\u0430\u043b\u0438\u0442\u044c \u0441\u0442\u0430\u0440\u044b\u0439 \u0431\u043e\u043a\u0441:<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(command &#171;ZOOM&#187; &#171;W&#187; ll ur) :<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Times New Roman\"> (setq loop nil)) ; \u0412\u044b\u0445\u043e\u0434 <\/span> :<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(T ;\u041b\u044e\u0431\u0430\u044f grread \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f:<\/p>\n<p align=\"JUSTIFY\">(drawbox) ;\u0423\u0434\u0430\u043b\u0438\u0442\u044c \u0441\u0442\u0430\u0440\u044b\u0439 \u0431\u043b\u043e\u043a:<\/p>\n<p align=\"JUSTIFY\">(setq loop nil a &#187; ^cancel &#171;)) ; \u0412\u044b\u0445\u043e\u0434 :<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">) :<\/p>\n<p align=\"JUSTIFY\">:<\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><a name=\"_Toc465172789\"><\/a><a name=\"_Ref465174285\"><\/a><a name=\"_Toc465261033\"><\/a><span style=\"font-family: Arial\"><br \/>\nIdle ( \u0440\u0430\u0431\u043e\u0442\u0430\u0442\u044c \u0432\u0445\u043e\u043b\u043e\u0441\u0442\u0443\u044e)<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0430\u043a\u043e\u043d\u0435\u0446, \u044d\u0442\u043e \u0442\u0430 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0430 , \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0438\u043b\u043b\u044e\u0441\u0442\u0440\u0438\u0440\u0443\u0435\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043f\u0440\u044f\u043c\u043e\u0433\u043e \u0432\u044b\u0432\u043e\u0434\u0430 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d, \u0442\u0430\u043a\u0436\u0435 \u043a\u0430\u043a \u0438 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &#187; ERROR&#187;.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041a\u043e\u043c\u0430\u043d\u0434\u0430 IDLE<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(defun &#171;ERROR&#187; (s) ; \u041e\u0448\u0438\u0431\u043a\u0430 \u043d\u0430\u0432\u0435\u0440\u0445\u0443 (\u0438\u043b\u0438 CTRL C)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(redra<span style=\"font-family: Times New Roman\">w) ; \u041f\u0435\u0440\u0435\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u0435 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435<\/span><\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(grtext) ; \u041f\u043e\u0432\u0442\u043e\u0440\u043d\u044b\u0439 \u0432\u044b\u0437\u043e\u0432 \u043c\u0435\u043d\u044e\/\u0441\u0442\u0430\u0442\u0443\u0441<\/p>\n<p align=\"JUSTIFY\">; \u0442\u0435\u043a\u0441\u0442\u0430 \u043d\u0430 \u044d\u043a\u0440\u0430\u043d\u0435<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">(defun C:IDLE ()<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq vc (getvar &#171;viewctr&#187;)) ; \u0412\u044b\u0437\u043e\u0432 \u0446\u0435\u043d\u0442\u0440\u0430\u043b\u044c\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438 \u043d\u0430<\/p>\n<p align=\"JUSTIFY\">; \u044d\u043a\u0440\u0430\u043d<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq cx (car vc))<\/p>\n<p align=\"JUSTIFY\">(setq cy (cadr vc))<\/p>\n<p align=\"JUSTIFY\">(setq vc (\/ (getvar &#171;viewsize&#187;) 2))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq xmin (- cx vs)) ; \u0412\u044b\u0447\u0438\u0441\u043b\u0438\u0442\u044c \u0441\u0442\u043e\u0440\u043e\u043d\u0443 \u043a\u0432\u0430\u0434\u0440\u0430\u0442\u0430<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq xmax (+ cx vs))<\/p>\n<p align=\"JUSTIFY\">(setq ymin (- cy vs))<\/p>\n<p align=\"JUSTIFY\">(setq ymax (+ cy vs))<\/p>\n<p align=\"JUSTIFY\">(setq xdir (\/ vs 10) ydir xdir)<\/p>\n<p align=\"JUSTIFY\">(setq cx (+ cx (* xdir 7)))<\/p>\n<p align=\"JUSTIFY\">(setq cy (- cy (* ydir 3)))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(grclear) ; \u0427\u0438\u0441\u0442\u044b\u0439 \u0433\u0440\u0430\u0444\u0438\u0447\u0435\u0441\u043a\u0438\u0439 \u044d\u043a\u0440\u0430\u043d<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0412 \u0441\u0442\u0430\u0442\u0443\u0441\u0435 \u0441\u0432\u043e\u0431\u043e\u0434\u043d\u043e\u0433\u043e \u0443\u0447\u0430\u0441\u0442\u043a\u0430<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(grtext -1 &#187; That&#8217;s entertainment!&#8217;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u0412 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u0430\u0445 \u0441\u0432\u043e\u0431\u043e\u0434\u043d\u043e\u0433\u043e \u0443\u0447\u0430\u0441\u0442\u043a\u0430<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(grtext -2 &#171;Press CANCEL to stop.&#187;)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">; \u041d\u0430\u0431\u043e\u0440 \u043d\u0430\u0447\u0430\u043b\u044c\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq lp (list cx cy))<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(while t ; \u0426\u0438\u043a\u043b \u043d\u0430\u0432\u0441\u0435\u0433\u0434\u0430 ( &#8230;.\u0434\u043e CTRL C)<\/p>\n<p align=\"JUSTIFY\">(setq nx (+ cx xdir)) ; \u041d\u0430\u0431\u043e\u0440 \u043a\u043e\u043d\u0435\u0447\u043d\u043e\u0439 \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b \u0425<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(if (or (&gt; nx xmax) (&lt; nx xmin))<\/p>\n<p align=\"JUSTIFY\">(progn<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq xdir (- xdir)) ; \u0421\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u043a\u0430\u0442\u0430\u043b\u043e\u0433 \u0425<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq nx cx)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq ny (+ cy ydir)) ; \u041d\u0430\u0431\u043e\u0440 \u043a\u043e\u043d\u0435\u0447\u043d\u043e\u0439 Y \u043a\u043e\u043e\u0440\u0434\u0438\u043d\u0430\u0442\u044b<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(if (or (&gt; ny ymax) (&lt; ny ymin))<\/p>\n<p align=\"JUSTIFY\">(progn<\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">(setq ydir (- ydir)) ; \u0421\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u044e\u0449\u0438\u0439 \u043a\u0430\u0442\u0430\u043b\u043e\u0433 Y<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">(setq ny cy)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">(setq cx nx cy ny)<\/p>\n<p align=\"JUSTIFY\">(grdraw lp (<span style=\"font-family: Times New Roman\">setq lp (list nx ny)) -1) ; \u0412\u044b\u0447\u0435\u0440\u0447\u0438\u0432\u0430\u043d\u0438\u0435 \u0441&#187;XOR ink&#187;<\/span><\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p align=\"JUSTIFY\">)<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<h2><a name=\"#3\"><\/a>\u0421\u041e\u041e\u0411\u0429\u0415\u041d\u0418\u042f \u041e\u0411 \u041e\u0428\u0418\u0411\u041a\u0410\u0425<\/h2>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u041d\u0438\u0436\u0435 \u043f\u0440\u0438\u0432\u0435\u0434\u0435\u043d \u0441\u043f\u0438\u0441\u043e\u043a \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0439 \u043e\u0431 \u043e\u0448\u0438\u0431\u043a\u0430\u0445, \u043a\u043e\u0442\u043e\u0440\u044b\u0435 \u0432\u044b \u0432\u0440\u0435\u043c\u044f \u043e\u0442 \u0432\u0440\u0435\u043c\u0435\u043d\u0438 \u0443\u0432\u0438\u0434\u0438\u0442\u0435, \u043a\u043e\u0433\u0434\u0430 \u0432\u044b \u043f\u0438\u0448\u0435\u0442\u0435 \u0438\u043b\u0438 \u0432\u044b\u0432\u043e\u0434\u0438\u0442\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 AutoLISP\u0430. \u0415\u0441\u043b\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f &#171;ERROR&#187; \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0430 \u043d\u0435 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c (&#171;ERROR&#187; \u0441\u0432\u044f\u0437\u0430\u043d\u0430 \u0441 nil), \u043e\u0448\u0438\u0431\u043a\u0430 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0441\u0442\u0430\u043d\u0434\u0430\u0440\u0442\u043d\u043e\u0439 \u0430\u043a\u0446\u0438\u0435\u0439, \u0442\u043e\u0433\u0434\u0430 \u044d\u0442\u0438 \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u044f \u0432\u044b\u0432\u043e\u0434\u044f\u0442\u0441\u044f \u043d\u0430 \u044d\u043a\u0440\u0430\u043d \u0434\u0438\u0441\u043f\u043b\u0435\u044f \u0432 \u0432\u0438\u0434\u0435:<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">error: message <\/span><span style=\"font-family: Courier New\">\u043e\u0448\u0438\u0431\u043a\u0430:\u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435<\/span><\/p>\n<p><span style=\"font-family: Times New Roman\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\u0441\u043b\u0435\u0434\u043e\u043c \u0437\u0430 \u043f\u0440\u043e\u0441\u043b\u0435\u0436\u0435\u043d\u043d\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439. \u0415\u0441\u043b\u0438 \u0441\u0443\u0449\u0435\u0441\u0442\u0432\u0443\u0435\u0442 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c-\u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u0435\u043b\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 &#171;ERROR&#187;, \u044d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f , \u043d\u0430\u0437\u044b\u0432\u0430\u0435\u043c\u0430\u044f \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435\u043c, \u043f\u0440\u043e\u0439\u0434\u0435\u0442 \u0442\u043e\u043b\u044c\u043a\u043e \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430.<\/p>\n<p>&nbsp;<\/p>\n<p><b><i><span style=\"font-family: Arial\">\u00a0<\/span><\/i><\/b><\/p>\n<p align=\"JUSTIFY\">\u0424\u0443\u043d\u043a\u0446\u0438\u0438, \u043e\u0442\u043a\u043b\u043e\u043d\u044f\u0435\u043c\u044b\u0435 AutoCAD\u043e\u043c<\/p>\n<p>&nbsp;<\/p>\n<p><b><i><\/i><\/b><span style=\"font-family: Times New Roman\"><br \/>\n<\/span><\/p>\n<p align=\"JUSTIFY\">\u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u044b \u043f\u0440\u043e\u0445\u043e\u0434\u044f\u0449\u0438\u0445 \u0432 AutoCAD \u0444\u0443\u043d\u043a\u0446\u0438\u0439 \u043d\u0435\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b (\u0442\u0430\u043a\u0438\u0445, \u043a\u0430\u043a \u0444\u0443\u043d\u043a\u0446\u0438\u0438 GETVAR &#171;NOSUCH&#187; \u0438\u043b\u0438 SETVAR \u0441 \u0442\u043e\u043b\u044c\u043a\u043e \u0447\u0438\u0442\u0430\u0435\u043c\u044b\u043c\u0438 \u0441\u0438\u0441\u0442\u0435\u043c\u043d\u044b\u043c\u0438 \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u043c\u0438), \u0438\u043b\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u044f, \u043f\u0435\u0440\u0435\u0445\u043e\u0434\u044f\u0449\u0430\u044f \u0441\u0430\u043c\u0430 \u0432 \u0441\u0435\u0431\u044f, \u043d\u0435\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u0430 \u0432 \u0442\u0435\u043a\u0443\u0449\u0435\u043c \u043a\u043e\u043d\u0442\u0435\u043a\u0441\u0442\u0435.<\/p>\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\">\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad argument type <\/span>&#8212; <span style=\"font-family: Times New Roman\">\u0424\u0443\u043d\u043a\u0446\u0438\u044f \u0441\u043d\u0430\u0431\u0436\u0435\u043d\u0430 \u043d\u0435\u043a\u043e\u0440\u0440\u0435\u043a\u0442\u043d\u044b\u043c \u0442\u0438\u043f\u043e\u043c \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430. ( \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0432\u044b \u043d\u0435 \u043c\u043e\u0436\u0435\u0442\u0435 \u0432\u0437\u044f\u0442\u044c STRLEN \u043a\u0430\u043a \u0446\u0435\u043b\u043e\u0435.)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad association list<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0421\u043f\u0438\u0441\u043e\u043a, \u043e\u0431\u044a\u044f\u0432\u043b\u0435\u043d\u043d\u044b\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ASSOC, \u043d\u0435 \u0441\u043e\u0441\u0442\u043e\u0438\u0442 \u0438\u0437 &#171;(\u043d\u0443\u0436\u043d\u0430\u044f \u043a\u043b\u0430\u0432\u0438\u0448\u0430 ) \u0441\u043f\u0438\u0441\u043a\u043e\u0432. <\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad entmod list<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442, \u043f\u0440\u043e\u0445\u043e\u0434\u044f\u0449\u0438\u0439 \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u044e ENTMOD, \u0438\u043c\u0435\u0435\u0442 \u043d\u0435\u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0438\u0439 \u0432\u0445\u043e\u0434 \u0441\u043f\u0438\u0441\u043a\u0430 \u0434\u0430\u043d\u043d\u044b\u0445 (\u0442\u0430\u043a \u0436\u0435 , \u043a\u0430\u043a \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u043c\u044b\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 ENTGET). <\/span><\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad formal argument list <\/span>&#8212; <span style=\"font-family: Times New Roman\">\u041a\u043e\u0433\u0434\u0430 \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u0430 \u044d\u0442\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f, AutoLISP \u0443\u0434\u0430\u043b\u0438\u0442 \u0441\u043f\u0438\u0441\u043e\u043a \u043d\u0435\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0444\u043e\u0440\u043c\u0430\u043b\u044c\u043d\u044b\u0445 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432. \u0412\u043e\u0437\u043c\u043e\u0436\u043d\u043e, \u0447\u0442\u043e \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u0432\u043e\u0432\u0441\u0435 \u043d\u0435 \u044f\u0432\u043b\u044f\u0435\u0442\u0441\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 , \u0430 \u0432 \u043d\u0435\u043a\u043e\u0442\u043e\u0440\u043e\u0439 \u0441\u0442\u0435\u043f\u0435\u043d\u0438 , \u0441\u043f\u0438\u0441\u043e\u043a \u0434\u0430\u043d\u043d\u044b\u0445.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad function<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041f\u0435\u0440\u0432\u044b\u0439 \u044d\u043b\u0435\u043c\u0435\u043d\u0442 \u0432 \u0441\u043f\u0438\u0441\u043a\u0435 -\u043d\u0435\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0438\u043c\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u0412\u043e\u0437\u043c\u043e\u0436\u043d\u043e, \u0447\u0442\u043e \u044d\u0442\u043e \u0438\u043c\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u043e\u0439 \u0438\u043b\u0438 \u0447\u0438\u0441\u043b\u043e. \u042d\u0442\u043e \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435 \u0442\u0430\u043a\u0436\u0435 \u043c\u043e\u0436\u0435\u0442 \u043f\u043e\u043a\u0430\u0437\u044b\u0432\u0430\u0442\u044c, \u0447\u0442\u043e \u043d\u0430\u0437\u0432\u0430\u043d\u043d\u0430\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043d\u0435\u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0435 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0430 &#8212; \u043d\u0435 \u0437\u0430\u0431\u044b\u0432\u0430\u0439\u0442\u0435 \u0432\u043e\u0437\u0432\u0440\u0430\u0449\u0430\u0435\u043c\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a \u0444\u043e\u0440\u043c\u0430\u043b\u044c\u043d\u044b\u0445 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad list<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041d\u0435\u043f\u043e\u0434\u0445\u043e\u0434\u044f\u0449\u0435 \u043e\u0440\u0433\u0430\u043d\u0438\u0437\u043e\u0432\u0430\u043d \u0441\u043f\u0438\u0441\u043e\u043a, \u043a\u043e\u0442\u043e\u0440\u044b\u043c \u0441\u043d\u0430\u0431\u0436\u0435\u043d\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f. \u042d\u0442\u043e \u043c\u043e\u0436\u0435\u0442 \u0441\u043b\u0443\u0447\u0438\u0442\u044c\u0441\u044f, \u0435\u0441\u043b\u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u043d\u0430\u0447\u0438\u043d\u0430\u0435\u0442 \u0434\u0435\u0441\u044f\u0442\u0438\u0447\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430; \u0432 \u0442\u0430\u043a\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 \u0432\u044b \u0434\u043e\u043b\u0436\u043d\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0432\u0432\u0435\u0434\u0435\u043d\u0438\u0435 0.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">Bad node ( \u043f\u043b\u043e\u0445\u043e\u0439 \u0443\u0447\u0430\u0441\u0442\u043e\u043a \u043f\u0430\u043c\u044f\u0442\u0438 node)<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041d\u0435\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u0435\u043d \u043f\u0443\u043d\u043a\u0442 , \u0432\u0441\u0442\u0440\u0435\u0447\u0430\u0435\u043c\u044b\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 TYPE.<\/span><\/p>\n<p><span style=\"font-family: Courier New\">\u00a0<\/span><\/p>\n<p align=\"JUSTIFY\">\n<p>&nbsp;<\/p>\n<p>&nbsp;<\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad node type in list<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041d\u0435\u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u0435\u043d \u043f\u0443\u043d\u043a\u0442, \u0432\u0441\u0442\u0440\u0435\u0447\u0430\u0435\u043c\u044b\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 FOREACH.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad point argument<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041d\u0435\u0434\u043e\u0441\u0442\u0430\u0442\u043e\u0447\u043d\u043e \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0435\u043d\u0430 \u0442\u043e\u0447\u043a\u0430 (\u0441\u043f\u0438\u0441\u043e\u043a \u0434\u0432\u0443\u0445 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u0445 \u0447\u0438\u0441\u0435\u043b) \u043f\u0440\u043e\u0445\u043e\u0434\u044f\u0449\u0430\u044f \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u044e, \u043e\u0436\u0438\u0434\u0430\u044e\u0449\u0443\u044e \u0442\u043e\u0447\u043a\u0443. \u0411\u0443\u0434\u044c\u0442\u0435 \u0432\u043d\u0438\u043c\u0430\u0442\u0435\u043b\u044c\u043d\u044b, \u043d\u0435 \u043d\u0430\u0447\u0438\u043d\u0430\u0439\u0442\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0441 \u0434\u0435\u0441\u044f\u0442\u0438\u0447\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438; \u0432 \u0442\u0430\u043a\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435, \u0432\u044b \u0434\u043e\u043b\u0436\u043d\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0432\u0432\u0435\u0434\u0435\u043d\u0438\u0435 0.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bad point value<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0422\u043e \u0436\u0435 \u0441\u0430\u043c\u043e\u0435, \u0447\u0442\u043e \u0432\u044b\u0448\u0435.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">bool arg1 &lt;0 or &gt;15<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041f\u0435\u0440\u0432\u044b\u0439 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 BOOLE (\u0411\u0443\u043b\u0435\u0432\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f) \u0434\u043e\u043b\u0436\u043d\u043e \u0431\u044b\u0442\u044c \u0446\u0435\u043b\u043e\u0435 \u043c\u0435\u0436\u0434\u0443 0 \u0438 15.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">can&#8217;t evaluate expression<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u042d\u0442\u0430 \u043e\u0448\u0438\u0431\u043a\u0430 \u043c\u043e\u0436\u0435\u0442 \u0431\u044b\u0442\u044c \u0432\u044b\u0437\u0432\u0430\u043d\u0430 \u043d\u0435\u043f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u044b\u043c \u043c\u0435\u0441\u0442\u043e\u043f\u043e\u043b\u043e\u0436\u0435\u043d\u0438\u0435\u043c \u0434\u0435\u0441\u044f\u0442\u0438\u0447\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438 \u0438 \u0441 \u0434\u0440\u0443\u0433\u043e\u0439 \u0441\u0442\u043e\u0440\u043e\u043d\u044b, \u043d\u0435\u0434\u043e\u0441\u0442\u0430\u0442\u043e\u0447\u043d\u043e \u0441\u0444\u043e\u0440\u043c\u0443\u043b\u0438\u0440\u043e\u0432\u0430\u043d\u043d\u044b\u043c \u0432\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435\u043c.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">console break<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u0432\u0432\u0435\u043b CTRL C , \u0432 \u0442\u043e \u0432\u0440\u0435\u043c\u044f, \u043a\u043e\u0433\u0434\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u044f \u043e\u0431\u0440\u0430\u0431\u0430\u0442\u044b\u0432\u0430\u043b\u0430\u0441\u044c.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">divide by zero<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0414\u0435\u043b\u0435\u043d\u0438\u0435 \u043d\u0430 \u043d\u0443\u043b\u044c \u043d\u0435 \u0440\u0430\u0437\u0440\u0435\u0448\u0430\u0435\u0442\u0441\u044f.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">extra right paren<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0412\u0441\u0442\u0440\u0435\u0442\u0438\u043b\u0438\u0441\u044c \u043e\u0434\u043d\u0438 \u0438\u043b\u0438 \u0431\u043e\u043b\u0435\u0435 \u043b\u0438\u0448\u043d\u0438\u0435 \u043f\u0440\u0430\u0432\u044b\u0435 \u0441\u043a\u043e\u0431\u043a\u0438.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">file not open<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041e\u043f\u0438\u0441\u0430\u0442\u0435\u043b\u044c \u0444\u0430\u0439\u043b\u0430 \u0434\u043b\u044f \u043e\u043f\u0435\u0440\u0430\u0446\u0438\u0438 \u0432\u0432\u043e\u0434\u0430-\u0432\u044b\u0432\u043e\u0434\u0430 (I\/O) \u043d\u0435 \u0442\u0430\u043a\u043e\u0439 , \u043a\u0430\u043a \u0443 \u0434\u043e\u0441\u0442\u0443\u043f\u043d\u043e\u0433\u043e \u0444\u0430\u0439\u043b\u0430.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">Function cancelled<\/span> <span style=\"font-family: Times New Roman\">( \u0441\u043d\u0438\u043c\u0430\u0435\u043c\u0430\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u044f) &#8212; \u041f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u044c \u043d\u0430\u0436\u0430\u043b CTRL C \u0432 \u043e\u0442\u0432\u0435\u0442 \u043d\u0430 \u043f\u043e\u0434\u0441\u043a\u0430\u0437\u043a\u0443.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">function undefined for argument<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430, \u043e\u0431\u043e\u0437\u043d\u0430\u0447\u0435\u043d\u043d\u043e\u0433\u043e \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u044f\u0445 LOG \u0438\u043b\u0438 SQRT, \u043d\u0435\u0442 \u0432 \u0434\u0438\u0430\u043f\u0430\u0437\u043e\u043d\u0435.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">function undefined for real<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0432\u043c\u0435\u0441\u0442\u043e \u0446\u0435\u043b\u043e\u0433\u043e \u0447\u0438\u0441\u043b\u0430 \u043e\u0431\u043e\u0437\u043d\u0430\u0447\u0435\u043d \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u044b\u043c. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, (LSH val 1.2)<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">improper argument<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0410\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0432 GCD \u043e\u0442\u0440\u0438\u0446\u0430\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0438\u043b\u0438 \u043d\u043e\u043b\u044c.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">incorrect number of arguments to a function<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u043e \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c\u043e\u0439 \u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u0435\u043b\u0435\u043c \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u043d\u0435 \u0441\u043e\u043e\u0442\u0432\u0435\u0442\u0441\u0442\u0432\u0443\u0435\u0442 \u043a\u043e\u043b\u0438\u0447\u0435\u0441\u0442\u0432\u0443 \u0444\u043e\u0440\u043c\u0430\u043b\u044c\u043d\u044b\u0445 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432, \u043e\u0431\u044a\u044f\u0432\u043b\u0435\u043d\u043d\u044b\u0445 \u0444\u0443\u043d\u043a\u0446\u0438\u0435\u0439 DEFUN.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">insufficient node space<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041d\u0435\u0434\u043e\u0441\u0442\u0430\u0442\u043e\u0447\u0435\u043d \u0443\u0447\u0430\u0441\u0442\u043e\u043a \u043f\u0430\u043c\u044f\u0442\u0438 node , \u0434\u043b\u044f \u0442\u043e\u0433\u043e \u0447\u0442\u043e\u0431\u044b \u0432\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u043f\u043e\u0442\u0440\u0435\u0431\u043d\u044b\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u044f. \u0421\u043c. \u0433\u043b\u0430\u0432\u0443 6.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">insufficient string space<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041d\u0435\u0434\u043e\u0441\u0442\u0430\u0442\u043e\u0447\u0435\u043d \u0443\u0447\u0430\u0441\u0442\u043e\u043a \u043f\u0430\u043c\u044f\u0442\u0438 heap , \u0447\u0442\u043e\u0431\u044b \u0432\u043c\u0435\u0441\u0442\u0438\u0442\u044c \u0441\u0442\u0440\u043e\u043a\u0443 \u0442\u0435\u043a\u0441\u0442\u0430. \u0421\u043c. \u0433\u043b\u0430\u0432\u0443 6.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">invalid argument<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u041d\u0435\u043f\u0440\u0430\u0432\u0438\u043b\u044c\u043d\u044b\u0439 \u0442\u0438\u043f \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u0430 \u0438\u043b\u0438 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442 \u0432\u043d\u0435 \u0434\u0438\u0430\u043f\u0430\u0437\u043e\u043d\u0430.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">invalid character<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0412\u044b\u0440\u0430\u0436\u0435\u043d\u0438\u0435 \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 \u043d\u0435\u0432\u0435\u0440\u043d\u044b\u0439 \u0437\u043d\u0430\u043a.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">invalid dotted pair<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0422\u043e\u0447\u0435\u0447\u043d\u044b\u0435 \u043f\u0430\u0440\u044b &#8212; \u044d\u0442\u043e \u0441\u043f\u0438\u0441\u043a\u0438, \u0441\u043e\u0434\u0435\u0440\u0436\u0430\u0449\u0438\u0435 \u0434\u0432\u0430 \u044d\u043b\u0435\u043c\u0435\u043d\u0442\u0430, \u0440\u0430\u0437\u0434\u0435\u043b\u0435\u043d\u043d\u044b\u0435 \u043a\u043e\u043d\u0441\u0442\u0440\u0443\u043a\u0446\u0438\u0435\u0439 &#171;space-period-space&#187;. \u0412\u044b \u043c\u043e\u0436\u0435\u0442\u0435 \u043f\u043e\u043b\u0443\u0447\u0438\u0442\u044c \u044d\u0442\u043e \u0441\u043e\u043e\u0431\u0449\u0435\u043d\u0438\u0435 \u043e\u0431 \u043e\u0448\u0438\u0431\u043a\u0435 , \u0435\u0441\u043b\u0438 \u0432\u044b \u043d\u0430\u0447\u0438\u043d\u0430\u0435\u0442\u0435 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u0441 \u0434\u0435\u0441\u044f\u0442\u0438\u0447\u043d\u043e\u0439 \u0442\u043e\u0447\u043a\u0438; \u0432 \u0442\u0430\u043a\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 \u0432\u044b \u0434\u043e\u043b\u0436\u043d\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0432\u0432\u0435\u0434\u0435\u043d\u0438\u0435 0.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">LISPSTACK overflow<\/span><span style=\"font-family: Times New Roman\"> (\u043f\u0435\u0440\u0435\u043f\u043e\u043b\u043d\u0435\u043d\u0438\u0435 \u0441\u0442\u0435\u043a\u0430) &#8212; \u0421\u0442\u0435\u043a AutoLISP\u0430 \u043f\u0435\u0440\u0435\u043f\u043e\u043b\u043d\u0435\u043d. \u042d\u0442\u043e \u043f\u0440\u043e\u0438\u0441\u0445\u043e\u0434\u0438\u0442 \u0438\u0437-\u0437\u0430 \u0447\u0440\u0435\u0437\u043c\u0435\u0440\u043d\u043e\u0433\u043e \u043f\u043e\u0432\u0442\u043e\u0440\u0435\u043d\u0438\u044f \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0438\u043b\u0438 \u043e\u0447\u0435\u043d\u044c \u0431\u043e\u043b\u044c\u0448\u0438\u0445 \u0441\u043f\u0438\u0441\u043a\u043e\u0432 \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438. \u041f\u043e\u043f\u044b\u0442\u0430\u0439\u0442\u0435\u0441\u044c \u0443\u0432\u0435\u043b\u0438\u0447\u0438\u0442\u044c \u0441\u0440\u0435\u0434\u0443 LISPSTACK \u0434\u043b\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0445.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">misplaced dot<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u042d\u0442\u043e \u043c\u043e\u0436\u0435\u0442 \u0438\u043c\u0435\u0442\u044c \u043c\u0435\u0441\u0442\u043e , \u0435\u0441\u043b\u0438 \u0434\u0435\u0439\u0441\u0442\u0432\u0438\u0442\u0435\u043b\u044c\u043d\u043e\u0435 \u0447\u0438\u0441\u043b\u043e \u043d\u0430\u0447\u0438\u043d\u0430\u0435\u0442 \u0434\u0435\u0441\u044f\u0442\u0438\u0447\u043d\u0430\u044f \u0442\u043e\u0447\u043a\u0430; \u0432 \u0442\u0430\u043a\u043e\u043c \u0441\u043b\u0443\u0447\u0430\u0435 \u0432\u044b \u0434\u043e\u043b\u0436\u043d\u044b \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0432\u0432\u0435\u0434\u0435\u043d\u0438\u0435 0 .<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">null function<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0411\u044b\u043b\u0430 \u0441\u0434\u0435\u043b\u0430\u043d\u0430 \u043f\u043e\u043f\u044b\u0442\u043a\u0430 \u0432\u044b\u0447\u0438\u0441\u043b\u0438\u0442\u044c \u0444\u0443\u043d\u043a\u0446\u0438\u044e , \u043a\u043e\u0442\u043e\u0440\u0430\u044f \u0438\u043c\u0435\u0435\u0442 \u043d\u0443\u043b\u0435\u0432\u043e\u0439 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u0438\u0442\u0435\u043b\u044c.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">quit exit abort<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u042d\u0442\u043e \u0440\u0435\u0437\u0443\u043b\u044c\u0442\u0430\u0442 \u0432\u044b\u0437\u043e\u0432\u0430 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 QUIT \u0438\u043b\u0438 EXIT. \u042d\u0442\u0438 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0441\u0435\u0439\u0447\u0430\u0441 \u043d\u0435 \u0438\u0441\u043f\u043e\u043b\u044c\u0437\u0443\u044e\u0442\u0441\u044f \u0432 AutoLISP\u0435.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">too few arguments<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0421\u043b\u0438\u0448\u043a\u043e\u043c \u043c\u0430\u043b\u043e \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u043e\u0431\u044a\u044f\u0432\u043b\u0435\u043d\u043e \u0432\u043e \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">too many arguments<\/span><span style=\"font-family: Times New Roman\"> &#8212; \u0421\u043b\u0438\u0448\u043a\u043e\u043c \u043c\u043d\u043e\u0433\u043e \u0430\u0440\u0433\u0443\u043c\u0435\u043d\u0442\u043e\u0432 \u043e\u0431\u044a\u044f\u0432\u043b\u0435\u043d\u043e \u0432\u043e \u0432\u0441\u0442\u0440\u043e\u0435\u043d\u043d\u043e\u0439 \u0444\u0443\u043d\u043a\u0446\u0438\u0438.<\/span><\/p>\n<p align=\"JUSTIFY\"><span style=\"font-family: Courier New\">unexpected signal nnn<\/span><span style=\"font-family: Times New Roman\"> -( \u0422\u043e\u043b\u044c\u043a\u043e \u0434\u043b\u044f \u0441\u0438\u0441\u0442\u0435\u043c\u044b UNIX) \u041e\u0442 \u0440\u0430\u0431\u043e\u0442\u0430\u044e\u0449\u0435\u0439 \u0441\u0438\u0441\u0442\u0435\u043c\u044b \u043f\u043e\u043b\u0443\u0447\u0435\u043d \u043d\u0435\u043e\u0436\u0438\u0434\u0430\u043d\u043d\u044b\u0439 \u0441\u0438\u0433\u043d\u0430\u043b.<\/span><\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u0412\u0437\u044f\u0442\u043e \u043e\u0442\u0441\u044e\u0434\u0430 http:\/\/aco.ifmo.ru\/~nadinet\/html\/other\/lsp_book\/lisp.html \u041c\u0430\u0442\u0435\u043c\u0430\u0442\u0438\u0447\u0435\u0441\u043a\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 \u0410\u043b\u0444\u0430\u0432\u0438\u0442\u043d\u044b\u0439 \u0441\u043f\u0438\u0441\u043e\u043a A B C D E F G I L M N O P Q R S T U V W Z \u041f\u0440\u0438\u043c\u0438\u0442\u0438\u0432\u044b \u0438 <a class=\"more-link\" href=\"https:\/\/infobase.athn.ru\/program\/2017\/04\/spravochnik-po-standartnyim-funktsiyam-autolisp\/\">Continue Reading \u2192<\/a><\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[16],"tags":[60],"class_list":["post-493","post","type-post","status-publish","format-standard","hentry","category-programming","tag-autolisp"],"_links":{"self":[{"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/posts\/493","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/comments?post=493"}],"version-history":[{"count":0,"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/posts\/493\/revisions"}],"wp:attachment":[{"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/media?parent=493"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/categories?post=493"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/infobase.athn.ru\/program\/wp-json\/wp\/v2\/tags?post=493"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}