summaryrefslogtreecommitdiff
path: root/comp/work/60
diff options
context:
space:
mode:
Diffstat (limited to 'comp/work/60')
-rwxr-xr-xcomp/work/60/questionbin0 -> 20728 bytes
-rw-r--r--comp/work/60/question.hibin0 -> 776 bytes
-rw-r--r--comp/work/60/question.hs18
-rw-r--r--comp/work/60/question.obin0 -> 8864 bytes
-rw-r--r--comp/work/60/starter8
-rw-r--r--comp/work/60/test12
6 files changed, 38 insertions, 0 deletions
diff --git a/comp/work/60/question b/comp/work/60/question
new file mode 100755
index 0000000..30d3673
--- /dev/null
+++ b/comp/work/60/question
Binary files differ
diff --git a/comp/work/60/question.hi b/comp/work/60/question.hi
new file mode 100644
index 0000000..ff75cdd
--- /dev/null
+++ b/comp/work/60/question.hi
Binary files differ
diff --git a/comp/work/60/question.hs b/comp/work/60/question.hs
new file mode 100644
index 0000000..b8970a7
--- /dev/null
+++ b/comp/work/60/question.hs
@@ -0,0 +1,18 @@
+temps = [50, 68, 95, 86]
+
+fu a = (a - 32) * 5 / 9
+
+fv b = map fu b
+
+fw [] = 0
+fw (x:xs) = 1 + fw (xs)
+
+fx [] = 0
+fx (x:xs) = x + fx (xs)
+
+fy c = fx(c) / fw(c)
+
+fz d = fy(fv(d))
+
+main = do
+ print (fz temps)
diff --git a/comp/work/60/question.o b/comp/work/60/question.o
new file mode 100644
index 0000000..e7de03e
--- /dev/null
+++ b/comp/work/60/question.o
Binary files differ
diff --git a/comp/work/60/starter b/comp/work/60/starter
new file mode 100644
index 0000000..f83dd6a
--- /dev/null
+++ b/comp/work/60/starter
@@ -0,0 +1,8 @@
+call no | arg | ret
+1 | [4,2,5,3] | 52
+2 | [2,5,3] | 24
+3 | [5, 3] | 11
+4 | [3] | 3
+5 | [] | 0
+
+
diff --git a/comp/work/60/test b/comp/work/60/test
new file mode 100644
index 0000000..ce8a64c
--- /dev/null
+++ b/comp/work/60/test
@@ -0,0 +1,12 @@
+11.1)1) 192.168.192.1
+11.1)2) 192.168.64.1
+11.1)3) 192.168.64.16
+
+11.2) C
+
+11.3) To avoid running out of avalibe ip addresses, as IPV4 has a "low" limit
+comapared to IPV6
+
+11.4) star
+
+11.5) balls