-- lab3_1
let arr = [1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]
map(\x -> x - (sum arr / 15)) arr

-- lab3_2
let arr = [1,2,3,4,5,6,7,8,9,10,11,12,13,14,15]

zipWith (+) (map(\x -> cos(x**2)) arr) (map(\x -> 2.97*log(x**2)**2) [1..15])

-- lab3_3

let arr = [10,20,30,40,50,60,70]
map(\x -> x `div` 10) arr