Haskell GyakZH

module GyakZH where

zarojel1 = ((10 `rem` 3) == (3^(2^1))) || (((8 > ((23 `mod` 9) `div` 2)) && False) || True)
zarojel2 = 121 `mod` 9 `div` 5 == (2 ^ 3) ^ 2 - 3 * 22 - 6 && (5 > 2 * 5 ^ 2 || (3 + (7 - 2)) * 3 > 10)

locsolas = ceiling ((50 * 0.25) / 1.8)

polinom = head [i | i <- [1 ..], 3 * i ^ 5 + 4 * i ^ 3 + 7 * i ^ 2 + 4 > 1000]

soros = sum [x | x <- [50 .. 250]]
parhuzamos = recip (sum [recip x | x <- [50 .. 250]])

osztoi220 = sum [i | i <- [1 .. 220 `div` 2], 220 `mod` i == 0]
osztoi284 = sum [i | i <- [1 .. 284 `div` 2], 284 `mod` i == 0]
megoldas = sum [i | i <- [1..220 `div` 2], 220 `mod` i == 0] == 284 && sum [i | i <- [1..284 `div` 2], 284 `mod` i == 0] == 220

elso50 = [(x, [i | i <- [1 .. x], x `mod` i == 0]) | x <- [1 .. 50]]

szamharmasok = [(a, b, 150 - a - b) | b <- [1 .. 149], a <- [1 .. b], a ^ 2 + b ^ 2 == (150 - a - b) ^ 2]