Чтобы перевести 75 кб в байты нужно знать что
1 кб=1024 байт
75*1024=76800 байт
Чтобы перевести 75 кб в биты нужно знать что
1кб= 8192 бит
75*8192=<span>614400 бит</span>
Тут все достаточно просто.
Всего 32 уникальных карты карты
32= 2^5 - значит получаем всего 5 бит информации
Для более подробного объяснения можно разделить карты на номинал и масти
Всего 4 масти в колоде
Для обозначения Масти нужно два бита
00 - пики
01 - буби
10 - черви
11 - крести
и 8 номиналов нужно 3 бита
000 - туз
001 - король
010 - дама
011 - валет
100 - десятка
101 - девятка
110 - восьмерка
111 - семерка
begin
var n := ReadInteger('n =');
var a := ArrRandom(n, -10, 99);
a.Println;
a.TakeWhile(p -> p > 0).DefaultIfEmpty.Average.Println
end.
Объяснение:
TakeWhile(p -> p > 0) - отбирает элементы от начала до тех пор, пока условие p > 0 истинно, т.е. со значением, большим нуля.
DefaultIfEmpty - если первое же значение не положительно, результатом будет один элемент, равный нулю (нельзя найти среднее, если элементов не отобрано вообще, получим 0/0)
Average - находит среднее отобранных элементов
Задание 3
З 9
И 10
М 14
А 1
1) ихрпщтансснчси - АЛГОРИТМИЗАЦИЯ
2) ушърезаёщ - КОМПЬЮТЕР
3) счаёщчту - ИНТЕРНЕТ
Задание 4
Б 2
А 1
Н 15
К 12
ЖПЮЩЕБ - еопнга (чтобы это не значило)
Fortif-типо токого,как то так