diff --git a/exercises/block1/1-leap/example-input b/exercises/block1/1-leap/example-input index e53ad42..60e1ca9 100644 --- a/exercises/block1/1-leap/example-input +++ b/exercises/block1/1-leap/example-input @@ -1,10 +1,100 @@ -1996 +2133 +1798 +2058 +2013 +1812 +1756 +1930 +2170 +2128 +1606 +1500 +1734 +1939 +1794 +1867 +1881 +2102 +1969 +1973 +2083 +2056 +2064 +1901 +1936 +1815 +1973 +2191 +1554 +2086 +1901 +1694 +1941 +2193 +2168 +1905 +1942 +1786 +1884 +1519 +1947 +1679 +1579 +1628 +2090 +1648 +1969 +1782 +1886 +1985 +2134 +2136 2001 -2020 -1900 -2004 -2100 -1600 -2012 -1800 -2024 \ No newline at end of file +1693 +1776 +2038 +1713 +1512 +1866 +2172 +1857 +1971 +1827 +2061 +2181 +1733 +1627 +1950 +1788 +1896 +1974 +1928 +1568 +2033 +1683 +1562 +2047 +2039 +1551 +1710 +1784 +1926 +1518 +2094 +1690 +1856 +1668 +1994 +1563 +2139 +1879 +2155 +2087 +1752 +2084 +1624 +1987 +1690 +1708 +1981 +2097 \ No newline at end of file diff --git a/exercises/block1/1-leap/example-output b/exercises/block1/1-leap/example-output index 5dbefa7..24c5f53 100644 --- a/exercises/block1/1-leap/example-output +++ b/exercises/block1/1-leap/example-output @@ -1,10 +1,100 @@ +False +False +False +False True +True +False False True False -True +False +False +False +False +False +False +False +False +False False True True False True +False +False +False +False +False +False +False +False +False +True +False +False +False +True +False +False +False +False +True +False +True +False +False +False +False +False +True +False +False +True +False +False +True +False +True +False +False +False +False +False +False +False +False +True +True +False +True +True +False +False +False +False +False +False +False +True +False +False +False +False +True +True +False +False +False +False +False +False +True +True +True +False +False +True +False +False diff --git a/exercises/block1/1-leap/generate.py b/exercises/block1/1-leap/generate.py new file mode 100644 index 0000000..795f0a1 --- /dev/null +++ b/exercises/block1/1-leap/generate.py @@ -0,0 +1,18 @@ +import random + +def generate_random_years(filename: str, count: int, start_year: int, end_year: int): + """ + Generate a list of random years and write them to a file. + + :param filename: Name of the output file + :param count: Number of years to generate + :param start_year: Minimum year (inclusive) + :param end_year: Maximum year (inclusive) + """ + with open(filename, 'w') as file: + for _ in range(count): + year = random.randint(start_year, end_year) + file.write(f"{year}\n") + +# Example usage +generate_random_years("example-input", count=100, start_year=1500, end_year=2200) diff --git a/exercises/block1/1-leap/leap.hs b/exercises/block1/1-leap/leap.hs index eabde88..2d18719 100644 --- a/exercises/block1/1-leap/leap.hs +++ b/exercises/block1/1-leap/leap.hs @@ -2,10 +2,6 @@ import System.IO isLeapYear :: Int -> Bool isLeapYear year -- implement here - | year `mod` 400 == 0 = True - | year `mod` 100 == 0 = False - | year `mod` 4 == 0 = True - | otherwise = False main :: IO () main = do @@ -23,3 +19,5 @@ main = do putStrLn "Errors found in leap year calculation:" mapM_ (\(y, e, a) -> putStrLn $ "Year: " ++ show y ++ ", Expected: " ++ show e ++ ", Got: " ++ show a) incorrect + -- let results = map (show . isLeapYear . read) (lines inputContent) + -- writeFile "example-output" (unlines results)