This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| "use strict"; | |
| /////////////////////////////////////////////////////////////////////////////////////////////////////////// | |
| // волшебная троица | |
| const cons = (x, y) => [x,y] | |
| const car = (l) => l[0] | |
| const cdr = (l) => l[1] | |
| const nil = cons(null, null) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| """Minimal subnetwork.""" | |
| def minSubNetMask(ips): | |
| m = 0 | |
| for ip in ips: m |= ips[0] ^ ip | |
| full = (1 << 32) - 1 # 128 for IPv6 | |
| return (full << m.bit_length()) & full | |
| def tst(ips, res): | |
| r = minSubNetMask(ips) == res |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| (do | |
| (def ones | |
| (lazy-seq (cons 1 ones))) | |
| (prn (take 10 ones)) | |
| (defn intfrom [n] | |
| (lazy-seq (cons n (intfrom (+ 1 n))))) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| print("\n\n\n") | |
| // волшебная троица | |
| const cons = (x, y) => [x,y] | |
| const car = (l) => l[0] | |
| const cdr = (l) => l[1] | |
| // scons(h, t) = cons(h, lz(() => t)) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| # https://www.onlinegdb.com/online_python_interpreter# | |
| ''' | |
| -- immutable, persistent, coinductive streams | |
| ones = 1 : ones | |
| fibs = 0 : 1 : zipWith (+) fibs (tail fibs) | |
| hamm = 1 : map (*2) hamm `f` map (*3) hamm `f` map (*5) hamm where |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #include "stdafx.h" | |
| #include <iostream> | |
| #include <fstream> | |
| #include <string> | |
| #include <map> | |
| #include <vector> | |
| #include <algorithm> | |
| // компаратор пары в нужном порядке |
NewerOlder