Var k,n:integer;
begin
write('k = (k кратно 3) ');
readln(k);
n:=k div 3 mod 10;
writeln(k,'-я цифра последовательности 101102103…149150 = ',n);
end.
Пример:
<span>k = (k кратно 3) 27
27-я цифра последовательности 101102103…149150 = 9</span>
Відповідь:
Пояснення:
7.а) Рендеринг
8. а)Структурное программирование.
в этих " " скобках комментарии их можно не писать
(Начало)-> /действие: разделить эти 5 монет на 2 кучки по 2 монеты. "т.е 4 монеты взвешиваем,а 5ю откладываем в сторону"/ -> <условие: кучки равны между собой >____ если да___ /то 5я монета была золотой/--------если нет-------/берем ту кучку из 2х монет, что тяжелее. Делим эту кучку по 1й монете. Взвешиваем/-> <монета А>Б "либо 1я монета тяжелее 2й">____если да____/то монета А золотая/----если нет----- /то монета Б является золотой/->(конец)
I=2
2 байта=16 битов
Потом на символ стало уделяться 8 битов, т.е. в два раза меньше. Получается, что изначально текст весил 2048 бит, и на символ уделялось 16 бит. Тогда количество символов=2048/16=128. Ответ 128 символов.
1)
1)256
2)10
3)8
2)N=2^i-формула Хартли
3)Q=K*I, Где i это бит на 1 символ.
4)
1)375*8бит/500=i=6бит-вес.(из 3-его задания)
=>2^6=64символа
2)2^6=64; i=6бит. K=40*60*3;Q=K*I=43200бит=5400Байт.
3)K=60*40*6;Q=9000BAIT=72000BIT;I=Q/K=5BIT;2^5=32символа.
4)N=32;K=512*256;1носитель=1табличка=256символов.2^5=32;
i=5бит. Q=K*I=5*256=1280БИТ;Q1=I*K1;K1=256*512;Q=5*256*512=655360бит=80Кбайт