12.16..05
19.1316.03.01
17.18.01.03.10.13.16
<u>PascalABC.NET 3.4.0, сборка 1677 от 17.06.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
function CountCond(a:array of real):=a.Where(t->t<a.Average).Count;
begin
var a:=ArrGen(15,i->Cos(5*(i+1))-1/sqrt((i+1)**3+9)); a.Println;
Writeln('Элементов массива, меньших среднего арифметического: ',CountCond(a))
end.
Книга, т. к. это носитель информации
128 На 128 и на 8 бит. Ответ:131072 бит или 16 кбайт.
Ответ:
РОПОР и ТОПОР
Объяснение:
Представим что имеем дело с 4-ичной системой счисления { 0 - О, 1 - П, 2 - Р, 3 - Т }. В таком случае вышенаписанный ряд можно представить в такой виде:
1. ООООО (00000) = 0 в 10ичной СС
2. ООООП (00001) = 1 в 10ичной СС
3. ООООР (00002) = 2 в 10ичной СС
4. ООООТ (00003) = 3 в 10ичной СС
5. ОООПО (00010) = 4 в 10ичной СС
...
Исходя из этого, чтобы получить слово, находящееся на 531 месте и 787 месте, достаточно перевести числа 530 и 786 в 4-ичную систему счисления и заменить цифры буквами.
1.
530 / 4 = 132 (2 остаток)
132 / 4 = 33 (0 остаток)
33 / 4 = 8 (1 остаток)
8 / 4 = 2 (0 остаток)
530(10) = 20102 (4)
Замена: РОПОР
2.
786 / 4 = 196 (2 остаток)
196 / 4 = 49 (0 остаток)
49 / 4 = 12 (1 остаток)
12 / 4 = 3 (0 остаток)
786(10) = 30102(4)
Замена: ТОПОР