& - конъюнкция (аналог умножения), выполняется первой
A&0=0, A&1=A
v - дизъюнкция (аналог сложения)
1vA=1, Av0=A
1&0 v 1&1 v 1 = 1&0 v 1&1 v 1 = 0 v 1 v 1 = 1
0&1&0&0&1 v 1 = (0&1&0&0&1) v 1 = Av1 = 1
1&1&1 v 0 v 1 = (1&1&1 v 0) v 1 = Av1 = 1
1. Программа 10 раз прибавляет 9 к нулю =>
s = 9 * 10 = 90
Ответ: 90.
2. Программа 7 раз отнимает 7 от 50 =>
m = 50 - 7 * 7 = 1
Ответ: 1.
3. Программа прибавляет удвоенный индекс цикла (от 2 до 9) к нулю
s = 2 * (2 + 3 + 4 + 5 + 6 + 7 + 8 + 9) = 88
Ответ: 88.
4.
a = 30; b = 6
a = 30 / 2 * 6 = 15 * 6 = 90; b = 6
a > b = 90 > 6 = true =>
a = 90; c = 90 - 12 * 6 = 90 - 72 = 18
Ответ: 18.
5.
a = 5; c = 3
a = 5; c = 7 + 5 * 3 = 7 + 15 = 22
a = 22 / 2 * 5 = 11 * 5 = 55; c = 22
Ответ: 55.
Выделите на листе прямоугольную область ячеек с левым верхним углов в A1 и запустите программу, которая в каждой строке выделенной области обменяет местами содержимое ячеек с минимальным и максимальным значениями.
Sub abc()
a = Selection.Value
For i = 1 To UBound(a, 1)
aMin = a(i, 1): aMax = aMin
jMin = 1: jMax = 1
For j = 2 To UBound(a, 2)
If aMin > a(i, j) Then
aMin = a(i, j): jMin = j
End If
If aMax < a(i, j) Then
aMax = a(i, j): jMax = j
End If
Next j
Cells(i, jMin).Value = aMax
Cells(i, jMax).Value = aMin
Next i
End Sub
(I - информационный объем текста, K - кол-во символов, i - вес одного символа/бит на символ)
Дано:
K = 6 * 40 * 60 = 14400 шт
I = 28800 байт = 28800 * 8 бит = 230400 бит
i - ?
Решение:
бит
Ответ: 16.0
