{"id":736,"date":"2010-02-01T09:37:03","date_gmt":"2010-02-01T05:37:03","guid":{"rendered":"http:\/\/msbro.ru\/?p=736"},"modified":"2010-03-07T21:23:57","modified_gmt":"2010-03-07T17:23:57","slug":"programmirovanie-baz-znanijj-v-srede-visual-prolog","status":"publish","type":"post","link":"https:\/\/msbro.ru\/index.php\/archives\/736","title":{"rendered":"\u041f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0431\u0430\u0437 \u0437\u043d\u0430\u043d\u0438\u0439 \u0432 \u0441\u0440\u0435\u0434\u0435 Visual Prolog."},"content":{"rendered":"<p>\u041f\u0440\u0438\u043c\u0435\u0440 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044c\u043d\u043e\u0439 \u0440\u0430\u0431\u043e\u0442\u044b:\u00a0 \u041f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0431\u0430\u0437 \u0437\u043d\u0430\u043d\u0438\u0439 \u0432 \u0441\u0440\u0435\u0434\u0435 Visual Prolog.<\/p>\n<p>\u0426\u0435\u043b\u044c \u0440\u0430\u0431\u043e\u0442\u044b: \u0421\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u043d\u043e\u0439 \u0441\u0438\u0441\u0442\u0435\u043c\u044b, \u0440\u0435\u0430\u043b\u0438\u0437\u0443\u044e\u0449\u0435\u0439 \u0431\u0430\u0437\u0443 \u0437\u043d\u0430\u043d\u0438\u0439 \u0432 \u0441\u0440\u0435\u0434\u0435 Visial Prolog.<\/p>\n<p>\u0420\u0430\u0431\u043e\u0442\u0430 \u0431\u044b\u043b\u0430 \u0441\u0434\u0430\u043d\u0430 \u0438 \u0437\u0430\u0447\u0442\u0435\u043d\u0430.<\/p>\n<p>\u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0442\u043e\u043b\u044c\u043a\u043e \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043f\u0440\u0438\u043c\u0435\u0440\u0430!<br \/>\n\u0412\u044b\u0441\u044b\u043b\u0430\u0442\u044c \u0435\u0435 \u043f\u0440\u044f\u043c\u043e \u0432 \u0442\u0430\u043a\u043e\u043c \u0432\u0438\u0434\u0435 \u043a\u0430\u0442\u0435\u0433\u043e\u0440\u0438\u0447\u0435\u0441\u043a\u0438 \u043d\u0435 \u0440\u0435\u043a\u043e\u043c\u0435\u043d\u0434\u0443\u0435\u0442\u0441\u044f!<\/p>\n<p><!--more--><\/p>\n<p>\u0426\u0435\u043b\u044c \u0440\u0430\u0431\u043e\u0442\u044b:<br \/>\n\u0421\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u043d\u043e\u0439 \u0441\u0438\u0441\u0442\u0435\u043c\u044b, \u0440\u0435\u0430\u043b\u0438\u0437\u0443\u044e\u0449\u0435\u0439 \u0431\u0430\u0437\u0443 \u0437\u043d\u0430\u043d\u0438\u0439 \u0432 \u0441\u0440\u0435\u0434\u0435 Visial Prolog.<\/p>\n<p>\u041a\u0440\u0430\u0442\u043a\u043e\u0435 \u043e\u043f\u0438\u0441\u0430\u043d\u0438\u0435 \u043f\u0440\u0435\u0434\u043c\u0435\u0442\u043d\u043e\u0439 \u043e\u0431\u043b\u0430\u0441\u0442\u0438:<br \/>\n\u041f\u0440\u0435\u0434\u043c\u0435\u0442\u043d\u0430\u044f \u043e\u0431\u043b\u0430\u0441\u0442\u044c: \u0420\u0430\u0441\u043f\u0438\u0441\u0430\u043d\u0438\u0435 \u043f\u0440\u0438\u0435\u043c\u0430 \u0432\u0440\u0430\u0447\u0430\u043c\u0438 \u0432 \u043f\u043e\u043b\u0438\u043a\u043b\u0438\u043d\u0438\u043a\u0435.<br \/>\n\u0414\u0430\u043d\u043d\u0430\u044f \u043f\u0440\u0435\u0434\u043c\u0435\u0442\u043d\u0430\u044f \u043e\u0431\u043b\u0430\u0441\u0442\u044c \u0441\u043e\u0434\u0435\u0440\u0436\u0438\u0442 \u043f\u043e\u043b\u043d\u0443\u044e \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u044e \u043f\u043e \u043f\u0440\u0438\u0435\u043c\u0443 \u0432\u0440\u0430\u0447\u0430\u043c\u0438 \u0432 \u043f\u043e\u043b\u0438\u043a\u043b\u0438\u043d\u0438\u043a\u0435. \u0415\u0441\u0442\u044c \u0442\u0430\u043a\u0438\u0435 \u043f\u043e\u043b\u044f, \u043a\u0430\u043a \u0444\u0430\u043c\u0438\u043b\u0438\u044f, \u0438\u043c\u044f, \u043e\u0442\u0447\u0435\u0441\u0442\u0432\u043e \u043f\u0440\u0438\u043d\u0438\u043c\u0430\u044e\u0449\u0435\u0433\u043e \u0432\u0440\u0430\u0447\u0430, \u0435\u0433\u043e \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044f, \u0434\u043d\u0438 \u043d\u0435\u0434\u0435\u043b\u0438 \u0438 \u0432\u0440\u0435\u043c\u044f \u043f\u0440\u0438\u0435\u043c\u0430 \u043f\u043e \u043a\u0430\u0436\u0434\u043e\u043c\u0443 \u0434\u043d\u044e, \u0430 \u0442\u0430\u043a\u0436\u0435 \u043a\u0430\u0442\u0435\u0433\u043e\u0440\u0438\u044f \u0432\u0440\u0430\u0447\u0430 \u0438 \u0443\u0441\u043b\u043e\u0432\u0438\u0435 \u043f\u0440\u0438\u0435\u043c\u0430 (\u043f\u043b\u0430\u0442\u043d\u043e\u0435\/\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\u0435).<\/p>\n<p>\u0426\u0435\u043b\u044c \u0441\u043e\u0437\u0434\u0430\u043d\u0438\u044f \u0441\u0438\u0441\u0442\u0435\u043c\u044b:<br \/>\n\u0414\u0430\u043d\u043d\u0430\u044f \u0441\u0438\u0441\u0442\u0435\u043c\u0430 \u0441\u043e\u0437\u0434\u0430\u0435\u0442\u0441\u044f \u0434\u043b\u044f \u0442\u043e\u0433\u043e, \u0447\u0442\u043e\u0431\u044b \u0441\u043e\u0431\u0438\u0440\u0430\u0442\u044c \u0441\u0442\u0430\u0442\u0438\u0441\u0442\u0438\u043a\u0443, \u043f\u043e \u043a\u0430\u043a\u043e\u043c\u0443-\u043b\u0438\u0431\u043e \u043f\u043e\u043b\u044e, \u043f\u0430\u0440\u0430\u043c\u0435\u0442\u0440\u0443, \u0430 \u0442\u0430\u043a\u0436\u0435 \u0434\u043b\u044f \u043f\u043e\u043b\u0443\u0447\u0435\u043d\u0438\u044f \u043d\u0435\u043e\u0431\u0445\u043e\u0434\u0438\u043c\u043e\u0439 \u0438\u043d\u0444\u043e\u0440\u043c\u0430\u0446\u0438\u0438, \u0434\u043b\u044f \u0445\u0440\u0430\u043d\u0435\u043d\u0438\u044f \u0434\u0430\u043d\u043d\u044b\u0445 \u043f\u043e \u043a\u0430\u0436\u0434\u043e\u043c\u0443 \u0432\u0440\u0430\u0447\u0443.<\/p>\n<p>\u0424\u043e\u0440\u043c\u0430\u043b\u044c\u043d\u043e\u0435 \u043e\u043f\u0438\u0441\u0430\u043d\u0438\u0435 \u043f\u0440\u0435\u0434\u043c\u0435\u0442\u043d\u043e\u0439 \u043e\u0431\u043b\u0430\u0441\u0442\u0438:<\/p>\n<p><a href=\"http:\/\/msbro.ru\/wp-content\/uploads\/2010\/02\/prolog-1.png\"><img loading=\"lazy\" decoding=\"async\" class=\"aligncenter size-full wp-image-737\" title=\"prolog-1\" src=\"http:\/\/msbro.ru\/wp-content\/uploads\/2010\/02\/prolog-1.png\" alt=\"\" width=\"568\" height=\"544\" srcset=\"https:\/\/msbro.ru\/wp-content\/uploads\/2010\/02\/prolog-1.png 568w, https:\/\/msbro.ru\/wp-content\/uploads\/2010\/02\/prolog-1-300x287.png 300w\" sizes=\"(max-width: 568px) 100vw, 568px\" \/><\/a><\/p>\n<p>\u0424\u043e\u0440\u043c\u0443\u043b\u0438\u0440\u043e\u0432\u043a\u0430 \u0437\u0430\u043f\u0440\u043e\u0441\u043e\u0432:<\/p>\n<pre>1.\u00a0\u00a0 \u00a0\u0417\u0430\u043f\u0440\u043e\u0441 \u0432\u044b\u0432\u043e\u0434\u0438\u0442 \u0444\u0430\u043c\u0438\u043b\u0438\u044e \u0432\u0440\u0430\u0447\u0430 \u043f\u043e \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u0438 (\u0438 \u043d\u0430\u043e\u0431\u043e\u0440\u043e\u0442).\r\nrel1(F,K):- represent(K,_,doctor(F,_,_),_).\r\n\u041f\u0440\u0438\u043c\u0435\u0440 \u0437\u0430\u043f\u0440\u043e\u0441\u0430:\r\nrel1(\u0425,\"\u0442\u0435\u0440\u0430\u043f\u0435\u0432\u0442\").<\/pre>\n<pre>\u041e\u0442\u0432\u0435\u0442:\r\n\u0425=\u0413\u0430\u043b\u043a\u0438\u043d\r\n\u0425=\u041d\u0438\u043a\u0438\u0444\u043e\u0440\u043e\u0432\u0430\r\n\u0425=\u0431\u0435\u043b\u044f\u0435\u0432\u0430\r\n\u0425=\u0441\u0432\u0435\u0442\u0438\u043a\u043e\u0432\u0430\r\n4 Solutions<\/pre>\n<pre>2.\u00a0\u00a0 \u00a0\u0417\u0430\u043f\u0440\u043e\u0441 \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442 \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u0438\u0441\u0442\u0430 \u0438 \u0443\u0441\u043b\u043e\u0432\u0438\u044f \u043f\u0440\u0438\u0435\u043c\u0430 (\u043f\u043b\u0430\u0442\u043d\u043e\u0435\/\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\u0435) \u0432\u043e \u0432\u0440\u0435\u043c\u0435\u043d\u0438.\r\nrel2(S,D,B,F,O):- represent(S,L,_,_), member(tp(D,B,F,_,O),L).\r\n\u041f\u0440\u0438\u043c\u0435\u0440 \u0437\u0430\u043f\u0440\u043e\u0441\u0430:\r\nrel2(\"\u0445\u0438\u0440\u0443\u0440\u0433\",D,B,F,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\").<\/pre>\n<pre>\u041e\u0442\u0432\u0435\u0442:\r\nD=\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a, B=9, F=19\r\nD=\u0432\u0442\u043e\u0440\u043d\u0438\u043a, B=9, F=19\r\nD=\u0447\u0435\u0442\u0432\u0435\u0440\u0433, B=13, F=19\r\nD=\u043f\u044f\u0442\u043d\u0438\u0446\u0430, B=13, F=19\r\nD=\u0441\u0440\u0435\u0434\u0430, B=9, F=19\r\n5 Solution<\/pre>\n<pre>3.\u00a0\u00a0 \u00a0\u0417\u0430\u043f\u0440\u043e\u0441 \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442 \u0444\u0430\u043c\u0438\u043b\u0438\u044e \u0432\u0440\u0430\u0447\u0430, \u043c\u0435\u0441\u0442\u043e \u0438 \u0432\u0440\u0435\u043c\u044f \u043f\u0440\u0438\u0435\u043c\u0430.\r\nrel3(S,D,B,F,K):- represent(_,L,doctor(S,_,_),_), member(tp(D,B,F,K,_),L).<\/pre>\n<pre>\u041f\u0440\u0438\u043c\u0435\u0440 \u0437\u0430\u043f\u0440\u043e\u0441\u0430:\r\nrel3(\"\u0437\u0432\u043e\u043d\u043a\u043e\u0432\",\"\u0441\u0440\u0435\u0434\u0430\",B,F,K).<\/pre>\n<pre>\u041e\u0442\u0432\u0435\u0442:\r\nB=9, F=19, K=216\r\n1 Solution<\/pre>\n<pre>4.\u00a0\u00a0 \u00a0\u0417\u0430\u043f\u0440\u043e\u0441 \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442 \u0437\u0430\u043d\u044f\u0442\u043e\u0441\u0442\u044c \u043a\u0430\u0431\u0438\u043d\u0435\u0442\u0430 \u0432\u043e \u0432\u0440\u0435\u043c\u0435\u043d\u0438.\r\nrel4(K,D,B,F):- represent(_,L,_,_), member(tp(D,B,F,K,_), L).<\/pre>\n<pre>\u041f\u0440\u0438\u043c\u0435\u0440 \u0437\u0430\u043f\u0440\u043e\u0441\u0430:\r\nrel4(206,D,B,F).<\/pre>\n<pre>\u041e\u0442\u0432\u0435\u0442:\r\nD=\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a, B=9, F=19\r\nD=\u0432\u0442\u043e\u0440\u043d\u0438\u043a, B=9, F=19\r\nD=\u0441\u0440\u0435\u0434\u0430, B=9, F=13\r\nD=\u0447\u0435\u0442\u0432\u0435\u0440\u0433, B=13, F=19\r\n4 Solutions<\/pre>\n<pre>5.\u00a0\u00a0 \u00a0 \u0417\u0430\u043f\u0440\u043e\u0441 \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442 \u0444\u0430\u043c\u0438\u043b\u0438\u044e \u0432\u0440\u0430\u0447\u0430 \u0438 \u0435\u0433\u043e \u043a\u0430\u0442\u0435\u0433\u043e\u0440\u0438\u044e.\r\nrel5(F,K):- represent(_,_,doctor(F,_,_),K).<\/pre>\n<pre>\u041f\u0440\u0438\u043c\u0435\u0440 \u0437\u0430\u043f\u0440\u043e\u0441\u0430:\r\nrel5(F,\"\u0432\u0442\u043e\u0440\u0430\u044f\").<\/pre>\n<pre>\u041e\u0442\u0432\u0435\u0442:\r\nF=\u043d\u0438\u043a\u0438\u0444\u043e\u0440\u043e\u0432\u0430\r\nF=\u0437\u0432\u043e\u043d\u043a\u043e\u0432\r\nF=\u043f\u043b\u0435\u0442\u0442\r\n3 Solutions<\/pre>\n<pre>6.\u00a0\u00a0 \u00a0\u0417\u0430\u043f\u0440\u043e\u0441 \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u0435\u0442 \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u0438\u0441\u0442\u0430, \u043c\u0435\u0441\u0442\u043e \u0438 \u0432\u0440\u0435\u043c\u044f \u043f\u0440\u0438\u0435\u043c\u0430\u044e\r\nrel6(S,D,B,F,K):- represent(S,L,_,_), member(tp(D,B,F,K,_),L).<\/pre>\n<pre>\u041f\u0440\u0438\u043c\u0435\u0440 \u0437\u0430\u043f\u0440\u043e\u0441\u0430:\r\nrel6(S,\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",B,F,218).<\/pre>\n<pre>\u041e\u0442\u0432\u0435\u0442:\r\nS=\u043b\u0444\u043a, B=9, F=15\r\nS=\u043c\u0430\u0441\u0441\u0430\u0436\u0438\u0441\u0442, B=15, F=20\r\n2 Solutions<\/pre>\n<p>\u041b\u0438\u0441\u0442\u0438\u043d\u0433 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u044b \u043d\u0430 \u044f\u0437\u044b\u043a\u0435 Visial Prolog:<\/p>\n<pre>domains\r\n fname=string\r\n name=string\r\n lname=string\r\n doctor = doctor(fname,name,lname)\r\n spec = string\r\n day = string\r\n begin=integer\r\n end=integer\r\n office = integer\r\n pay = string\r\n tp = tp(day,begin,end,office,pay)\r\n schedule = tp*\r\n category = string\r\n\r\ndatabase\r\n represent(spec,schedule,doctor,category).\r\n\r\npredicates\r\n  nondeterm rel1(fname, spec).\r\n  nondeterm rel2(spec,day,begin,end,pay).\r\n  nondeterm member(tp,schedule).\r\n  nondeterm rel3(fname,day,begin,end,office).\r\n  nondeterm rel4(office,day,begin,end).\r\n  nondeterm rel5(fname,category).\r\n  nondeterm rel6(spec,day,begin,end,office).\r\n\r\nclauses\r\n\r\nrepresent(\"\u043b\u043e\u0440\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,13,201,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,13,201,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,13,201,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",13,19,201,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",13,19,201,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0430\u043d\u0434\u0440\u0435\u0435\u0432\", \"\u0432\u0430\u0441\u0438\u043b\u0438\u0439\", \"\u0430\u043b\u0435\u043a\u0441\u0430\u043d\u0434\u0440\u043e\u0432\u0438\u0447\"),\"\u0432\u044b\u0441\u0448\u0430\u044f\").\r\nrepresent(\"\u043b\u043e\u0440\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",13,19,201,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",13,19,201,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",13,19,201,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,13,201,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,13,201,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0432\u0430\u0440\u0432\u0438\u043d\", \"\u0432\u0430\u0441\u0438\u043b\u0438\u0439\",\"\u0432\u043b\u0430\u0434\u0438\u043c\u0438\u0440\u043e\u0432\u0438\u0447\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u0445\u0438\u0440\u0443\u0440\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,202,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,202,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,202,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",13,19,202,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",13,19,202,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043f\u043b\u0443\u0442\u0430\u043b\u043e\u0432\u0430\", \"\u043e\u043b\u044c\u0433\u0430\", \"\u043c\u0438\u0445\u0430\u0439\u043b\u043e\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u0445\u0438\u0440\u0443\u0440\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",13,19,203,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",13,19,203,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,203,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,203,\"\u043f\u043b\u0430\u0442\u043d\u043e\")],doctor(\"\u043a\u0430\u0440\u0430\u0435\u0432\u0430\",\"\u0432\u0435\u0440\u043e\u043d\u0438\u043a\u0430\",\"\u0441\u0435\u0440\u0433\u0435\u0435\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u0433\u0438\u043d\u0435\u043a\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,13,204,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,13,204,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,13,204,\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",13,19,204,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",13,19,204,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0431\u0435\u0440\u0434\u0430\", \"\u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0438\u043d\", \"\u0432\u0438\u043a\u0442\u043e\u0440\u043e\u0432\u0438\u0447\"),\"\u0432\u044b\u0441\u0448\u0430\u044f\").\r\nrepresent(\"\u0433\u0438\u043d\u0435\u043a\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",13,19,204,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",13,19,204,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",13,19,204,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,13,204,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,13,204,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0431\u0430\u0441\u043b\u0430\u043a\u043e\u0432\u0430\", \"\u0435\u043b\u0435\u043d\u0430\",\"\u0434\u043c\u0438\u0442\u0440\u0438\u0435\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u043e\u043a\u0443\u043b\u0438\u0441\u0442\",[tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,13,205,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,13,205,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",13,19,205,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\u043f\u044f\u0442\u043d\u0438\u0446\u0430,13,19,205,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043f\u043e\u043f\u0440\u044b\u0436\u043a\u043e\", \"\u0442\u0430\u043c\u0430\u0440\u0430\", \"\u043c\u0443\u0445\u0430\u043c\u0435\u0434\u043e\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u043e\u043a\u0443\u043b\u0438\u0441\u0442\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",13,19,205,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",13,19,205,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,13,205,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,13,205,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043a\u0440\u043e\u0432\u043e\u043f\u0443\u0441\u043a\u043e\u0432\u0430\", \"\u043a\u0440\u0438\u0441\u0442\u0438\u043d\u0430\", \"\u0430\u043b\u0435\u043a\u0441\u0435\u0435\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u0434\u0435\u0440\u043c\u0430\u0442\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,206,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,206,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,13,206,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",13,19,206,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043d\u0438\u043a\u043e\u043b\u044c\u0441\u043a\u0438\u0439\", \"\u043a\u043e\u043d\u0441\u0442\u0430\u043d\u0442\u0438\u043d\", \"\u0444\u0435\u0434\u043e\u0440\u043e\u0432\u0438\u0447\"),\"\u0432\u044b\u0441\u0448\u0430\u044f\").\r\nrepresent(\"\u0441\u0442\u043e\u043c\u0430\u0442\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,13,207,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,13,207,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,13,207,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",13,19,207,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",13,19,207,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0438\u0432\u0430\u043d\u043e\u0432\", \"\u043e\u043b\u0435\u0433\", \"\u0432\u0438\u043a\u0442\u043e\u0440\u043e\u0432\u0438\u0447\"),\"\u0432\u044b\u0441\u0448\u0430\u044f\").\r\nrepresent(\"\u0441\u0442\u043e\u043c\u0430\u0442\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",13,19,207,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",13,19,207,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",13,19,207,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,13,207,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,13,207,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0437\u0432\u0435\u0440\u0435\u0432\", \"\u043d\u0438\u043a\u043e\u043b\u0430\u0439\", \"\u043d\u0438\u043a\u043e\u043b\u0430\u0435\u0432\u0438\u0447\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u0442\u0435\u0440\u0430\u043f\u0435\u0432\u0442\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,208,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,208,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,208,\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,208,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0433\u0430\u043b\u043a\u0438\u043d\", \"\u043a\u0438\u0440\u0438\u043b\u043b\", \"\u0441\u0435\u0440\u0433\u0435\u0435\u0432\u0438\u0447\"),\"\u0432\u044b\u0441\u0448\u0430\u044f\").\r\nrepresent(\"\u0442\u0435\u0440\u0430\u043f\u0435\u0432\u0442\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,209,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,209,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,209,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\u043f\u044f\u0442\u043d\u0438\u0446\u0430,9,19,209,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043d\u0438\u043a\u0438\u0444\u043e\u0440\u043e\u0432\u0430\", \"\u0430\u043d\u0430\u0441\u0442\u0430\u0441\u0438\u044f\", \"\u0432\u0438\u043a\u0442\u043e\u0440\u043e\u0432\u043d\u0430\"),\"\u0432\u0442\u043e\u0440\u0430\u044f\").\r\nrepresent(\"\u0442\u0435\u0440\u0430\u043f\u0435\u0432\u0442\",[tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,210,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,210,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,210,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,210,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0431\u0435\u043b\u044f\u0435\u0432\u0430\", \"\u0434\u0438\u043d\u0430\", \"\u0438\u0433\u043d\u0430\u0442\u044c\u0435\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u0442\u0435\u0440\u0430\u043f\u0435\u0432\u0442\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,211,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,211,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,211,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,211,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0441\u0432\u0435\u0442\u0438\u043a\u043e\u0432\u0430\", \"\u0438\u0440\u0438\u043d\u0430\", \"\u043f\u0435\u0442\u0440\u043e\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u0442\u0440\u0430\u0432\u043c\u0430\u0442\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,13,212,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,13,212,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,13,212,\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",13,19,212,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",13,19,212,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043c\u0430\u043a\u0430\u0440\u0435\u0432\u0438\u0447\",\"\u0430\u043b\u0435\u043a\u0441\u0430\u043d\u0434\u0440\", \"\u0441\u0435\u0440\u0433\u0435\u0435\u0432\u0438\u0447\"),\"\u0432\u044b\u0441\u0448\u0430\u044f\").\r\nrepresent(\"\u0442\u0440\u0430\u0432\u043c\u0430\u0442\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",13,19,212,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",13,19,212,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",13,19,212,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,13,212,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,13,212,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0438\u0432\u0430\u0449\u0435\u043d\u043a\u043e\", \"\u0441\u0442\u0430\u043d\u0438\u0441\u043b\u0430\u0432\", \"\u0432\u043b\u0430\u0434\u0438\u043c\u0438\u0440\u043e\u0432\u0438\u0447\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u043d\u0435\u0432\u0440\u043e\u043f\u0430\u0442\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,213,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,213,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,213,\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,213,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043f\u0430\u043a\", \"\u043f\u0435\u0442\u0440\", \"\u0435\u0432\u0433\u0435\u043d\u044c\u0435\u0432\u0438\u0447\"),\"\u0432\u044b\u0441\u0448\u0430\u044f\").\r\nrepresent(\"\u043d\u0435\u0432\u0440\u043e\u043f\u0430\u0442\u043e\u043b\u043e\u0433\",[tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,214,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,214,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,214,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,214,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043f\u043e\u043b\u044b\u043d\", \"\u0434\u043c\u0438\u0442\u0440\u0438\u0439\", \"\u043d\u0438\u043a\u043e\u043b\u0430\u0435\u0432\u0438\u0447\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u043f\u0441\u0438\u0445\u043e\u0442\u0435\u0440\u0430\u043f\u0435\u0432\u0442\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,215,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,215,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,215,\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,215,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,215,\"\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043c\u0430\u0437\u0438\u043a\u043e\u0432\u0430\", \"\u0438\u0440\u0438\u043d\u0430\",\"\u0430\u043b\u0435\u043a\u0441\u0435\u0435\u0432\u043d\u0430\"),\"\u0442\u0440\u0435\u0442\u044c\u044f\").\r\nrepresent(\"\u0440\u0435\u0432\u043c\u0430\u0442\u043e\u043b\u043e\u0433\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,216,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,216,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,216,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\u0447\u0435\u0442\u0432\u0435\u0440\u0433,9,19,216,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,216,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0437\u0432\u043e\u043d\u043a\u043e\u0432\", \"\u0432\u043b\u0430\u0434\u0438\u043c\u0438\u0440\", \"\u0430\u043d\u0430\u0442\u043e\u043b\u044c\u0435\u0432\u0438\u0447\"),\"\u0432\u0442\u043e\u0440\u0430\u044f\").\r\nrepresent(\"\u044d\u043d\u0434\u043e\u043a\u0440\u0438\u043d\u043e\u043b\u043e\u0433\",[tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,217,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,217,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,217,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,217,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0431\u0435\u0441\u043e\u0432\u0430\", \"\u044e\u043b\u0438\u044f\", \"\u0434\u043c\u0438\u0442\u0440\u0438\u0435\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u043b\u0444\u043a\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,15,218,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",13,19,218,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,218,\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,15,218,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043d\u0438\u043a\u0438\u0442\u0438\u043d\u0430\", \"\u0437\u043e\u044f\", \"\u0432\u0438\u043a\u0442\u043e\u0440\u043e\u0432\u043d\u0430\"),\"\u0442\u0440\u0435\u0442\u044c\u044f\").\r\nrepresent(\"\u043c\u0430\u0441\u0441\u0430\u0436\u0438\u0441\u0442\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",15,20,218,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,13,218,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,218,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",15,19,218,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0443\u0440\u0443\u0441\u043e\u0432\u0430\", \"\u0432\u0430\u043b\u0435\u043d\u0442\u0438\u043d\u0430\", \"\u0432\u0430\u0441\u0438\u043b\u044c\u0435\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\").\r\nrepresent(\"\u043f\u0435\u0434\u0438\u0430\u0442\u0440\",[tp(\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",9,19,219,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,219,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,219,\"\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\u0447\u0435\u0442\u0432\u0435\u0440\u0433,9,19,219,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,219,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u043f\u043b\u0435\u0442\u0442\", \"\u0430\u043d\u0434\u0440\u0435\u0439\", \"\u043f\u0435\u0442\u0440\u043e\u0432\u0438\u0447\"),\"\u0432\u0442\u043e\u0440\u0430\u044f\").\r\nrepresent(\"\u0440\u0435\u043d\u0442\u0433\u0435\u043d\u043e\u043b\u043e\u0433\",[tp(\"\u0432\u0442\u043e\u0440\u043d\u0438\u043a\",9,19,220,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0441\u0440\u0435\u0434\u0430\",9,19,220,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u0447\u0435\u0442\u0432\u0435\u0440\u0433\",9,19,220,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\"),tp(\"\u043f\u044f\u0442\u043d\u0438\u0446\u0430\",9,19,220,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\")], doctor(\"\u0448\u0430\u043d\u044c\u0433\u0438\u043d\u0430\", \"\u043a\u0441\u0435\u043d\u0438\u044f\", \"\u043e\u043b\u0435\u0433\u043e\u0432\u043d\u0430\"),\"\u043f\u0435\u0440\u0432\u0430\u044f\"). \r\n\r\n% \u041e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435, \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u044e\u0449\u0435\u0435 \u0444\u0430\u043c\u0438\u043b\u0438\u044e \u0432\u0440\u0430\u0447\u0430 \u0438 \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u0438\u0437\u0430\u0446\u0438\u044e, \u0438\u043c\u0435\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0432\u0438\u0434:\r\nrel1(F,K):-\trepresent(K,_,doctor(F,_,_),_).\r\n\r\n% \u041e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435, \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u044e\u0449\u0435\u0435 \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u0438\u0441\u0442\u0430 \u0438 \u0443\u0441\u043b\u043e\u0432\u0438\u044f \u043f\u0440\u0438\u0435\u043c\u0430(\u043f\u043b\u0430\u0442\u043d\u043e\u0435\/\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\u0435) \u0432\u043e \u0432\u0440\u0435\u043c\u0435\u043d\u0438, \u0438\u043c\u0435\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0432\u0438\u0434:\r\nrel2(S,D,B,F,O):-     represent(S,L,_,_), member(tp(D,B,F,_,O),L).\r\n\r\n member(X,[X|_]).\r\n member(X,[_|Y]):-member(X,Y).\r\n\r\n% \u041e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435, \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u044e\u0449\u0435\u0435 \u0444\u0430\u043c\u0438\u043b\u0438\u044e \u0432\u0440\u0430\u0447\u0430, \u043c\u0435\u0441\u0442\u043e \u0438 \u0432\u0440\u0435\u043c\u044f \u043f\u0440\u0438\u0435\u043c\u0430, \u0438\u043c\u0435\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0432\u0438\u0434:\r\nrel3(S,D,B,F,K):-      represent(_,L,doctor(S,_,_),_), member(tp(D,B,F,K,_),L).\r\n\r\n% \u041e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435, \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u044e\u0449\u0435\u0435 \u0437\u0430\u043d\u044f\u0442\u043e\u0441\u0442\u044c \u043a\u0430\u0431\u0438\u043d\u0435\u0442\u0430 \u0432\u043e \u0432\u0440\u0435\u043c\u0435\u043d\u0438, \u0438\u043c\u0435\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0432\u0438\u0434:\r\nrel4(K,D,B,F):-     represent(_,L,_,_), member(tp(D,B,F,K,_), L). \r\n\r\n% \u041e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435, \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u044e\u0449\u0435\u0435 \u0444\u0430\u043c\u0438\u043b\u0438\u044e \u0432\u0440\u0430\u0447\u0430 \u0438 \u043a\u0430\u0442\u0435\u0433\u043e\u0440\u0438\u044e, \u0438\u043c\u0435\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0432\u0438\u0434:\r\nrel5(F,K):-\trepresent(_,_,doctor(F,_,_),K).\r\n\r\n% \u041e\u0442\u043d\u043e\u0448\u0435\u043d\u0438\u0435, \u0443\u0432\u044f\u0437\u044b\u0432\u0430\u044e\u0449\u0435\u0435 \u0441\u043f\u0435\u0446\u0438\u0430\u043b\u0438\u0441\u0442\u0430, \u043c\u0435\u0441\u0442\u043e \u0438 \u0432\u0440\u0435\u043c\u044f \u043f\u0440\u0438\u0435\u043c\u0430, \u0438\u043c\u0435\u0435\u0442 \u0441\u043b\u0435\u0434\u0443\u044e\u0449\u0438\u0439 \u0432\u0438\u0434:\r\nrel6(S,D,B,F,K):-      represent(S,L,_,_), member(tp(D,B,F,K,_),L).\r\n\r\ngoal\r\n rel1(\u0425,\"\u0442\u0435\u0440\u0430\u043f\u0435\u0432\u0442\").\r\n rel2(\"\u0445\u0438\u0440\u0443\u0440\u0433\",D,B,F,\"\u0431\u0435\u0441\u043f\u043b\u0430\u0442\u043d\u043e\").\r\n rel3(\"\u0437\u0432\u043e\u043d\u043a\u043e\u0432\",\"\u0441\u0440\u0435\u0434\u0430\",B,F,K).\r\n rel4(206,D,B,F).\r\n rel5(F,\"\u0432\u0442\u043e\u0440\u0430\u044f\").\r\n rel6(S,\"\u043f\u043e\u043d\u0435\u0434\u0435\u043b\u044c\u043d\u0438\u043a\",B,F,218).<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>\u041f\u0440\u0438\u043c\u0435\u0440 \u043a\u043e\u043d\u0442\u0440\u043e\u043b\u044c\u043d\u043e\u0439 \u0440\u0430\u0431\u043e\u0442\u044b:\u00a0 \u041f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0438\u0440\u043e\u0432\u0430\u043d\u0438\u0435 \u0431\u0430\u0437 \u0437\u043d\u0430\u043d\u0438\u0439 \u0432 \u0441\u0440\u0435\u0434\u0435 Visual Prolog. \u0426\u0435\u043b\u044c \u0440\u0430\u0431\u043e\u0442\u044b: \u0421\u043e\u0437\u0434\u0430\u043d\u0438\u0435 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u043d\u043e\u0439 \u0441\u0438\u0441\u0442\u0435\u043c\u044b, \u0440\u0435\u0430\u043b\u0438\u0437\u0443\u044e\u0449\u0435\u0439 \u0431\u0430\u0437\u0443 \u0437\u043d\u0430\u043d\u0438\u0439 \u0432 \u0441\u0440\u0435\u0434\u0435 Visial Prolog. \u0420\u0430\u0431\u043e\u0442\u0430 \u0431\u044b\u043b\u0430 \u0441\u0434\u0430\u043d\u0430 \u0438 \u0437\u0430\u0447\u0442\u0435\u043d\u0430. \u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0442\u043e\u043b\u044c\u043a\u043e \u0432 \u043a\u0430\u0447\u0435\u0441\u0442\u0432\u0435 \u043f\u0440\u0438\u043c\u0435\u0440\u0430! \u0412\u044b\u0441\u044b\u043b\u0430\u0442\u044c \u0435\u0435 \u043f\u0440\u044f\u043c\u043e \u0432 \u0442\u0430\u043a\u043e\u043c \u0432\u0438\u0434\u0435 \u043a\u0430\u0442\u0435\u0433\u043e\u0440\u0438\u0447\u0435\u0441\u043a\u0438 \u043d\u0435 \u0440\u0435\u043a\u043e\u043c\u0435\u043d\u0434\u0443\u0435\u0442\u0441\u044f!<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[13],"tags":[72,71,1738],"class_list":["post-736","post","type-post","status-publish","format-standard","hentry","category-education","tag-prolog","tag-visual-prolog","tag-tusur"],"_links":{"self":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/posts\/736"}],"collection":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/comments?post=736"}],"version-history":[{"count":0,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/posts\/736\/revisions"}],"wp:attachment":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/media?parent=736"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/categories?post=736"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/tags?post=736"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}<!-- WP Super Cache is installed but broken. The constant WPCACHEHOME must be set in the file wp-config.php and point at the WP Super Cache plugin directory. -->