diff --git a/lab2/draw_fern.ipynb b/lab2/draw_fern.ipynb index 13a99cc..35fde18 100644 --- a/lab2/draw_fern.ipynb +++ b/lab2/draw_fern.ipynb @@ -16,8 +16,9 @@ "outputs": [], "source": [ "with open('test.txt', 'r', encoding='utf-16') as file:\n", - " data_str = file.read()\n", + " lines = file.readlines()\n", "\n", + "data_str = ''.join(lines[1:])\n", "x, y = list(zip(*eval(data_str)))" ] }, diff --git a/lab2/fern.hs b/lab2/fern.hs index e770f83..60308b7 100644 --- a/lab2/fern.hs +++ b/lab2/fern.hs @@ -35,5 +35,8 @@ barnsleyFern start n = do main :: IO () main = do - fractal <- barnsleyFern (0, 0) 1000 - print fractal + putStrLn "Укажите количество шагов рекурсии:" + input <- getLine + let n = read input :: Int + fractal <- barnsleyFern (0, 0) n + print fractal \ No newline at end of file