changeset 0:9bd0c4f30c49

week 1
author Markus Kaiser <markus.kaiser@in.tum.de>
date Wed, 17 Oct 2012 14:47:38 +0200
parents
children e532198d58f4
files blatt1.pdf exercises/src/Exercise_1.hs
diffstat 2 files changed, 71 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
Binary file blatt1.pdf has changed
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/exercises/src/Exercise_1.hs	Wed Oct 17 14:47:38 2012 +0200
@@ -0,0 +1,71 @@
+module Exercise_1 where
+import Test.QuickCheck
+
+{---------------------------------------------------------------------}
+{- G1.1 -}
+threeDifferent :: Integer -> Integer -> Integer -> Bool
+threeDifferent x y z = undefined
+
+fourEqual :: Integer -> Integer -> Integer -> Integer -> Bool
+fourEqual w x y z = undefined
+
+
+
+{---------------------------------------------------------------------}
+{- G1.2 -}
+fac :: Integer -> Integer
+fac n = undefined
+
+sum_ten :: Integer -> Integer
+sum_ten n = undefined
+
+
+
+{---------------------------------------------------------------------}
+{- G1.3 -}
+g :: Integer -> Integer
+g n = if n < 10 then n*n else n
+
+max_g :: Integer -> Integer
+max_g n = undefined
+
+{- Aufgabe H1.1 -}
+{-WETT-} {- Diese Zeile nicht entfernen -}
+sum_max_sq :: Integer -> Integer -> Integer -> Integer
+sum_max_sq x y z = undefined
+
+{-TTEW-} {- Diese Zeile nicht enfernen! -}
+
+
+
+
+{---------------------------------------------------------------------}
+{- Aufgabe H1.2 -}
+
+{- Teil 1 -}
+f :: Integer -> Integer
+f n = undefined
+
+{- Teil 2 -}
+{-
+ - Schreiben Sie ihre Lösungen in diesen Kommentar
+ -}
+
+{- Teil 3 -}
+f' :: Integer -> Integer
+f' n = undefined
+
+{-   Quickcheck test -}
+
+
+
+{---------------------------------------------------------------------}
+{- Aufgabe H1.3 -}
+
+{- Teil 1 -}
+is_square' :: Integer -> Integer -> Bool
+is_square' n m = undefined
+
+{- Teil 2 -}
+is_square :: Integer -> Bool
+is_square n = undefined