--isVowel :: Char -> Bool --isVowel vowel -- |vowel == 'a' || vowel == 'e' || vowel == 'i' || vowel == 'o' || vowel == 'u' = True -- |otherwise = False -- isNegative :: Float -> Bool -- isNegative inputNum = if inputNum < 0 then True else False -- middleNumber :: Integer -> Integer -> Integer -> Integer -- middleNumber x y z -- |x > y && x < z || x > z && x < y = x -- |y > x && y < z || y > z && y < x = y -- |otherwise = z --triangleArea :: Integer -> Integer -> Float --triangleArea a b = (fromIntegral a * fromIntegral b) * 0.5 nor :: Bool -> Bool -> Bool nor a b | a == True && b == True = False | a == False && b == True = False | a == True && b == False = False | a == False && b == False = True hasRemainder :: Integer -> Integer -> Bool hasRemainder divisor divised = if div divisor divised == 0 then False else True letterGrade :: Integer -> String letterGrade grade | grade >= 0 && grade < 60 = "F" | grade >= 60 && grade < 70 = "D" | grade >= 70 && grade < 80 = "C" | grade >= 80 && grade < 90 = "B" | otherwise = "A" averageThree :: Integer -> Integer -> Integer-> Float averageThree num num1 num2 = (fromIntegral num + fromIntegral num1 +fromIntegral num2) / 3 tripleNumber :: Integer -> Integer tripleNumber num |num <= 100 = num * 3 |otherwise = num -- howManyBelowAverage :: Integer -> Integer -> integer -> Float -- howManyBelowAverage num num1 num2 -- |num < averageThree num num1 num2 -- |otherwise = 2.0 main = print(tripleNumber 101)
We use cookies to provide and improve our services. By using our site, you consent to our Cookies Policy. Accept Learn more