{"id":2945,"date":"2015-02-12T12:38:42","date_gmt":"2015-02-12T11:38:42","guid":{"rendered":"http:\/\/www.valcon.it\/prova\/?p=2945"},"modified":"2017-06-15T09:56:34","modified_gmt":"2017-06-15T07:56:34","slug":"decrescita-programmata","status":"publish","type":"post","link":"https:\/\/www.valcon.it\/pascal\/decrescita-programmata\/","title":{"rendered":"Decrescita programmata"},"content":{"rendered":"<p>Matematica Senza Frontiere &#8211; 10\/2\/2015 n. 2<em><br \/>\n<\/em><\/p>\n<blockquote><p>Annamaria si diverte con le successioni numeriche.<br \/>\nSceglie un numero intero naturale come primo numero della successione; calcola il successivo moltiplicando tra loro le cifre del numero.<br \/>\nProcede analogamente con il numero ottenuto finch\u00e9 non ottiene un numero con una sola cifra.<\/p>\n<p>Ad esempio, iniziando da 68, ottiene la successione di quattro numeri 68, 48, 32, 6.<\/p>\n<p>Quale numero intero naturale inferiore a 100 comporta, seguendo il procedimento descritto, la successione pi\u00f9 lunga?<\/p><\/blockquote>\n<p><a href=\"http:\/\/www.valcon.it\/test\/decrescita-programmata\/\">Vedi la discussione.<\/a><\/p>\n<p>Il programma produce tutte le serie per i numeri da 1 a 99<\/p>\n<pre class=\"\">Uses Crt;\r\nVar  i: Integer;\r\n\r\nProcedure NUMERO(num: Integer);\r\nVar\r\n   dd, uu: Byte;\r\nBegin\r\n   Write(num, ': ');\r\n   While(num >= 10) Do\r\n      Begin\r\n         dd :=num Div 10;\r\n         uu :=num Mod 10;\r\n         num:=dd*uu;\r\n         Write(num, ' ');\r\n      End;\r\nEnd;\r\n\r\nBegin\r\n   For i:=1 To 50 Do\r\n      Begin\r\n         GotoXY(1,i);\r\n         NUMERO(i)\r\n      End;\r\n   For i:=51 To 99 Do\r\n      Begin\r\n         GotoXY(15,i-50);\r\n         NUMERO(i)\r\n      End;\r\n   GotoXY(1,52);\r\n   Readln;\r\nEnd.<\/pre>\n<p style=\"padding-left: 30px;\"><img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-full wp-image-5764\" src=\"http:\/\/www.valcon.it\/pascal\/wp-content\/uploads\/msf_2015_02_p.png\" alt=\"msf_2015_02_p\" width=\"269\" height=\"683\" srcset=\"https:\/\/www.valcon.it\/pascal\/wp-content\/uploads\/msf_2015_02_p.png 269w, https:\/\/www.valcon.it\/pascal\/wp-content\/uploads\/msf_2015_02_p-59x150.png 59w, https:\/\/www.valcon.it\/pascal\/wp-content\/uploads\/msf_2015_02_p-118x300.png 118w\" sizes=\"(max-width: 269px) 100vw, 269px\" \/><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Matematica Senza Frontiere &#8211; 10\/2\/2015 n. 2 Annamaria si diverte con le successioni numeriche. Sceglie un numero intero naturale come primo numero della successione; calcola il successivo moltiplicando tra loro le cifre del numero. Procede analogamente con il numero ottenuto finch\u00e9 non ottiene un numero con una sola cifra. Ad esempio, iniziando da 68, ottiene &#8230; <a title=\"Decrescita programmata\" class=\"read-more\" href=\"https:\/\/www.valcon.it\/pascal\/decrescita-programmata\/\" aria-label=\"Leggi di pi\u00f9 su Decrescita programmata\">Leggi tutto<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[4],"tags":[],"_links":{"self":[{"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/posts\/2945"}],"collection":[{"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/comments?post=2945"}],"version-history":[{"count":9,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/posts\/2945\/revisions"}],"predecessor-version":[{"id":5791,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/posts\/2945\/revisions\/5791"}],"wp:attachment":[{"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/media?parent=2945"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/categories?post=2945"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.valcon.it\/pascal\/wp-json\/wp\/v2\/tags?post=2945"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}