From b68323cca1fbf07cba44173ff8db063739ffc78a Mon Sep 17 00:00:00 2001
From: Andrew <mrcluster@ya.ru>
Date: Sat, 11 Jan 2020 13:11:02 +0700
Subject: [PATCH] 1sem, 7 work in octave

---
 1sem/octave/07/07.zip           | Bin 0 -> 1015 bytes
 1sem/octave/07/main.m           |  17 ++++++
 1sem/octave/07/print_num_code.m |   3 +
 1sem/octave/07/read_num_code.m  |   6 ++
 1sem/octave/07/results.txt      | 101 ++++++++++++++++++++++++++++++++
 5 files changed, 127 insertions(+)
 create mode 100644 1sem/octave/07/07.zip
 create mode 100644 1sem/octave/07/main.m
 create mode 100644 1sem/octave/07/print_num_code.m
 create mode 100644 1sem/octave/07/read_num_code.m
 create mode 100644 1sem/octave/07/results.txt

diff --git a/1sem/octave/07/07.zip b/1sem/octave/07/07.zip
new file mode 100644
index 0000000000000000000000000000000000000000..a2c8d9ddd0c336506c1a438da07e8e786ea3f4fd
GIT binary patch
literal 1015
zcmWIWW@Zs#U|`^2*p#Cca92TJ{WFl)!^ptE2BdQnGxPLvWBU(g9X1efdC&I$@Ps5C
z=a@-q+b8H}-ip{7mXNew$kVU*)%NnGEK*#Tl+x1fuZwFq%ci@<&{<}k%K6;Lo+CGs
zcWZN-yKDQuK6hl*H<4$CZPzQhzY2XVzw2>i-roZkSBZ#ToD(pUxm$lqTKlFMUvwYd
zvkQH+Ey8@I$MP>${ZA^-rUksu?OXO~<B_OySy!j99#E|EeCp^vZ+Y^29?iO*6P@~Z
z=L>agsr2%=fA|0Pl+=LMJxd(^1-<0^#`ybY^JInz-_Naf4WG&PM(KsoYr%_(+N;WI
zROL?|s50-A*!Ao{x3%@cdF}$UH=S^;yWg)Da8GmQ{s4Hed`s2}xMZ^>(j6Ea{y;1M
z#05o}c_s0ArMdCR`6;P-x!&4mz4cC>IUn4i*B81WG(bb+)EVv0^V(;7{m=P(UOjO+
z@Py~t%TJyL1!%B&EnlK0t(y8Q^U1U24NH0+IZP5zy|yQ2Wu+zq!qRQ2+5xRx77L<)
zmSq4jKM)tCCZ=Gu^ISLBPA^{{gq0fCK(?J=_EJfGCb@Kp8nf#fN2i&YTt}taW^rxX
z#`UW0m4e^|qu6NH#XII)+4E%*&x}J?_K3vkDKH{A<1^41PZoZjvKMIm7bXS<Zm=_o
zOLIz!^-3yAa)TWC4jXXn{>)`3z<F!S-wS!a|JN$q^x5#WNuw`!&YpX_Qf*(Q>GjXr
zecI}(ZB%f#|GPigMQ+m%E4N(?J9@L!wfE;lgUPb(Yfjxd`6GJwp<R;?dC7--y&e3q
zznSm3kOeCzkLSt73>VY#HyXB2SXl1=C_kd7UHXtt7_$VcSYjFr_u=qWR^Atl-pW1j
z$znOV`=Oe`LpGQG*-K1raW<QHFf5x`*nC&F)LM{h6Qlg*h3$SJzdxo5n8lr{5Rwn@
zW@Hj!z@7AgUS(ipPykUt0Lci*da$JnkV=RiabN~QPbJ8@u|+UKHz@m|MK`i$Y|(<y
dEDVgOqEvV!1$eW9axw!85WWD?KY`K=3;-VicYFW<

literal 0
HcmV?d00001

diff --git a/1sem/octave/07/main.m b/1sem/octave/07/main.m
new file mode 100644
index 0000000..a3f4bdd
--- /dev/null
+++ b/1sem/octave/07/main.m
@@ -0,0 +1,17 @@
+#  33 - additive - 4
+len = 4;
+outf = fopen('results.txt', 'w');
+fprintf(outf, 'dk %d\n', len); 
+maxn = 2^(len - 1) - 1;
+
+for n = randi([-maxn maxn], 1, 100)
+  nstr = print_num_code(n, len);
+  nback = read_num_code(nstr);
+  fprintf(outf, '%d %s\n', n, nstr);
+  
+  if nback ~= n
+    error("`%d` not equal to `%d` (converted from `%s`)\n", n, nback, nstr);
+  end
+end
+
+fclose(outf);
diff --git a/1sem/octave/07/print_num_code.m b/1sem/octave/07/print_num_code.m
new file mode 100644
index 0000000..8c6b980
--- /dev/null
+++ b/1sem/octave/07/print_num_code.m
@@ -0,0 +1,3 @@
+function [s] =  print_num_code(n, len)
+  s = dec2bin(mod(n, 2^len), len);
+end
\ No newline at end of file
diff --git a/1sem/octave/07/read_num_code.m b/1sem/octave/07/read_num_code.m
new file mode 100644
index 0000000..11268be
--- /dev/null
+++ b/1sem/octave/07/read_num_code.m
@@ -0,0 +1,6 @@
+function [n] =  read_num_code(s)
+  n = bin2dec(s);
+  if s(1) == '1'
+    n -= 2^length(s);
+  end
+end
\ No newline at end of file
diff --git a/1sem/octave/07/results.txt b/1sem/octave/07/results.txt
new file mode 100644
index 0000000..86f0212
--- /dev/null
+++ b/1sem/octave/07/results.txt
@@ -0,0 +1,101 @@
+dk 4
+-7 1001
+7 0111
+-3 1101
+0 0000
+6 0110
+3 0011
+-2 1110
+-2 1110
+-7 1001
+-5 1011
+2 0010
+4 0100
+4 0100
+-4 1100
+-4 1100
+-4 1100
+0 0000
+6 0110
+-6 1010
+-3 1101
+2 0010
+-6 1010
+-1 1111
+-2 1110
+-2 1110
+-3 1101
+2 0010
+7 0111
+-6 1010
+0 0000
+2 0010
+2 0010
+-2 1110
+-6 1010
+4 0100
+-6 1010
+4 0100
+3 0011
+4 0100
+-3 1101
+-4 1100
+1 0001
+-3 1101
+3 0011
+-4 1100
+-1 1111
+6 0110
+1 0001
+1 0001
+7 0111
+2 0010
+3 0011
+-2 1110
+0 0000
+5 0101
+5 0101
+-4 1100
+-7 1001
+-4 1100
+0 0000
+2 0010
+-6 1010
+-6 1010
+-3 1101
+-5 1011
+4 0100
+-7 1001
+1 0001
+-6 1010
+-7 1001
+-5 1011
+5 0101
+-5 1011
+-6 1010
+-7 1001
+0 0000
+1 0001
+5 0101
+2 0010
+-3 1101
+2 0010
+-4 1100
+0 0000
+1 0001
+-7 1001
+0 0000
+0 0000
+7 0111
+5 0101
+3 0011
+-5 1011
+-4 1100
+0 0000
+-3 1101
+-1 1111
+-5 1011
+-1 1111
+-2 1110
+7 0111
+-6 1010