а) 1; 11; 111; 1111; 11111; 111111; (к каждому числу прибавляем по единице)
б) 10; 100; 1000; 10000; 100000; (к каждому числу прибавляем нуль)
в) 101; 111; 101; 111; 101; 111; 101; 111; (здесь просто повторяются два числа,а именно 101 и 111)
(AvB)π(avb))=a²-b²
ответ а в пересекаются
K=10x10=100 пикс
I=100 бит
i=I/k=100/100=1 бит
N=2^i=2^1=2 цвета
Ответ: 2 цвета
// F#
[<EntryPoint>]
let main argv =
let getRandomCollection n =
let rand = new System.Random()
Array.map (fun x -> rand.Next(-10, 10)) [| 1..n |]
let inputArray = getRandomCollection 15
printf "source array: %A\n" (inputArray |> Array.toList)
// First part
printf "numberToCheckOnEqual: "
let numberToCheckOnEqual = System.Console.ReadLine() |> System.Int32.Parse
let indecesEqualsToNumber =
inputArray
|> Array.mapi (fun i x -> (x, i))
|> Array.filter (fun (x, i) -> x = numberToCheckOnEqual)
|> Array.map (fun (x, i) -> i)
|> Array.toList
printf "%d equals to %d: %A\n" (indecesEqualsToNumber |> List.length) numberToCheckOnEqual indecesEqualsToNumber
// Second part
printf "a: "
let a = System.Console.ReadLine() |> System.Int32.Parse
printf "b: "
let b = System.Console.ReadLine() |> System.Int32.Parse
let sum =
inputArray.[a..b]
|> Array.sum
printf "sum of array [%d..%d]: %d\n" a b sum
// Last part
let finalArray =
inputArray
|> Array.map (fun x -> if x < 0 then x*x else x)
printf "final array: %A" finalArray
System.Console.ReadKey true |> ignore
0
1б
2б
3в
4б
5б
6б
7г
8в
9а
10а
задача
1. 2^i=N, N=32, i=5
2. 2^i=128, i=7
3. не видно значения((
4. 2^i=32, i=5, в слове комбинаторика 13 символов, 5*13=65бит информации