А⚙
Size: a a a
А⚙
S
А⚙
let
next i = i * (i + 2)
genIs init = takeWhile (< 300)
$ init : map next (genIs init)
in for (genIs 5) print
вот чуть более интересный способ записать то же самоеА⚙
Т8
let
init = 5
loop i = do
print $ i - 1
let nextI = i * (i + 2)
when (nextI < 300) $ loop nextI
in loop init
Т8
let
next i = i * (i + 2)
genIs init = takeWhile (< 300)
$ init : map next (genIs init)
in for (genIs 5) print
вот чуть более интересный способ записать то же самоеSP
λ
λ
Т8
λ
let
next i = i * (i + 2)
genIs init = takeWhile (< 300)
$ init : map next (genIs init)
in for (genIs 5) print
вот чуть более интересный способ записать то же самоеА⚙
Т8
AZ
λ
let
next i = i * (i + 2)
genIs init = takeWhile (< 300)
$ init : map next (genIs init)
in for (genIs 5) print
вот чуть более интересный способ записать то же самоеlet
next i = i * (i + 2)
is = 5 : map next is
in traverse (print . substract 1)
$ takeWhile (< 300) is
вот так нормAZ
Т8
AZ
AZ
Т8