{"id":1637,"date":"2015-10-29T06:00:13","date_gmt":"2015-10-29T04:00:13","guid":{"rendered":"http:\/\/www.glc.us.es\/~jalonso\/exercitium\/?p=1637"},"modified":"2015-11-05T08:14:30","modified_gmt":"2015-11-05T06:14:30","slug":"proximos-a-multiplos-de-6","status":"publish","type":"post","link":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/proximos-a-multiplos-de-6\/","title":{"rendered":"Pr\u00f3ximos a m\u00faltiplos de 6"},"content":{"rendered":"<p>Se dice que un par de n\u00fameros (x,y) est\u00e1 pr\u00f3ximo a un m\u00faltiplo de 6 si es de la forma <code>(6*n-1,6*n+1)<\/code>. Por ejemplo, (17,19) est\u00e1 cerca de un m\u00faltiplo de 6 porque (17,19) = <code>(6*3-1,6*3+1)<\/code>.<\/p>\n<p>Definir la funci\u00f3n<\/p>\n<pre lang=\"text\">\n   proximosAmultiplosDe6 :: (Integer,Integer) -> Bool\n<\/pre>\n<p>tal que (proximosAmultiplosDe6 (x,y)) se verifica si el par (x,y) est\u00e1 pr\u00f3ximo a un m\u00faltiplo de 6. Por ejemplo,<\/p>\n<pre lang=\"text\">\n   proximosAmultiplosDe6 (17,19)                          ==  True\n   proximosAmultiplosDe6 (18,20)                          ==  False\n   proximosAmultiplosDe6 (5,19)                           ==  False\n   proximosAmultiplosDe6 (1,3)                            ==  False\n   proximosAmultiplosDe6 (74074073407403,74074073407405)  ==  True\n   proximosAmultiplosDe6 (86419752308637,86419752308639)  ==  False\n<\/pre>\n<h4>Soluciones<\/h4>\n<pre lang=\"haskell\">\n-- 1\u00aa soluci\u00f3n\nproximosAmultiplosDe6 :: (Integer,Integer) -> Bool\nproximosAmultiplosDe6 (x,y) =\n    (x+1) `mod` 6 == 0 && y == 6*n+1\n    where n = (x+1) `div` 6\n\n-- 2\u00aa soluci\u00f3n\nproximosAmultiplosDe6' :: (Integer,Integer) -> Bool\nproximosAmultiplosDe6' (a,b) = \n    a+1 == b-1 && mod (a+b) 6 == 0\n<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>Se dice que un par de n\u00fameros (x,y) est\u00e1 pr\u00f3ximo a un m\u00faltiplo de 6 si es de la forma (6*n-1,6*n+1). Por ejemplo, (17,19) est\u00e1 cerca de un m\u00faltiplo de 6 porque (17,19) = (6*3-1,6*3+1). Definir la funci\u00f3n proximosAmultiplosDe6 :: (Integer,Integer) -> Bool tal que (proximosAmultiplosDe6 (x,y)) se verifica si el par (x,y) est\u00e1 pr\u00f3ximo&#8230;<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_kad_post_transparent":"","_kad_post_title":"","_kad_post_layout":"","_kad_post_sidebar_id":"","_kad_post_content_style":"","_kad_post_vertical_padding":"","_kad_post_feature":"","_kad_post_feature_position":"","_kad_post_header":false,"_kad_post_footer":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"footnotes":"","_jetpack_memberships_contains_paid_content":false},"categories":[4],"tags":[30,89],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/posts\/1637"}],"collection":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/comments?post=1637"}],"version-history":[{"count":4,"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/posts\/1637\/revisions"}],"predecessor-version":[{"id":1682,"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/posts\/1637\/revisions\/1682"}],"wp:attachment":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/media?parent=1637"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/categories?post=1637"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/exercitium\/wp-json\/wp\/v2\/tags?post=1637"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}