{"id":3700,"date":"2013-09-27T20:24:03","date_gmt":"2013-09-27T18:24:03","guid":{"rendered":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/?p=3700"},"modified":"2014-09-26T17:13:08","modified_gmt":"2014-09-26T15:13:08","slug":"i1m2013-definiciones-por-composicion-de-funciones-aritmeticas","status":"publish","type":"post","link":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/i1m2013-definiciones-por-composicion-de-funciones-aritmeticas\/","title":{"rendered":"I1M2013: Definiciones por composici\u00f3n de funciones aritm\u00e9ticas"},"content":{"rendered":"<p>En la clase de hoy del curso <a href=\"http:\/\/www.cs.us.es\/~jalonso\/cursos\/i1m-13\">Inform\u00e1tica (de 1\u00ba del Grado en Matem\u00e1ticas)<\/a> se han resuelto los ejercicios de la 1\u00aa relaci\u00f3n. El objetivo de dicha relaci\u00f3n es habituar a los alumnos con el entorno de trabajo Haskell\/Emacs resolviendo ejercicios con definiciones de funciones por composici\u00f3n de las primitivas de Haskell sobre aritm\u00e9tica.<\/p>\n<p>Los ejercicios y sus soluciones se muestran a continuaci\u00f3n<br \/>\n<!--more--><\/p>\n<pre lang=\"haskell\">\n-- ---------------------------------------------------------------------\n-- Ejercicio 1. Definir la funci\u00f3n media3 tal que (media3 x y z) es\n-- la media aritm\u00e9tica de los n\u00fameros x, y y z. Por ejemplo, \n--    media3 1 3 8     ==  4.0\n--    media3 (-1) 0 7  ==  2.0\n--    media3 (-3) 0 3  ==  0.0\n-- ---------------------------------------------------------------------\n\nmedia3 x y z = (x+y+z)\/3\n\n-- ---------------------------------------------------------------------\n-- Ejercicio 2. Definir la funci\u00f3n sumaMonedas tal que \n-- (sumaMonedas a b c d e) es la suma de los euros correspondientes a \n-- a monedas de 1 euro, b de 2 euros, c de 5 euros, d 10 euros y\n-- e de 20 euros. Por ejemplo,\n--    sumaMonedas 0 0 0 0 1  ==  20\n--    sumaMonedas 0 0 8 0 3  == 100\n--    sumaMonedas 1 1 1 1 1  ==  38\n-- ---------------------------------------------------------------------\n\nsumaMonedas a b c d e = 1*a+2*b+5*c+10*d+20*e\n\n-- ---------------------------------------------------------------------\n-- Ejercicio 3. Definir la funci\u00f3n volumenEsfera tal que \n-- (volumenEsfera r) es el volumen de la esfera de radio r. Por ejemplo,\n--    volumenEsfera 10  ==  4188.790204786391\n-- Indicaci\u00f3n: Usar la constante pi.\n-- ---------------------------------------------------------------------\n\nvolumenEsfera r = (4\/3)*pi*r^3\n\n-- ---------------------------------------------------------------------\n-- Ejercicio 4. Definir la funci\u00f3n areaDeCoronaCircular tal que \n-- (areaDeCoronaCircular r1 r2) es el \u00e1rea de una corona circular de\n-- radio interior r1 y radio exterior r2. Por ejemplo,\n--    areaDeCoronaCircular 1 2 == 9.42477796076938\n--    areaDeCoronaCircular 2 5 == 65.97344572538566\n--    areaDeCoronaCircular 3 5 == 50.26548245743669\n-- ---------------------------------------------------------------------\n\nareaDeCoronaCircular r1 r2 = pi*(r2^2 -r1^2) \n\n-- ---------------------------------------------------------------------\n-- Ejercicio 5. Definir la funci\u00f3n ultimaCifra tal que (ultimaCifra x)\n-- es la \u00faltima cifra del n\u00edmero x. Por ejemplo,\n--    ultimaCifra 325  ==  5\n-- Indicaci\u00f3n: Usar la funci\u00f3n rem\n-- ---------------------------------------------------------------------\n\nultimaCifra x = rem x 10\n\n-- ---------------------------------------------------------------------\n-- Ejercicio 6. Definir la funci\u00f3n maxTres tal que (maxTres x y z) es\n-- el m\u00e1ximo de x, y y z. Por ejemplo,\n--    maxTres 6 2 4  ==  6\n--    maxTres 6 7 4  ==  7\n--    maxTres 6 7 9  ==  9\n-- Indicaci\u00f3n: Usar la funci\u00f3n max.\n-- ---------------------------------------------------------------------\n\nmaxTres x y z = max x (max y z)\n<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>En la clase de hoy del curso Inform\u00e1tica (de 1\u00ba del Grado en Matem\u00e1ticas) se han resuelto los ejercicios de la 1\u00aa relaci\u00f3n. El objetivo de dicha relaci\u00f3n es habituar a los alumnos con el entorno de trabajo Haskell\/Emacs resolviendo ejercicios con definiciones de funciones por composici\u00f3n de las primitivas de Haskell sobre aritm\u00e9tica. Los&#8230;<\/p>\n","protected":false},"author":2,"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":[222],"tags":[270,300],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_likes_enabled":false,"_links":{"self":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/posts\/3700"}],"collection":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/comments?post=3700"}],"version-history":[{"count":4,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/posts\/3700\/revisions"}],"predecessor-version":[{"id":4463,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/posts\/3700\/revisions\/4463"}],"wp:attachment":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/media?parent=3700"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/categories?post=3700"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/tags?post=3700"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}