{"id":1637,"date":"2011-10-26T15:20:36","date_gmt":"2011-10-26T15:20:36","guid":{"rendered":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/?p=1637"},"modified":"2013-03-08T05:49:01","modified_gmt":"2013-03-08T05:49:01","slug":"i1m2011-1%c2%ba-examen-de-la-evaluacion-continua","status":"publish","type":"post","link":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/i1m2011-1%c2%ba-examen-de-la-evaluacion-continua\/","title":{"rendered":"I1M2011: 1\u00ba examen de la evaluaci\u00f3n continua"},"content":{"rendered":"<p>En la clase de hoy de <a href=\"http:\/\/www.cs.us.es\/~jalonso\/cursos\/i1m-11\">Inform\u00e1tica de 1\u00ba del Grado en Matem\u00e1ticas<\/a> se ha realizado el 1\u00ba examen de la evaluaci\u00f3n continua. <\/p>\n<p>En este examen s\u00f3lo se incluyen definiciones elementales de Haskell an\u00e1logas a las presentadas en las dos primeras relaciones de ejercicios y tiene como principal objetivo medir la adaptaci\u00f3n al entorno de trabajo con Haskell y Emacs. <\/p>\n<p>\nA continuaci\u00f3n se muestra el examen junto con su soluci\u00f3n:<br \/>\n<!--more--><\/p>\n<pre lang=\"haskell\">\r\n-- Inform\u00e1tica (1\u00ba del Grado en Matem\u00e1ticas)\r\n-- 1\u00ba examen de evaluaci\u00f3n continua (26 de octubre de 2011)\r\n-- ---------------------------------------------------------------------\r\n\r\n-- ---------------------------------------------------------------------\r\n-- Ejercicio 1. Definir la funci\u00f3n numeroDeRaices tal que \r\n-- (numeroDeRaices a b c) es el n\u00famero de ra\u00edces reales de la ecuaci\u00f3n \r\n-- a*x^2 + b*x + c = 0. Por ejemplo,\r\n--    numeroDeRaices 2 0 3    ==  0\r\n--    numeroDeRaices 4 4 1    ==  1\r\n--    numeroDeRaices 5 23 12  ==  2\r\n-- ---------------------------------------------------------------------\r\n\r\nnumeroDeRaices a b c | d < 0     = 0\r\n                     | d == 0    = 1\r\n                     | otherwise = 2\r\n               where d = b^2-4*a*c\r\n\r\n-- ---------------------------------------------------------------------\r\n-- Ejercicio 2. Las dimensiones de los rect\u00e1ngulos puede representarse \r\n-- por pares; por ejemplo, (5,3) representa a un rect\u00e1ngulo de base 5 y \r\n-- altura 3. Definir la funci\u00f3n mayorRectangulo tal que \r\n-- (mayorRectangulo r1 r2) es el rect\u00e1ngulo de mayor \u00e1rea ente r1 y r2. \r\n-- Por ejemplo,  \r\n--    mayorRectangulo (4,6) (3,7)  ==  (4,6)\r\n--    mayorRectangulo (4,6) (3,8)  ==  (4,6)\r\n--    mayorRectangulo (4,6) (3,9)  ==  (3,9)\r\n-- ---------------------------------------------------------------------\r\n\r\nmayorRectanglo (a,b) (c,d) | a*b >= c*d = (a,b)\r\n                           | otherwise = (c,d)\r\n\r\n-- ---------------------------------------------------------------------\r\n-- Ejercicio 3. Definir la funci\u00f3n interior tal que (interior xs) es la\r\n-- lista obtenida eliminando los extremos de la lista xs. Por ejemplo,\r\n--    interior [2,5,3,7,3]  ==  [5,3,7]\r\n--    interior [2..7]       ==  [3,4,5,6]\r\n-- ---------------------------------------------------------------------\r\n\r\ninterior xs = tail (init xs)\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"<p>En la clase de hoy de Inform\u00e1tica de 1\u00ba del Grado en Matem\u00e1ticas se ha realizado el 1\u00ba examen de la evaluaci\u00f3n continua. En este examen s\u00f3lo se incluyen definiciones elementales de Haskell an\u00e1logas a las presentadas en las dos primeras relaciones de ejercicios y tiene como principal objetivo medir la adaptaci\u00f3n al entorno de&#8230;<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","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":[186],"tags":[295],"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\/1637"}],"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=1637"}],"version-history":[{"count":6,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/posts\/1637\/revisions"}],"predecessor-version":[{"id":2927,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/posts\/1637\/revisions\/2927"}],"wp:attachment":[{"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/media?parent=1637"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/categories?post=1637"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.glc.us.es\/~jalonso\/vestigium\/wp-json\/wp\/v2\/tags?post=1637"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}