С
Size: a a a
С
С
V
AZ

Т8
AZ
AZ
AZ
AZ
V
С
V
С
λ
import Data.Foldable
main =
let is = iterate (\i -> i*(i+2)) 5
xs = [x | i <- is, let x = i - 1, x < 300]
in traverse_ print xsV
С
С
AZ
λ
filter (< 300) [1 ..] зависаетAZ
filter (< 300) [1 ..] зависает