110010=50
50\%девочек, т,половина
1010=10 мальчиков
10=50\%
10+10= 20 учеников
Ответ б
Sub maxZn()
'заполнение массива
Dim mas(20)
S = ""
Randomize
For i = 1 To 20
mas(i) = Round(Rnd(100) * 100)
S = S + Str(mas(i)) + ","
Next i
'поиск максимального числа и количества его повторений
qty = 1
max = mas(1) 'предполагаем, что максимальное число в первом элементе массива
For i = 2 To 20
If mas(i) = max Then
qty = qty + 1
End If
If mas(i) > max Then
max = mas(i)
qty = 1
End If
Next i
MsgBox "последовательность чисел " + S
MsgBox "максимальное число " + Str(max) + "число повторений " + Str(qty)
End Sub
<span>Sub test()
Call maxZnEnd
Sub</span>
Составим таблицу, куда пощагово запишем все значения переменных (см. во вложении) и увидим, что значение переменной С будет равно 8
V=50КБ/c v=k*i
i=16 V=640*480*16=4915200бит= 600КБ
k=480*640 t=V/v
t=600/50=12(c)
t-?
Ответ:
Беспроводные устройства
Беспроводные устройства пагубно повлияли на нашу жизнь.Они сделали жизнт легкче.
Во-первых,не надо сидеть дома что бы посмотретт что то на улице,зайти в интернет или написать эсемеску.
Во-вторых,можно послушать музыку не обращая внимания на общество.
Я считают,что беспроводные устройства сделали жизнт Боден информативной и легкой