Hom4ikTop4ik / 23217_MartynovBogdan

0 stars 0 forks source link

Семинар 1 #13

Closed denisenes closed 1 month ago

denisenes commented 4 months ago

В 3 задании do нотация запрещена :)

Hom4ikTop4ik commented 4 months ago

Да-да, исправил Но делать как лучше:

sumTwoInts = (readLn :: IO Int) >>= (\x ->
              (readLn :: IO Int) >>= (\y ->
                print (x+y) ) )

или

sumTwoInts = readInt >>= (\x ->
              readInt >>= (\y ->
                print (x+y) ) )
                  where readInt = readLn :: IO Int

?

denisenes commented 3 months ago

Оба варианта вполне приемлемы, на вкус и цвет

denisenes commented 3 months ago

Персональное задание: перепиши 2 задание в do нотацию И после этого все будет засчитано

denisenes commented 1 month ago

Отлично!