<em>// PascalABC.NET 3.2, сборка 1387 от 20.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(ReadInteger('n='),-2,2); a.Println;
Writeln('Положительных: ',a.Where(x->x>0).Count)
end.
<u>Пример</u>
n= 15
1 -1 -1 2 0 2 2 -2 -2 0 -1 -1 -2 1 1
Положительных: 6
1)
8 Кбайт=8*2^13 бит =2^16 бит
256*256=2^8 * 2^8=2^16 пикслей
2^16 бит : 2^16 пикселей = 1 бит для кодирования одного пикселя
2^1 =2 цвета <--- ответ
2) 24*800*600=11 520 000 бит =
=1440000 байт =1406,25 Кбайт≈1407 Кбайт <---- ответ
3)
640*480*8=(5* 2^7) * (15*2^5) * (2^3) бит=75*2^15 бит=
=75*2^12 байт = 75*2^2 Кбайт =75*4 Кбайт = 300 Кбайт <--- ответ
Это отдельное устройство. покупаешь его и присоеденяешь к ПК
2048*768*8 (глубина цвета)*25*5*60=<span><span>94371840000 бит/8/1024/1024/1024=10,99Гбайт</span></span>
<span>Передатчик.</span>
<span>Устройств, имеющих в своём составе передатчик, с помощью которого происходит передача информации, много. </span>
<span>Все сетевые устройства для цифровой передачи данных, независимо от среды передачи данных - коммутаторы, роутеры, беспроводные точки доступа, - всё активное сетевое оборудование чего-нибудь передаёт и принимает (с помощью приёмника). </span>
<span>аналоговые устройства - радио, телепередатчики.</span>