{"id":2404,"date":"2010-05-11T12:37:46","date_gmt":"2010-05-11T08:37:46","guid":{"rendered":"http:\/\/msbro.ru\/?p=2404"},"modified":"2010-06-25T08:31:43","modified_gmt":"2010-06-25T04:31:43","slug":"pascal-rekursiya","status":"publish","type":"post","link":"https:\/\/msbro.ru\/index.php\/archives\/2404","title":{"rendered":"Pascal: \u0440\u0435\u043a\u0443\u0440\u0441\u0438\u044f"},"content":{"rendered":"<p><!--more--><\/p>\n<p><strong>\u0417\u0430\u0434\u0430\u0447\u0430 1.<\/strong><\/p>\n<p><em>\u0418\u0441\u043f\u043e\u043b\u044c\u0437\u043e\u0432\u0430\u0442\u044c \u0440\u0435\u043a\u0443\u0440\u0441\u0438\u044e \u0434\u043b\u044f \u043d\u0430\u0445\u043e\u0436\u0434\u0435\u043d\u0438\u044f \u0446\u0438\u0444\u0440\u043e\u0432\u043e\u0433\u043e \u043a\u043e\u0440\u043d\u044f \u0446\u0435\u043b\u043e\u0433\u043e \u0447\u0438\u0441\u043b\u0430.<\/em><\/p>\n<p>\u0426\u0438\u0444\u0440\u043e\u0432\u043e\u0439 \u043a\u043e\u0440\u0435\u043d\u044c \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0441\u0443\u043c\u043c\u043e\u0439 \u0447\u0435\u0440\u0435\u0437 \u0441\u0443\u043c\u043c\u0443 \u0446\u0438\u0444\u0440 \u0447\u0438\u0441\u043b\u0430 \u0434\u043e \u0442\u0435\u0445 \u043f\u043e\u0440, \u043f\u043e\u043a\u0430 \u044d\u0442\u0430 \u0441\u0443\u043c\u043c\u0430 \u0441\u0430\u043c\u0430 \u043d\u0435 \u0441\u0442\u0430\u043d\u0435\u0442 \u0446\u0438\u0444\u0440\u043e\u0439. \u041d\u0430\u043f\u0440\u0438\u043c\u0435\u0440, \u0434\u043b\u044f \u0447\u0438\u0441\u043b\u0430 9999999 \u0446\u0438\u0444\u0440\u043e\u0432\u043e\u0439 \u043a\u043e\u0440\u0435\u043d\u044c \u043d\u0430\u0445\u043e\u0434\u0438\u0442\u0441\u044f \u0442\u0430\u043a:<\/p>\n<p>9+9+9+9+9+9+9 = 63;<br \/>\n6+3 = 9.<\/p>\n<p>\u0426\u0438\u0444\u0440\u043e\u0432\u043e\u0439 \u043a\u043e\u0440\u0435\u043d\u044c 9999999 \u0440\u0430\u0432\u0435\u043d \u0434\u0435\u0432\u044f\u0442\u0438.<\/p>\n<p>\u041f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u044b\u0435:<\/p>\n<p style=\"padding-left: 30px;\">\u0430) \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 num:<\/p>\n<p style=\"padding-left: 60px;\">n \u2013 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e (\u0433\u043b\u043e\u0431\u0430\u043b\u044c\u043d\u0430\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f);<br \/>\ns \u2013 \u0432\u0441\u043f\u043e\u043c\u043e\u0433\u0430\u0442\u0435\u043b\u044c\u043d\u0430\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f (\u043b\u043e\u043a\u0430\u043b\u044c\u043d\u0430\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f);<\/p>\n<p style=\"padding-left: 30px;\">\u0431) \u0432 \u0444\u0443\u043d\u043a\u0446\u0438\u0438 root:<\/p>\n<p style=\"padding-left: 60px;\">n \u2013 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e (\u0433\u043b\u043e\u0431\u0430\u043b\u044c\u043d\u0430\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f);<\/p>\n<p style=\"padding-left: 30px;\">\u0432) \u0432 \u043e\u0441\u043d\u043e\u0432\u043d\u043e\u0439 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0435:<\/p>\n<p style=\"padding-left: 60px;\">n \u2013 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e (\u0433\u043b\u043e\u0431\u0430\u043b\u044c\u043d\u0430\u044f \u043f\u0435\u0440\u0435\u043c\u0435\u043d\u043d\u0430\u044f).<\/p>\n<p><span style=\"text-decoration: underline;\">\u0410\u043b\u0433\u043e\u0440\u0438\u0442\u043c \u0440\u0435\u0448\u0435\u043d\u0438\u044f \u0437\u0430\u0434\u0430\u0447\u0438:<\/span><\/p>\n<ol>\n<li> \u0441\u043e\u0437\u0434\u0430\u0435\u043c \u043e\u043f\u0438\u0441\u0430\u043d\u0438\u0435 \u0444\u0443\u043d\u043a\u0446\u0438\u0439 num \u0438 root;<\/li>\n<li>\u0432\u0432\u043e\u0434\u0438\u043c \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e n;<\/li>\n<li>\u0432\u044b\u0437\u044b\u0432\u0430\u0435\u043c \u0440\u0435\u043a\u0443\u0440\u0441\u0438\u0432\u043d\u0443\u044e \u0444\u0443\u043d\u043a\u0446\u0438\u044e root \u0438 \u043e\u043f\u0440\u0435\u0434\u0435\u043b\u044f\u0435\u043c \u0446\u0438\u0444\u0440\u043e\u0432\u043e\u0439 \u043a\u043e\u0440\u0435\u043d\u044c \u0447\u0438\u0441\u043b\u0430 n;<\/li>\n<li>\u0437\u0430\u0432\u0435\u0440\u0448\u0430\u0435\u043c \u0440\u0430\u0431\u043e\u0442\u0443 \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u044b.<\/li>\n<\/ol>\n<pre>var n:longint;\r\nfunction num(i:longint):integer;\r\n var  s: integer;\r\nbegin\r\n  s:=0;\r\n  repeat\r\n    s:=s+n mod 10;\r\n    n:= n div 10;\r\n until n=0;\r\n num:=s;\r\nend;\r\nfunction root(l:longint):integer;\r\nbegin\r\n   if n&lt;10 then root:=n\r\n      else\r\n        begin\r\n        n:=num(n);\r\n        root:=root(n);\r\n        end;\r\nend;\r\n\r\nbegin\r\n  write('\u0412\u0432\u0435\u0434\u0438\u0442\u0435 \u0446\u0435\u043b\u043e\u0435 \u0447\u0438\u0441\u043b\u043e n=');\r\n  readln(n);\r\n  writeln('\u0415\u0433\u043e \u0446\u0438\u0444\u0440\u043e\u0432\u043e\u0439 \u043a\u043e\u0440\u0435\u043d\u044c \u0440\u0430\u0432\u0435\u043d : ', root(n));\r\nend.\r\n<\/pre>\n<p><strong>\u0417\u0430\u0434\u0430\u0447\u0430 2.<br \/>\n<\/strong><\/p>\n<p><em>\u041d\u0430\u043f\u0438\u0448\u0438\u0442\u0435 \u0440\u0435\u043a\u0443\u0440\u0441\u0438\u0432\u043d\u0443\u044e \u043f\u0440\u043e\u0433\u0440\u0430\u043c\u043c\u0443 \u0432\u044b\u0447\u0438\u0441\u043b\u0435\u043d\u0438\u044f \u0441\u0443\u043c\u043c\u044b  .<\/em><\/p>\n<pre>var n : integer;\r\nfunction sum(i : integer) : real;\r\nbegin\r\n    if i=1 then sum:=0 else sum:=sum(i\u20131)+i*i+i+5;\r\nend;\r\n\r\nbegin\r\nwriteln('\u0412\u0432\u0435\u0434\u0438\u0442\u0435 n');\r\nreadln(n);\r\nwriteln('\u0417\u043d\u0430\u0447\u0435\u043d\u0438\u0435 \u0441\u0443\u043c\u043c\u044b \u0440\u0430\u0432\u043d\u043e \u2013 ', sum(n));\r\nend.\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[600,13],"tags":[599,605],"class_list":["post-2404","post","type-post","status-publish","format-standard","hentry","category-programming","category-education","tag-pascal","tag-rekursiya"],"_links":{"self":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/posts\/2404"}],"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=2404"}],"version-history":[{"count":0,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/posts\/2404\/revisions"}],"wp:attachment":[{"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/media?parent=2404"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/categories?post=2404"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/msbro.ru\/index.php\/wp-json\/wp\/v2\/tags?post=2404"}],"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. -->