isDivisibleBy42 :: Int -> Bool
isDivisibleBy42 negyvenkettovel = negyvenkettovel `mod` 42 == 0

absOfSquareDiff :: Int -> Int -> Int
absOfSquareDiff alom elet = abs (alom^2 - elet^2)

--megvizsgálom, hogy van-e olyan két oldal, aminek az összege kisebb/egyenlő a harmadikkal
areTriangleSides :: Int -> Int -> Int -> Bool
areTriangleSides hszoga hszogb hszogc = hszoga+hszogb > hszogc && hszogb+hszogc > hszoga && hszoga+hszogc > hszogb