ahypki/wmi-parprog
12
16
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

'Backup'

Browse Source
This commit is contained in:
Arkadiusz Hypki 2024-06-03 10:14:42 +02:00
parent 3763ad94eb
commit 682e2e3097
1 changed files with 8 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
08_Haskell/ex1-tutorial.hs
View File

@ -4,6 +4,7 @@ main = do
print [1..10] print [1..10]
-- fType :: Int -> Int -> Int -- fType :: Int -> Int -> Int
-- fType x y = x*x + y*y -- fType x y = x*x + y*y
-- main = print (fType 2 4) -- main = print (fType 2 4)
@ -12,7 +13,7 @@ main = do
-- fType :: Integer -> Integer -> Integer -- fType :: Integer -> Integer -> Integer
-- fType x y = x*x + y*y -- fType x y = x*x + y*y
--main = print (fType 212124454 4454545445455454545445445454544544638247328432894364872648762378462378647823547267865435843685734857394785) -- main = print (fType 212124454 44545454454554545454454454545445446382473284328943648726487623784623786478235472678654358436857348573947854454545445455454545445445454544544638247328432894364872648762378462378647823547267865435843685734857394785)
@ -94,12 +95,11 @@ main = do
-- multList n (x:xs) = n*x : multList n xs -- multList n (x:xs) = n*x : multList n xs
-- tripleList = multList 3 -- tripleList = multList 3
-- doubleList = multList 2 -- doubleList = multList 2
-- main = do -- main = do
-- let x = [1..10] -- let x = [1..10]
-- putStrLn "Our list is:" -- putStrLn "Our list is:"
-- print (x) -- print (x)
-- --print (doubleListA x) -- print (doubleListA x)
-- print (doubleList x) -- print (doubleList x)
@ -121,7 +121,6 @@ main = do
-- import Data.List -- import Data.List
-- main = do -- main = do
-- putStrLn("Different methods of List Module") -- putStrLn("Different methods of List Module")
-- print(intersperse '.' "Tutorialspoint.com") -- print(intersperse '.' "Tutorialspoint.com")
@ -130,9 +129,3 @@ main = do
-- print (sort [8,5,3,2,1,6,4,2]) -- print (sort [8,5,3,2,1,6,4,2])
-- factors n = [x | x <- [1..n], mod n x == 0]
-- prime n = factors n == [1,n]
-- main = do
-- print (prime 9)
-- print (prime 19)