Advertisement
Guest User

Untitled

a guest
Nov 15th, 2018
100
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.13 KB | None | 0 0
  1. USE func;
  2.  
  3. DROP FUNCTION IF EXISTS MCD;
  4.  
  5. DELIMITER //
  6. CREATE FUNCTION MCD(x INTEGER, y INTEGER) RETURNS INTEGER
  7. BEGIN
  8. DECLARE aux INTEGER;
  9. SET aux = 0;
  10. WHILE (true) DO
  11.  
  12. WHILE (x>y) DO
  13. SET x = x-y;
  14. END WHILE;
  15.  
  16. IF (x==0) THEN
  17. RETURN y;
  18. ELSE
  19. aux=x;
  20. x=y;
  21. y=aux;
  22. END IF;
  23.  
  24. END WHILE;
  25.  
  26. DELIMITER ;
  27.  
  28.  
  29.  
  30.  
  31.  
  32. USE func;
  33.  
  34. DROP FUNCTION IF EXISTS Dia;
  35.  
  36. DELIMITER //
  37. CREATE FUNCTION Dia(dia INTEGER) RETURNS varchar(20)
  38. BEGIN
  39. IF (dia == 1) THEN RETURN 'lunes';
  40. ELSEIF (dia == 2) THEN RETURN 'martes';
  41. ELSEIF (dia == 3) THEN RETURN 'miercoles';
  42. ELSEIF (dia == 4) THEN RETURN 'jueves';
  43. ELSEIF (dia == 5) THEN RETURN 'viernes';
  44. ELSEIF (dia == 6) THEN RETURN 'sabado';
  45. ELSEIF (dia == 7) THEN RETURN 'domingo';
  46. ELSE RETURN 'numero invalido';
  47. END IF
  48.  
  49. END
  50. DELIMITER ;
  51.  
  52.  
  53.  
  54.  
  55. USE func;
  56.  
  57. DROP FUNCTION IF EXISTS Edad;
  58.  
  59. DELIMITER //
  60. CREATE FUNCTION Edad(nac DATE) RETURNS INTEGER
  61. BEGIN
  62. DECLARE ahora DATE;
  63. DECLARE today INTEGER;
  64. DECLARE tomonth INTEGER;
  65. DECLARE toyear INTEGER;
  66. END
  67. DELIMITER ;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement